Jul 24th, 2012, 03:39 AM
SMS to mobiles using Modem
I would like to send SMS message to mobile phone 6147654321 using VB6 via a generic modem eg Motorola. Can some one who has done it before show a lighted path. Thanks
Jul 26th, 2012, 09:17 PM
Re: SMS to mobiles using Modem
On web searching, i think if modem is in Com port 1, form has a msComm1 Control 5.0 (sp2), then using the following codes at the right instance it should do the job. Comments please.
MSComm1.Settings = "9600,n,8,1"
MSComm1.CommPort = 1
MSComm1.PortOpen = True
MSComm.Output = "AT+CMGF=1" & vbCrLf
MSComm1.Output = "AT+CMGS=+6147654321" & vbCrLf
MSComm1.Output = "The Text message"
If InStr(MSComm1.Input, "OK") Then MsgBox "Message Send"