ATNEL tech-forum

Re: Send SMS

2017-05-19T10:20:46+01:00

O dzięki. Widziałem ten kod na b4a ,ale nie wiedziałem jak się za niego zabrać. Właśnie tego było mi potrzeba. Zaraz wezmę się za testy i w razie co dopytam już w tamtym temacie.

Statystyki: Napisane przez grzeniu 73 — 19 maja 2017, o 10:20

Re: Send SMS

2017-05-18T16:23:39+01:00

Witam!
Jako, że temat pokrewny to nie będę zaczynał nowego.
Jak odbierać automatycznie sms?
Odczytuje go w ten sposób.
[syntax=basic4gl]List1 = SmsMessages1.GetAll()
For i = 0 To List1.Size - 1
Sms = List1.Get(0)
Label_sms.Text = (Sms.Id & " - " & Sms.Body)
Next[/syntax]
Pozdrawiam!

Statystyki: Napisane przez grzeniu 73 — 18 maja 2017, o 16:23

Re: Send SMS

2017-05-02T18:52:30+01:00

Działa i w wysłanych Sms-ach nie ma sladu

Code:

Sub btnSmsMarcin_Click
   Dim Sms1 As PhoneSms
   Sms1.Send(xxxxxxxxx,"tekst SMS")
   Log("SMS Sent")
End Sub

w miejsce xxxxxxxxx wstawiasz nr telefonu.

Statystyki: Napisane przez Manianass — 2 maja 2017, o 18:52

Re: Send SMS

2016-02-20T19:15:53+01:00

Masz już zrobione czy jeszcze nie bo nie sprawdzałem długo tego tematu?

Statystyki: Napisane przez TomekTomek55 — 20 lut 2016, o 19:15

Re: Send SMS

2016-01-20T21:12:09+01:00

Mozesz go programowo usowac

Statystyki: Napisane przez TomekTomek55 — 20 sty 2016, o 21:12