PB中串口通讯
2011-08-18 15:24
155 查看
可以使用mscomm32.ocx控件.
脚本如下:
String ls_data
//使用COM1端口。
ole_1.object.CommPort = 1
//设置速率为9600,无奇偶校验,8 位数据,一个停止位。
ole_1.object.Settings = "9600,N,8,1"
//读入整个缓冲区的数据。
ole_1.object.InputLen = 0
打开端口
ole_1.object.PortOpen = True
//发送attention命令
ole_1.object.Output = "ATV1Q0" + char(13)
//等待数据。
Do
Yield()
//从Com端口取数据
ls_data += ole_1.object.Input
LOOP Until(Pos(ls_data, "OK" + char(13) + char (10)) > 0)
//向Com端口发送数据使用Output方法
ole_1.Object.Output = ls_data
//关闭端口。
ole_1.object.PortOpen = FALSE
脚本如下:
String ls_data
//使用COM1端口。
ole_1.object.CommPort = 1
//设置速率为9600,无奇偶校验,8 位数据,一个停止位。
ole_1.object.Settings = "9600,N,8,1"
//读入整个缓冲区的数据。
ole_1.object.InputLen = 0
打开端口
ole_1.object.PortOpen = True
//发送attention命令
ole_1.object.Output = "ATV1Q0" + char(13)
//等待数据。
Do
Yield()
//从Com端口取数据
ls_data += ole_1.object.Input
LOOP Until(Pos(ls_data, "OK" + char(13) + char (10)) > 0)
//向Com端口发送数据使用Output方法
ole_1.Object.Output = ls_data
//关闭端口。
ole_1.object.PortOpen = FALSE
相关文章推荐
- PB中实现串口通讯
- 上次说到用C#实现,这次使用PB实现两个程序之前的通讯,主要的目的还是要实现C#与PB的通讯
- 《连载 | 物联网框架ServerSuperIO教程》-4.如开发一套设备驱动,同时支持串口和网络通讯。附:将来支持Windows 10 IOT
- vc6之串口通讯
- 与初学者探讨VC++串口通讯开发技术
- serialport 控件 串口通讯
- JAVA高级:利用Java实现串口全双工通讯
- 详解linux下的串口通讯开发
- 【工业串口和网络软件通讯平台(SuperIO)教程】六.二次开发导出数据驱动
- 利用java实现串口全双工通讯(转)
- 利用Java实现串口全双工通讯
- linux下判断 串口是否通讯 UART DEBUG
- 用Qt编写一个串口通讯程序
- VC++ 的串口通讯(4)
- 如何用API实现串口通讯
- 串口通讯原理
- 串口通讯—通信协议
- c#写的串口通讯
- 嵌入式面试之RS232-C串口通讯协议解析
- 串口通讯的python模块——pySerial