SMS development! plz help!

SMS development! plz help! SearchSearch
Author Message
chong
New member
Username: Alvin

Post Number: 2
Registered: 01-2005
Posted on Tuesday, January 04, 2005 - 02:05 pm:   

i need to develop a VB application to which will communicate with nokia 8210 through infra-red (not serial port).

below is the code:-

' Set up the communications port
MSComm1.CommPort = 1 ' Com Port 1

' Set for 9600 baud, no parity, 8 data, and 1 stop bit.
MSComm1.Settings = "9600,N,8,1"

' Tell the control to read entire buffer when Input is used
MSComm1.InputLen = 0

' Open the port
MSComm1.PortOpen = True

' Send an 'AT' command to the phone
MSComm1.Output = "AT" & Chr$(13) & Chr(10)

' The phone will respond with an 'OK'

' Set up the phone for a text message

MSComm1.Output = "AT+CMGF=1" & Chr$(13) & Chr(10)
' The phone will respond with an 'OK'


---->>>>>i have problem to read the OK, when i debug until MSComm1.input------------------>>>>>>>>>>>>>

Do
'DoEvents
buffer$ = buffer$ & MSComm1.Input

'Debug.Print buffer$
Loop Until InStr(buffer$, "OK" & vbCrLf) Or InStr(buffer$, "ERROR" & vbCrLf) Or InStr(buffer$, "+CMTI") Or InStr(UCase(buffer$), "+CMGR")

--->>>>>>The error is "Run-time error '8020' Error reading comm device ------------------------>>>>>>>>>>>




' Prep for SMS, give destination type and destination address.
' Enter the destination type and destination address to prep for SMS
' e.g. AT+CMGS="+2145551212",129
MSComm1.Output = "AT+CMGS= " & Chr(34) & "+2145551212" & Chr(34) & ",129" & Chr$(13) & Chr(10)

' The phone will return a'>' prompt, and await entry of the SMS message text.

' Now send the text to the phone and terminate with (Ctrl-Z)
MSComm1.Output = "This is a test. WOW! "

' The phone will respond with a conformation containing the 'message reference number' eg. +CMGS:


' Close the port
MSComm1.PortOpen = False

From a terminal, it wan look like this:

AT
OK
AT+CMGF=1
OK
AT+CMGS="+15127752607",129
>This is a test. WOW!
+CMGS: 49

OK


Anybosy can help me....very urgent i need pass up my poject already......i cannot use VB to write/read AT command on nokia 8210. But i can write AT-Command and send message successful at hyper terminal. Is it the infra-red cannot read data?
but i use other software can send message through infra-red. However, i test wih GSM modem serial cable are able send SMS. Hope u ALL can help me or send me sample applcation can send SMS through nokia 8210 by infra-red, not serial port THANK YOU !!!!!!!!!!!!!
wktsang1
Unregistered guest
Posted on Sunday, February 20, 2005 - 04:10 pm:   

I face the same porblem with chong, now i can send SMS message while can't read the received message, anyone can help?