Destination Property

Description:

The Destination property must contain the recipients mobile phone number (international or national format).

Usage	ObjectName.WapPush.Destination = strDestination strDestination = ObjectName.WapPush.Destination
Value Type	String
Access Mode	Read/Write
Valid Values	Valid destination mobile phone number in National or International format.
Remarks	Phone numbers starting with a '+' symbol are considered as international format number otherwise it is considered as national format.

Usage Example:

Visual Basic / ASP (VBScript)

Dim objSMS As mCore.SMS, Message As Object
Set objSMS = New mCore.SMS
' You can also use Set objSMS = CreateObject("mCore.SMS")
' In case of ASP (VBScript) to create object use
' Set objSMS = Server.CreateObject("mCore.SMS")
' In ASP use Response.Write instead of MsgBox
objSMS.Port = "COM3"
objSMS.BaudRate = 19200
objSMS.Parity = "N"
objSMS.DataBits = 8
objSMS.StopBits = "1"
' It is not necessary to execute the 'Connect' method.
' Connection state is detected internally by mCore and
' the 'Connect' method is executed accordingly.
objSMS.PIN = "1234"
objSMS.SMSC = "+919811099988"
objSMS.WapPush.Action = 2
objSMS.WapPush.Destination = "+919873094767"
objSMS.WapPush.Text = "Check emails on your mobile phone"
objSMS.WapPush.URL = "http://www.mobulus.com/xhtml"
If objSMS.WapPush.IsLengthOK Then
     objSMS.WapPush.Send
     If Not objSMS.IsError(True) Then
          MsgBox "WAP Push Message Sent!"
     End If
Else
     MsgBox "WAP Push message content length exceeds allowed length!"
End If
' Disconnect method is executed internally
' whenever the SMS object is terminated.
Set objSMS = Nothing