设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1881|回复: 9
打印 上一主题 下一主题

[其它] RS232問題

[复制链接]
跳转到指定楼层
1#
发表于 2003-6-3 18:59:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
如何使用rs-232介面通過碼掃描器讀取數據?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2003-6-4 00:28:00 | 只看该作者
Rs-232自己没有界面,界面得你自己弄。
Access有现成的控件,MsComm,可以用它来监听串口,实现起来很不难,看看帮助就基本可以搞定。关键在你那个扫描器,要有完整的说明书,因为接收到的数据多为16进制(AscII的很少),没有详细说明很难转对。
3#
发表于 2003-6-4 02:30:00 | 只看该作者
MSComm控件好像没有帮助,我也正要找这个控件在ACCESS中应用的资料。请说明在帮助的那一章。谢谢!
4#
发表于 2003-6-4 16:28:00 | 只看该作者
msdn中应该有帮助!我曾经用两个月作了一个全面转化AscII的转接控件,可是不小心格式化了,再也做不出来了!
freemanager 兄说的很对,关键是你的扫描仪!
Handshake 常数

常数 值 描述
comNone 0 无握手。
comXonXoff 1 XOn/Xoff 握手。
comRTS 2 Request-to-send/clear-to-send 握手。
comRTSXOnXOff 3 Request-to-send 和 clear-to-send 握手皆可。


OnComm 常数

常数 值 描述
comEvSend 1 发送事件。
comEvReceive 2 接收事件。
comEvCTS 3 clear-to-send 线变化。
comEvDSR 4 data-set ready 线变化。
comEvCD 5 carrier detect 线变化。
comEvRing 6 振铃检测。
comEvEOF 7 文件结束。


Error 常数

常数 值 描述
comEventBreak 1001 接收到中断信号
comEventCTSTO 1002 Clear-to-send 超时
comEventDSRTO 1003 Data-set ready 超时
comEventFrame 1004 帧错误
comEventOverrun 1006 端口超速
comEventCDTO 1007 Carrier detect 超时
comEventRxOver 1008 接收缓冲区溢出
comEventRxParity 1009 Parity 错误
comEventTxFull 1010 传输缓冲区满
comEventDCB 1011 检索端口 设备控制块 (DCB) 时的意外错误


InputMode 常数

常数 值 描述
comInputModeText 0 (缺省)通过 Input 属性以文本方式取回数据。
comInputModeBinary 1 通过 Input 属性以二进制方式检取回数据。


5#
发表于 2003-6-4 20:44:00 | 只看该作者
在access帮助中我找不到有关MSCOMM控件的帮助信息?请提示在帮助的哪一章节中,谢谢。
6#
发表于 2003-6-5 02:03:00 | 只看该作者
请看一看这样的功能如何实现,谢谢。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
7#
发表于 2003-6-5 16:47:00 | 只看该作者
1、access中没有这个帮助!在msdn中就有的!
MSComm 控件示例
下面这个简单的例子演示了用调制解调器进行基本的串行通讯:

Private Sub Form_Load ()
   ' 保存输入子串的缓冲区
   Dim Instring As String
   ' 使用 COM1。
   MSComm1.CommPort = 1
   ' 9600 波特,无奇偶校验,8 位数据,一个停止位。
   MSComm1.Settings = "9600,N,8,1"
   ' 当输入占用时,
   ' 告诉控件读入整个缓冲区。
   MSComm1.InputLen = 0
   ' 打开端口。
   MSComm1.PortOpen = True
   ' 将 attention 命令送到调制解调器。
   MSComm1.Output = "ATV1Q0" & Chr$(13) ' 确保
   ' 调制解调器以"OK"响应。
   ' 等待数据返回到串行端口。
   Do
      DoEvents
   Buffer$ = Buffer$ & MSComm1.Input
   Loop Until InStr(Buffer$, "OK" & vbCRLF)
   ' 从串行端口读 "OK" 响应。

   ' 关闭串行端口。
   MSComm1.PortOpen = False
End Sub

注意   MSComm 控件可以采用轮询或事件驱动的方法从端口获取数据。这个简单的例子使用了轮询方法。关于事件驱动方法的例子请参阅 OnComm 事件的帮助。
在vb档中!

2、你的文件我下不下来!没法看啊!!










8#
发表于 2003-6-5 16:52:00 | 只看该作者

这是个vb的事例!自己看看!我没有办法讲的更简单!这类问题,建议你问问李寻欢斑竹,他是这方面的高手高手高高手!!一定可以解决的!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
9#
发表于 2003-6-6 01:54:00 | 只看该作者
谢谢
10#
 楼主| 发表于 2003-6-6 17:16:00 | 只看该作者
謝謝大家的回复, 請問有這方面的實例嗎? 再次謝謝!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-14 05:23 , Processed in 0.104628 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表