• 丰搜首页
• 文档中心
• 视频中心
• 丰搜贴吧
• 问题集锦
• 更多功能

选择显示字体大小

• 最大
• 较大
• 标准

在pc上通过手机发送短消息

使用text模式发送短信其实很简单,只要对于at指令有基本的了解,就能编写出短消息的发送程序,可是一直以来介绍该方法的文章却少之又少,很多人认为使用该方法太简单,不值一提.不过对于简单的应用来说,该方法也不失于一种不错的选择.

先在项目中添加mscomm控件,一般的部件栏中可能没有列出mscomm控件,可以过右击部件栏,选择”部件”,或是通过在菜单中的”工程”选择”部件”,然后选中microsoft comm control 6.0即可.添加了mscomm控件后,可以设置一些基本的参数.如果你使用nokia的手机,你还必须安装data suite(可以到nokia的开发论坛上去下载一个),然后mscomm的commport选择3;如果你使用其他手机,采用红外线接口,你必须安装红外线驱动程序.选择相应的端口.下面的代码是一些基本参数的设置:
mscomm1.settings=”9600,n,8,1” ‘9600波特,无奇偶校验,8位数据,一个停止位
mscomm1.inputlen=0 ‘读入整个缓冲区
mscomm1.portopen=true ‘打开端口
发送短消息的代码如下:
mscomm1.output = "at+cmgf=1" + vbcr ‘设置发送的模式,注意:一定要加上 vbcr
mscomm1.output = "at+csca=" & chr$(34) & "8613010341500" & chr$(34) & ",129" + vbcr ‘8613010341500是短消息中心,各地的号码不一样,必须设置当地的短消息号码
mscomm1.output = "at+cmgs=" & chr$(34) & "13057575064" & chr$(34) & ",129" + vbcr ‘13057575064是对方手机号
mscomm1.output = "test" & chr$(26) ‘chr$(26)是ctr+ z
以上是简单实现短消息,你可以根据at指令集结合vb的串口控件开发出更加完善的程序和功能丰富的应用程序,如接收短消息,拨号等等.
写完<<在pc上通过手机发送短消息>>后,就打算接着写中文短信息的发送的,可是毕业论文时间实在太紧,一直耽搁下来了,这几天陆续有几个网友给我发邮件,关注这个话题的网友也比较多,而且csdn邮件期刊也将我的那一篇文章收录进来了,我感到十分的欣慰,同时也觉得应该尽快完成我未完成的工作,要不然太对不起大家了.

使用text模式收发短信代码简单,实现起来十分容易,但是最大的缺点是不能收发中文短信,实在是有点美中不足.不过pdu模式完全可以解决这个问题,pdu模式不仅支持中文短信,也能发送英文短信,堪称完美无缺.pdu模式收发短信可以使用三种编码: 7-bit、8-bit和ucs2编码. 7-bit编码用于发送普通的ascii字符,8-bit编码通常用于发送数据消息,ucs2编码用于发送unicode字符。我们要实现中文短信的发送,所以选择ucs2,即中文unicode码.

首先介绍一下vb中的两个函数:chrw()和ascw().对于chr()和asc()函数大家一定很熟悉,对于chrw()和ascw()可能会比较生疏一点. chrw 函数返回包含 unicode 的 string，若在不支持 unicode 的平台上，则其功能与 chr 函数相同; ascw 函数返回 unicode 字符代码，若平台不支持 unicode，则与 asc 函数功能相同。对于这两个函数我们各举一个例子说明:
?ascw("短")
30701
?chrw(26482)
杲

[1] [2]  下一页