2009-11-06 | #1 (permalink) |
高级会员
|
SMS开发-终端发送
关键词:短信编程,SMS编程,短信开发技术,短信应用开发,短信软件开发技术;
从终端设备向蜂窝电话发送短消息文本是十分简单的。以下的代码片段就演示了这个过程。所使用的电话是Nokia 7100系列,并且ME (mobile equipment)是连接在计算的#1号通信端口上。 注意到Ctrl-Z是用来表示终结发送到移动设备的文本输入。 使用Visual Basic来发送SMS文本到Nokia电话: ' 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' ' 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 在终端,看起来就象下面: AT OK AT+CMGF=1 OK AT+CMGS="+15127752607",129 >This is a test. WOW! +CMGS: 49 OK 在终端,看起来就象下面: AT OK AT+CMGF=1 OK AT+CMGS="+15127752607",129 >This is a test. WOW! +CMGS: 49 OK 想了解更多的有关发送SMS文本信息的内容,请参考GSM 07.05白皮书在ETSI Web site
__________________
[SIGPIC][/SIGPIC] |