You can send an email from Outlook to someone’s phone as a text message, and you can have someone send a text message from their phone to an email address.
Example 1 Send email to text on person’s phone with AT&T account:
Send the email to phonenumber@txt.att.net and it will be automatically converted to text message and sent to their phone.
Make sure you send your email in a plain text format with no attachments.
You can find out what address to use by having that person send a text to your email account (see example 2 below). When it arrives in your inbox you can see the return address.
• Alltel: phonenumber@message.alltel.com
• AT&T: phonenumber@txt.att.net
• T-Mobile: phonenumber@tmomail.net
• Virgin Mobile: phonenumber@vmobl.com
• Sprint: phonenumber@messaging.sprintpcs.com
• Verizon: phonenumber@vtext.com
• Nextel: phonenumber@messaging.nextel.com
• US Cellular: phonenumber@mms.uscc.net
• Cricket: phonenumber@sms.mycricket.com
For a complete list you can go here: http://www.hurt911.org/investigation/sm ... dress.html or http://en.wikipedia.org/wiki/List_of_SMS_gateways
Example 2 - person send text message to someone’s email account:
Fire up SMS on your phone, but instead of entering in a number you want to text, enter an email address. Any email address. Compose your text like normal, hit Send, and your carrier will automatically convert your text msg. to an email and deliver it to their inbox.
FUNCTION SendSMSByPC()
LOCAL cMessage, cPhone, cSubject, cCarrier
cMessage := "Hello world!"
cPhone := "9999999999" // 10 Digits phone number for USA phones
cSubject := "Sending SMS from my PC"
cCarrier := "@txt.att.net" // For AT&T
cRecipient := cMyPhone + cCarrier
SendSMSEmail(cRecipient, cMessage, cSubject)
RETURN (.T.)
FUNCTION SendEmailSMS(cRecipient, cMessage, cSubject)
LOCAL oOutMail, cIP
oWnd:SetMsg( "Sending SMS..." )
WSAStartup()
syswait(.25)
oOutMail := TSmtp():New( cIP := GetHostByName( "smtp.comcast.net" ), 587, TRUE, "UserName", "Password" )
oOutMail:bConnecting = { || oWnd:SetMsg( "Connecting to smtp.comcast.net..." ) }
syswait(.25)
oOutMail:bConnected = { || oWnd:SetMsg( "Connected" ) }
syswait(.25)
oOutMail:bDone = { || oWnd:SetMsg( "Message sent successfully" ) }
oOutMail:SendMail( "YourEmail@comcast.net",; // From
{ cRecipient },; // To
cMessage,; // Msg Text
cSubject,; // Subject
{ "" } ) // attached files
syswait(.25)
RETURN NIL
CREATEOBJECT('WinHttp.WinHttpRequest.5.1')
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 122 guests