 Download ActiveXperts SMS and MMS Toolkit 5.1 (6826 KB - .exe file)
Download Manual (623 KB - .htm file)
Send a voicemail indication, fax indication or e-mail indication via SMS
ActiveXperts SMS and MMS Toolkit allows you to send indications via SMS to your remote mobile users.
This way, indications can easily be integrated into your own application.
The Toolkit supports three types of indications:
- Voice indications
- Fax indications
- E-mail indications
These indication SMS messages can be send using a GSM Modem,GSM Phone or via SMPP (Short Message Peer-to-Peer, SMS delivery to a provider via IP).
You can use these indications in any Windows development environment, including: Visual Basic .NET, Visual C# .NET, ASP .NET, ASP, Visual Basic, VBScript, Delphi, PHP, etc.
The following VBScript demonstrates how to send a voicemail indication. There's one sample to show the use of indications with a GSM device; the other sample shows how to use it with SMPP.
Send a simple SMS message (via GSM Modem / GSM phone)
Set objGsmOut = CreateObject ( "ActiveXperts.GsmOut" )
Set objConstants = CreateObject ( "ActiveXperts.SmsConstants" )
objGsmOut.Device = "MultiTech GSM MultiModem"
objGsmOut.MessageRecipient = "+31624896641" ' Recipient's mobile number
objGsmOut.MessageData = "5" ' Indication for 5 new voicemail messages
objGsmOut.MessageType = objConstants.asMESSAGETYPE_INDICATION_VOICEMAIL ' Voicemail indication
objGsmOut.Send ' Send the voicemail indication now
WScript.Echo "Result: " & objGsmOut.LastError
Send a simple SMS message (via SMPP over IP)
objSmpp.Server = "smpp.activexperts-labs.com" ' ActiveXperts SMPP Demo server
objSmpp.ServerPort = 2775 ' TCP port
objSmpp.SystemID = "AX005" ' Account to logon to the SMSC provider
objSmpp.SystemPassword = "812056" ' Password to logon to the SMSC provider
objSmpp.Connect ' Establish a TCP/IP based SMPP session
If objSmpp.IsConnected = True Then
objSmpp.MessageRecipient = "+31647134225" ' Recipient SMS number
objGsmOut.MessageType = objConstants.asMESSAGETYPE_INDICATION_VOICEMAIL ' Voicemail indication
objSmpp.MessageData = "5" ' SMS message text
objSmpp.Send
If( objSmpp.LastError <> 0 ) Then
WScript.Echo "Failed to send message, error: " & objSmpp.LastError
Else
WScript.Echo "Message successfully delivered"
End If
objSmpp.Disconnect
End If
|
