Sms sender! afsender!
her er mit script!Mit spørgsmål er hvordan jeg får min sms til at kun skrive Fra: som afsender istedet for at skrive afsender navn + den telhørende email som hører til nummerserien..
<html>
<body bgcolor=\"#FFFFFF\">
SMS sender <br>
<form action=\"sms.asp\" method=\"post\" name=\"smssend\">
<br><font face=\"Arial\" size=\"-2\">Modtager</font><br><input type=\"Text\" name=\"modtager\" size=\"10\" maxlength=\"8\">
<br><font face=\"Arial\" size=\"-2\">Afsender</font><br><input type=\"Text\" name=\"afsender\" size=\"10\">
<br><font face=\"Arial\" size=\"-2\">Besked</font><br><textarea name=\"indhold\" cols=\"20\" rows=\"5\"></textarea><br>
<INPUT type=\"image\" name=\"submit1\" src=\"send.gif\">
</form>
<br>
<%
afsender=request(\"afsender\")
modtager=request(\"modtager\")
subject = request.form(\"emne\")
body = request.form(\"indhold\")
if CDbl(modtager) < 20599999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 20999999 then
modtager = modtager & \"@note.sonofon.dk\"
elseif CDbl(modtager) < 21999999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 22999999 then
modtager = modtager & \"@note.sonofon.dk\"
elseif CDbl(modtager) < 23999999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 26999999 then
modtager = modtager & \"@sms.mobilix.dk\"
elseif CDbl(modtager) < 28999999 then
modtager = modtager & \"@gsm1800.telia.dk\"
elseif CDbl(modtager) < 30749999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 30919999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 30999999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 36899999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 37999999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 39999999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 40499999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 40999999 then
modtager = modtager & \"@note.sonofon.dk\"
elseif CDbl(modtager) < 46799999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 49799999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 50299999 then
modtager = modtager & \"@sms.tdm.dk\"
elseif CDbl(modtager) < 66899999 then
modtager = modtager & \"@sms.tdm.dk\"
end if
Set mailer = Server.CreateObject(\"CDONTS.newmail\")
result = Mailer.Send(afsender,modtager,subject,body)
set mailer=Nothing
%>
</body>
</html>
