beautypg.com

C.3 sending a text message to a phone – Campbell Scientific RavenXTV CDMA Sierra Wireless Cellular Modem User Manual

Page 38

background image

Appendix C. EmailSend Using the Gmail Outgoing SMTP Server

C.3 Sending a Text Message to a Phone

To send a text message to a phone, the email needs to be converted to a text
message via an email to text message gateway. Most cellular providers have
an email to text message service for their phone subscribers. To send a text
message to Verizon Wireless phone subscribers, send an email to the (10 digit
phone number of the person’s phone)@vtext.com (

[email protected]

).

Most text messages are limited to 160 characters, so any email messages
greater than 160 characters will be truncated.

Email-to-Text Message Gateways

T-Mobile:

[email protected]

Virgin Mobile:

[email protected]

AT&T:

[email protected]

Sprint:

[email protected]

Verizon:

[email protected]

EmailSend Program Example

The following example sends an email message when an alarm condition is
True. Both the CR1000 and Raven modem must be configured as PPP as
described in Appendix B,
Configuring the Raven Modem for PPP.
Transport Layer Security (TLS) must be enabled in the datalogger to use
the Gmail mail server.

'Main program variables
Public Batt, RefTemp, Temp
Public Socket AS Long
'declare Email parameter strings (as constants), Message String & Result Variable
Const ServerAddr="smtp.gmail.com:587"
Const UserName="gmail account name"
Const Password="datalogger"
Const ToAddr="[email protected], [email protected]"
Const FromAddr="[email protected]"
Const Subject="Email Message Test"
Const Attach=""
Const CRLF = CHR(13)+CHR(10)
Public Result as String * 100
Public AlarmTrigger As Boolean
Public Message As String * 250
Public EmailSuccess As Boolean
DataTable (TenSecData,True,-1)
DataInterval (0,10,Sec,10)
Sample (1,Batt,FP2)
Sample (1,Temp,FP2)
EndTable
BeginProg
Scan (1,Sec,3,0)
Battery (Batt)
PanelTemp (RefTemp,250)
TCDiff (Temp,1,mV2_5C,1,TypeT,RefTemp,True ,0,250,1.0,0)
CallTable TenSecData
NextScan
SlowSequence
Scan(1,sec,1,0)
If AlarmTrigger = False Then

C-2