广告广告
  加入我的最爱 设为首页 风格修改
首页 首尾
 手机版   订阅   地图  繁体 
您是第 11092 个阅读者
 
发表文章 发表投票 回覆文章
  可列印版   加为IE收藏   收藏主题   上一主题 | 下一主题   
jack9685 手机
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x1 鲜花 x11
分享: 转寄此文章 Facebook Plurk Twitter 版主评分 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片
推文 x1
[Basic][范例] GSM模组之简讯自动接收模组
闲话:
因参加中小学科学展,
须要用到GSM模组,
可是在网路上有关GSM模组的资料实在是少呀= =~
直到最近才完成了简讯接收模组,
为了让大家能够更快的了解如何使用GSM模组的简讯功能,
所以就在此发布啦!
(原想发到Planet Source Code,但是英文能力太差没办法...orz)

说明:
1.
首先,
当MSCOMM接收到一笔资料时,
会将这笔资料储存在接收暂存区(InBuffer)内,
这时MSCOMM的InBufferCount就会有所变动,
InBufferCount的数值为暂存区中的资料大小,
这个资料会一直存放到程式关闭或使用Input读取后,
才会清空,
如果这边不弄清楚,在做接收动作时会很麻烦的!

2.[如何完整存取MSCOMM接收暂存区中的资料]
从前我在读取的时候发生过一项很严重的问题,
就是我无法完整的读取接受暂存区中的资料,
一开始我使用的方法是:

Private Sub Timer1_Timer()
If GSMComm.InBufferSize <> 0 Then
Text1.Text = Text1.Text & GSMComm.Input & vbCrLf
End If
End Sub

看出有什么问题了吗?
没错,如果MSCOMM的读取速度不够快,
我只会收到断断续续的文字,
这个问题如何处理让我苦脑了很久,
后来我终于想到啦(~><~)!

Private Sub TimerGSM_Timer()

If GSMInBuff = GSMComm.InBufferCount And GSMInBuff <> 0 Then

TextLeftMsg.Text = TextLeftMsg.Text & TextNowMsg.Text

TextNowMsg.Text = GSMComm.Input

End If

Else

GSMInBuff = GSMComm.InBufferCount

End If

End Sub

动作说明~

第一次判断:
GSMInBuff = GSMComm.InBufferCount And GSMInBuff <> 0 不成立,
因为两者虽然相同但GSMInBuff = 0,
执行GSMInBuff = GSMComm.InBufferCount,
这个动作是设定GSMInBuff为GSMComm.InBufferCount,
以检查资料是否有变动。

第二次判断(假设有收到资料,但未收完,GSMComm.InBufferCount = 1 ):
GSMInBuff = GSMComm.InBufferCount And GSMInBuff <> 0 不成立,
因为两者不相同且GSMInBuff = 0,
执行GSMInBuff = GSMComm.InBufferCount
此时GSMInBuff = 1

第三次判断(假设有收到资料,已经收完了,GSMComm.InBufferCount = 4 ):
GSMInBuff = GSMComm.InBufferCount And GSMInBuff <&g ..

访客只能看到部份内容,免费 加入会员 或由脸书 Google 可以看到全部内容



[ 此文章被jack9685在2005-05-04 15:46重新编辑 ]

此文章被评分,最近评分记录
财富:200 (by codeboy) | 理由: 实在感谢您...给你拍拍手...请再多多po文喔~
财富:0 (by 三仙) | 理由: 因为您的参与,让程式设计更容易!! ^^



献花 x2 回到顶端 [楼 主] From:台湾教育部 | Posted:2005-05-04 15:24 |
ziele 手机
个人文章 个人相簿 个人日记 个人地图
初露锋芒
级别: 初露锋芒 该用户目前不上站
推文 x1 鲜花 x32
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

请问你是GSM MODEN 还是一般的MODEN写的?


献花 x0 回到顶端 [1 楼] From:台湾台湾索尼 | Posted:2005-09-06 21:48 |
herolin
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x0 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

给你鼓鼓掌   利害喔!! 表情


献花 x0 回到顶端 [2 楼] From:台湾 | Posted:2008-10-13 23:34 |
xzxz444
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x0 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

太厉害了 非常的感谢你


献花 x0 回到顶端 [3 楼] From:台湾 | Posted:2009-07-14 18:00 |
sandrahuang
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x0 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

厉害厉害拍手拍手


献花 x0 回到顶端 [4 楼] From:欧洲 | Posted:2010-07-18 13:51 |

首页  发表文章 发表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.074297 second(s),query:16 Gzip disabled
本站由 瀛睿律师事务所 担任常年法律顾问 | 免责声明 | 本网站已依台湾网站内容分级规定处理 | 连络我们 | 访客留言