Send message greater than 160 chars PhoneSms.Send2

How can I send an SMS greater than 160 characters using PhoneSms.Send2?

The code below does NOTHING. We don't get a crash, and the PE_SmsSentStatus is never called with success or error.

Sub PE_SmsSentStatus(Success As Boolean, ErrorMessage As String, PhoneNumber As String, Intent As Intent) As Boolean
Log("MessageSentStatus: " & Success & " " & ErrorMessage & " " & PhoneNumber & " " & Intent.ExtrasToString)
End Sub

sub SendSMS
Dim p As PhoneSms
dim Mobile as string = "00000000000"...

Send message greater than 160 chars PhoneSms.Send2

from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/1XLRyTa
via IFTTT