| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 收发短信 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101843) |
| -- 作者：wangjh8888 -- 发布时间：2017/6/8 11:33:00 -- 收发短信 请教 如何利用foxtable串口编程收发短信，找了一个短信猫想试试，有例子最好 |
| -- 作者：有点蓝 -- 发布时间：2017/6/8 11:51:00 -- 参考：http://www.foxtable.com/webhelp/scr/2423.htm |
| -- 作者：wangjh8888 -- 发布时间：2017/6/8 12:16:00 -- 串口编程发送短信 试过了 第一项就半天没反应 网上参考的： 帮看看这里：1．设置短消息中心 AT+CSCA=“+8613800270500”回车(具体的号码由当地的运营商决定。) Dim c_comPortName As String = e.Form.Controls("cmbPort").value
Dim cenNO As String = "AT+CSCA=" & chr(34) & e.Form.Controls("cenNumber").value & chr(34) & chr(13) Ports(c_comPortName).Write(cenNO ) AT+CMGF=1回车(采用文本格式发送，如用PDU格式，则AT+CMGF=0) Dim c_comPortName As String = e.Form.Controls("cmbPort").value Dim AT_string As String = e.Form.Controls("TextBox1").value & Chr(13) Ports(c_comPortName).Write(AT_string) >输入短消息。Crtl+Z结束并发送。 Dim c_comPortName As String = e.Form.Controls("cmbPort").value Dim teleNO As String = "AT+CMGS=" & chr(34) & e.Form.Controls("txtNumber").value & chr(34) & chr(13) Ports(c_comPortName).Write(teleNO ) 我直接读写串口，短信猫反应都正确，就最好一句 ：AT+CMGS=“+8613xxxxxxxxx”回车 >输入短消息。Crtl+Z结束并发送。 也出现> 符号了，但是不知道怎么发送短信（Crtl+Z结束并发送），请老师帮帮忙！谢谢 |
| -- 作者：狐狸爸爸 -- 发布时间：2017/6/8 12:32:00 -- 这个可以问问卖短信猫为的，不过为啥不用foxtable内置的短息收发呢？ |