I need to develop a VB application to... Search Search

Now SMS/MMS Gateway » Now SMS/MMS Gateway - MMS & Advanced Issues (Product Support Only) » Archive through June 06, 2005 » I need to develop a VB application to which will communicate with nokia 8210 through infra-red (not serial port). « Previous Next »

Author Message
Anonymous
 
Posted on Tuesday, January 04, 2005 - 05:41 am:   

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 !!!!!!!!!!!!!

HENGKY
Unregistered guest
Posted on Tuesday, January 18, 2005 - 05:41 am:   

YES, I CAN HELP YOU
i have answered your question at this url :
http://www.control.com/1026203689/index_html


prabhjeet80
Unregistered guest
Posted on Wednesday, April 13, 2005 - 01:36 pm:   

HI everybody...I'm making a project on "Messaging from web browser to a mobile". Can anybody kindly suggest me how to do it, I mean a Sample code for the same.
I shall be grateful to you all
Thanks...!!
Anonymous
 
Posted on Thursday, April 14, 2005 - 09:35 am:   

how can i send more than one destination address ?
what is the syntax ?
AT+CMGS="+15127752607,+15125655656 ",129
Anonymous
 
Posted on Monday, April 18, 2005 - 09:28 am:   

hi,

This is anand.


I am very in crusial stage in my projects.

I am trying to change signals from orcch 32(that is in radio(two way communciation

board) to my pc database (database like dbf).

And ,

I don't how to convert that signals to ordinary database files.I don't that how to

mscomm1 ocx in vb

Pls help me

with friendly
C.T.Anand

Search Search Tree View Tree View   Home Home
Login Login / Register Topics Topics Search Last 1|3|7 Days   Previous Page Previous Next Next Page

© Copyright 2002-2008 by NowMobile.com Limited
Airport House, Purley Way, Croydon, London, CR0 0XZ, UK
UK Tel: +44-20-8286-8080 US Tel: +1.410.833.8711
email : nowsms@nowsms.com