URL Property

Description:

The URL property must contain the URL of the content page which should open if the recipient accepts the Push message (clicks on GoTo or equivalent key on the mobile phone).

Usage	ObjectName.WapPush.URL = strURL strURL = ObjectName.WapPush.URL
Value Type	String
Access Mode	Read/Write
Valid Values	Non blank valid URL
Remarks	When sending WAP Push message using mCore™ the total maximum allowed length of Text and URL property can be roughly estimated using the following thumb rule: If Created and Expiry properties are included then the maximum total allowed length of Text and URL property together is approximately 89 characters. The following strings will are not counted in the length of the URL: 'http://', 'https://', 'http://www.', 'https://www.', '.com/', '.net/', '.edu/', '.org/'. If Created property is set to 0 then the maximum total permissible length of Text and URL can be increased by 9 characters If Expiry property is set to 0 then the maximum total permissible length of Text and URL can be increased by 8 characters You can use the IsLengthOK method to check if the length of URL and Text is within permissible length to send the WAP Push message. However, using this method before sending every WAP Push message will reduce the throughput of messages.

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.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