Hello,
PhoneSms allows you to send the SMS but if required and by using Send2, you can request the ReceiveSentNotification event. Then you could increase a variable to count the number of Sms sent.
Thank You,
but I have to check how many sms sending.
Sending text messages is via a control and I would like to restrict the sending 3 sms.
I thought about using a for loop but not accurate
B4X:
Sub t1_Tick ' sms
Dim i As Int
If xe > 3 OR xe < -3 Then
For i = 1 To 3
Log (i)
If i = 3 Then
t1.Enabled=False
s.Send(EditText2.text,EditText1.Text)
End If
Next
Else If ye > 3 OR ye < -3 Then
For i = 1 To 3
If i = 3 Then
Log (i)
t1.Enabled=False
s.Send(EditText2.text,EditText1.Text)
End If
Next
End If
End Sub