34 lines
943 B
Plaintext
34 lines
943 B
Plaintext
|
<%
|
||
|
|
Set sms = Server.CreateObject( "Simplewire.SMS" )
|
||
|
|
|
||
|
|
' Subscriber Settings
|
||
|
|
sms.SubscriberID = "123-123-123-12345"
|
||
|
|
sms.SubscriberPassword = "Password Goes Here"
|
||
|
|
|
||
|
|
' Message Settings
|
||
|
|
sms.MsgPin = "+1 100 510 1234"
|
||
|
|
sms.MsgFrom = "Demo"
|
||
|
|
sms.MsgCallback = "+1 100 555 1212"
|
||
|
|
|
||
|
|
' Smart Message Settings
|
||
|
|
sms.OptPhone = "nokia"
|
||
|
|
sms.OptCountryCode = "Country Code goes here"
|
||
|
|
sms.OptNetworkCode = "Network Code goes here"
|
||
|
|
sms.MsgOperatorLogoFilename = Server.MapPath("example.gif")
|
||
|
|
|
||
|
|
Response.Write("<b>Sending message to Simplewire...</b><br>")
|
||
|
|
|
||
|
|
' Send Message
|
||
|
|
sms.MsgSend
|
||
|
|
|
||
|
|
' Check For Errors
|
||
|
|
If (sms.Success) Then
|
||
|
|
Response.Write("<b>Message was sent!</b><br>")
|
||
|
|
Else
|
||
|
|
Response.Write("<b>Message was not sent!</b><br>")
|
||
|
|
Response.Write("Error Code: " & sms.ErrorCode & "<br>")
|
||
|
|
Response.Write("Error Desc: " & sms.ErrorDesc & "<br>")
|
||
|
|
End If
|
||
|
|
|
||
|
|
Set sms = Nothing
|
||
|
|
%>
|