home *** CD-ROM | disk | FTP | other *** search
/ Internet Magazine 2003 October / INTERNET108.ISO / pc / software / windows / messages / sms_maker / smsmaker103setup.exe / $INSTDIR / samples / sendSMS.asp next >
Encoding:
Text File  |  2003-07-13  |  1.3 KB  |  36 lines
  1. <%@ EnableSessionState=False LANGUAGE="VBScript" LCID=1031 %>
  2. <%
  3. dim SMSMaker
  4. set SMSMaker=server.createobject("SMSMaker.SMSFile")
  5.  
  6. if request("action")="send" then
  7.     
  8.     OutTiming=SMSMaker.OutTiming
  9.     SMSMaker.CreateSMS request("rcpnumber"), request("text"), request("filename"), request("SRR"), request("Flash")
  10. end if
  11. %><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
  12. <html>
  13. <head>
  14.     <title>SMS versenden</title>
  15. </head>
  16. <body>
  17. <%if request("action")="send" then%><b>OK, SMS was saved and will be send in between the next <%=OutTiming%> seconds.</b><br><br><%end if%>
  18.  
  19. <b>Send SMS messages with SMS-Maker, V 0.7</b><br><br>
  20. <i>Outgoing Directory: <%=SMSMaker.Outgoingdirectory%></i><br><br>
  21. <form action="sendSMS.asp" method="post">
  22. <input type="hidden" name="action" value="send">
  23. Recipient's phone number:<br>
  24. <input type="text" name="RcpNumber" value="<%=request("rcpnumber")%>" size=30><br>
  25. message text:<br>
  26. <textarea cols="25" rows="3" name="text"><%=request("text")%></textarea><br>
  27. file name (optional):<br>
  28. <input type="text" name="filename" value="<%=request("filename")%>" size=30><br>
  29. <input type="checkbox" name="SRR" value="1">request delivery confirmation<br>
  30. <input type="checkbox" name="Flash" value="1">send as flash (alert) SMS<br>
  31. <input type="submit" value="send SMS!"></form>
  32.  
  33.  
  34. </body>
  35. </html>
  36.