Private Sub Event_Click
Dim smsc As MessageComposer
smsc.Initialize("smsc")
smsc.SetRecipients(Array As String("123332323")) 'must be strings!
smsc.Body = "Hello!!!"
smsc.Show(Page1)
End Sub
Sub smsc_Complete (Result As Int)
If Result = smsc.RESULT_SENT Then
hd.ToastMessageShow("Message sent", True)
Else
hd.ToastMessageShow("Message was not sent", True)
End If
End Sub