How to send SMS using UFT 12.0
Can you please help any one How to send SMS using UFT 12.0. Please guide me thanks in advance...
If you have Outlook and the SMS service is running on the Outlook server you can use this. Other than that I've used an extrernal SMS website that the company had an account for.
If you have the Outlook SMS service running (from what I can remember it runs on port 25 if you want to check) I have some sample code on my QTP USB dump that I can search if i can find it.
sure Mark Smith...Thanks in advance...
Originally Posted by mwsrosso
Found it, code is about 10 years old so I can't vouch for it still working on Exchange 2010:
Only works if your Exchange server has the SMS service (and its running)
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Test Failed"
objMessage.Sender = "firstname.lastname@example.org om"
objMessage.To = "+449999999999"
objMessage.TextBody = "Test XYZ failed at: " & Now
'==This section provides the configuration information for the remote SMTP server.
'==Normally you will only change the server name or IP.
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'Name or IP of Remote SMTP Server
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "10.100.1.1"
'Server port (typically 25)
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
'==End remote SMTP server configuration section==
Set objMessage = Nothing