SMS-sender...
Jeg har denne side:----------------------------------------
<table cellpadding=\"5\" cellspacing=\"0\" width=\"100%\">
<form method=\"get\" action=\"#\" name=\"smsform\">
<tr>
<td width=\"100%\">
<table cellpadding=\"0\" cellspacing=\"0\" width=\"100%\">
<tr>
<td width=\"50\">Til:</td>
<td width=\"140\" align=\"right\"><input class=\"boks\" type=\"text\" name=\"til\" size=\"20\"></td>
</tr>
<tr>
<td width=\"50\">Fra:</td>
<td width=\"140\" align=\"right\"><input class=\"boks\" type=\"text\" name=\"fra\" size=\"20\"></td>
</tr>
<tr>
<td width=\"50\">Besked:</td>
<td width=\"140\" align=\"right\"><input class=\"boks\" type=\"text\" name=\"besked\" size=\"20\" maxlength=\"160\"></td>
</tr>
<tr>
<td width=\"50\"></td>
<td width=\"140\" align=\"right\"><a href=\"java script:sms()\">Send</a></td>
</tr>
</form>
</table>
<script language=\"JavaScript\">
function sms()
{
sms = window.open(\"../sms\",\"SMS\",\"status=no,toolbar=no,location=no,menu=no,width=250,height=50,top=200,left=250,screenX=200,screenY=250\");
document.smsform.submit();
document.smsform.reset();
}
</script>
----------------------------------------
Og så denne side som er ../sms:
--------------------
<table cellpadding=\"0\" cellspacing=\"0\" width=\"100%\" height=\"100%\">
<tr>
<td align=\"center\">
<%
gyldigt = 0
Function sendsms(mobil)
If Request.Querystring(\"til\") = \"\" Or Request.Querystring(\"fra\") = \"\" Or Request.Querystring(\"besked\") = \"\" Then
sendsms = \"Alle felter skal udfyldes!\"
Else
If Not IsNumeric(mobil) Then
gyldigt = 0
Else
If Left(mobil,4) < 0000 Or Len(mobil) < 8 Then
gyldigt = 0
Else
gyldigt = 1
End if
End if
If gyldigt = 1 Then
selskab = teledk
Else
gyldigt = 0
End if
If gyldigt = 1 Then
mobiltekst = \"Besked fra \"& Request.Querystring(\"fra\") &\". \"& Request.Querystring(\"besked\")
email = mobil & \"@sms.tdm.dk\"
Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
JMail.ServerAddress = \"websmtp.brevkasserne.dk\"
JMail.Sender = \"sms@dream4.dk\"
If selskab <> \"@sms.tdm.dk\" Then
JMail.Body = mobiltekst
Else
JMail.Body = mobiltekst
End If
JMail.AddRecipient email
JMail.Execute
Set JMail = Nothing
End if
If gyldigt = 1 Then
sendsms = \"Beskeden er sendt!\"
Else
sendsms = \"Nummeret er ikke gyldigt!\"
End if
End if
End Function
%>
<p><%= sendsms(Request.Querystring(\"til\")) %></p>
<a href=\"java script:window.close();\">Luk vinduet</a>
</td>
</tr>
</table>
----------------------------------------
Problemet er bare at den hele tiden viser \"Alle felter skal udfyldes!\".
Det er som om at den ikke kan få informationerne fra felterne og så over på den nye side, håber I forstår.
Hvad gør jeg galt?
