øøøøøøhh tyder på at du ikke er helt med, her er min ASP kode:
<HTML>
<HEAD>
<TITLE>wsms.dk - En service fra wservice.dk</TITLE>
<link rel=\"stylesheet\" type=\"text/css\" href=\"css.css\">
</HEAD>
<BODY>
<CENTER>
<TABLE BORDER=\"0\">
<TR><TD>
<CENTER><H1>wsms.dk</H1><BR></CENTER>
<%
With Request
modtager = .Form(\"modtager\")
afsender = .Form(\"afsender\")
besked = .Form(\"besked\")
End With
If modtager <> \"\" AND besked <> \"\" AND len(modtager) = 8 AND isnumeric(modtager) Then
udbydere = Array(\"@sms.tdm.dk\", \"@note.sonofon.dk\", \"@gsm1800.telia.dk\", \"@sms.mobilix.dk\")
If afsender <> \"\" Then
body = \"Fra \" & afsender & \": \" & besked
Else
body = besked
End if
Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
With JMail
.ISOEncodeHeaders = False
.ServerAddress = \"smtp.mail.dk\"
.Sender = \"sms@wsms.dk\"
.Subject = \"\"
For each item in udbydere
.AddRecipient modtager & item
Next
.Priority = 3
.Body = besked
.Execute
End With
Set JMail = nothing
Response.Write(\"<B>Beskeden er afsendt!</B>\")
modtager = \"\"
afsender = \"\"
besked = \"\"
Else
Response.Write(\"<B>Beskeden blev ikke afsendt!</B><BR>Modtager skal være et tal på 8 cifre.<BR>Besked skal udfyldes.<BR>\")
End if
%>
<FORM ACTION=\"send.asp\" METHOD=\"post\">
Modtager:<BR>
<INPUT TYPE=\"text\" NAME=\"modtager\" VALUE=\"<%=modtager%>\"><BR>
Afsender:<BR>
<INPUT TYPE=\"text\" NAME=\"afsender\" VALUE=\"<%=afsender%>\"><BR>
Besked:<BR>
<TEXTAREA NAME=\"besked\"><%=besked%></TEXTAREA><BR>
<INPUT TYPE=\"submit\" VALUE=\"Send\" CLASS=\"knap\">
</FORM>
</TD></TR></TABLE>
<DIV CLASS=\"small\">En service fra <A HREF=\"
http://www.wservice.dk\" CLASS=\"small\">WService.dk</A></DIV>
</CENTER>
</BODY>
</HTML>