As u know lot of AT-command i am sending u the procedure thru u can send sms.
This will help u out, but still required help feel free to contact me amit_jain978@yahoo.com.
Bye,
Amit
Code :
~~~~~
Private Function fnOpenPort()
MSComm1.CommPort = 2
MSComm1.Settings = "9600,N,8,1"
MSComm1.Handshaking = 2
On Error Resume Next
' Communications port settings.
' Assuming mouse is attached to COM1, GSM MODAM is set to 2
' Open the communications port.
MSComm1.PortOpen = True
If Err Then
MsgBox "COM2: not available. Change the CommPort property to another port."
Exit Function
End If
End Function
Main Topics
Browse All Topics





by: amit1978Posted on 2004-02-20 at 00:03:52ID: 10410304
r u using the gsm modem to send the SMS, Then i think i can help u.
Amit