gsm moderm发送短消息的问题 能不能贴出来Unicode码的转换算法!? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你要先发送一个读取GSM模块信息的命令,具体记不得了,待会儿告诉你。 Mscomm.output=xxxxxxxxxx语句之间要有足够的时间间隔,否则Modem来不及响应 MSComm.Output = "AT+CMGL=4" & Chr(13) Dim retMSComm.OutBufferCount = 0MSComm.Output = "AT+CMGL=4" & Chr(13)Do ret = DoEvents()Loop Until MSComm.OutBufferCount = 0 MSComm.Output = "AT+CMGL=4" & Chr(13)是列表Sim卡上短消息的。贴一下Unicode码和Acsii的转换算法如何?转换思路或函数贴出来也可! 1、接收:不是直接INPUT的,要发AT指令的,AT+CMGL=4 列出所有短消息,然后根据消息编号,发送AT指令读取,指令我忘了。另一中是开始时,设置新的短消息到达时给个提示,触发一个事件去接收(这时同样要发AT指令)。2、转换成UNICODE,VB自带函数:ASCW(),如:ASCW("好") Unicode码转Acsii的是用Asc() ma?? 我问的问题的关键是,我收不到任何数据阿。当然msCOMM的阿事件也不可能触发的阿。请不要乱来,我下了很多demo都不行啊。更gsm的模块应该没有关系吧。 怎么检查一个listbox里面的数据是否存在 mapx 如何实现图元在图层间的拷贝 Type .. Type End 登入界面的判断问题 vb自写的DLL窗体传递问题 如何用默认方式打开指定的文件,如:a.doc,b.xls,c.txt? 高手请进!题不难但要实现不易! 如何提高VB程序的运行速度啊 关于excel的版本问题及VB调用的问题 请问怎样以binary方式读取文件的一部分数据?谢了 如何设置adodc控件的connectstring属性 怎样制作使用了DBF数据库的软件的安装程序!我最后的100分了!
MSComm.Output = "AT+CMGL=4" & Chr(13)Do
ret = DoEvents()
Loop Until MSComm.OutBufferCount = 0
是列表Sim卡上短消息的。贴一下Unicode码和Acsii的转换算法如何?转换思路或函数贴出来也可!
当然msCOMM的阿事件也不可能触发的阿。请不要乱来,我下了很多demo都不行啊。
更gsm的模块应该没有关系吧。