I want to use for loop and send Messages
It works with me but can you send it once?
B4X:
Dim Cursor1 As Cursor = Main.SQL1.ExecQuery("select * from emps where fin = 1")
For i = 0 To Cursor1.Rowcount -1
Cursor1.Position = i
Topic = Cursor1.Getstring("emp_mobile")
Title = "Title"
Body = "Body"
CallSub( Me,"SendMessage" )
Next
It works with me but can you send it once?