Foxtable(狐表)用户栏目专家坐堂 → [求助] 关于梅特勒天平取数的问题


  共有2132人关注过本帖平板打印复制链接

主题:[求助] 关于梅特勒天平取数的问题

帅哥哟,离线,有人找我吗?
aidimeng
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:739 积分:7211 威望:0 精华:0 注册:2015/9/14 14:26:00
[求助] 关于梅特勒天平取数的问题  发帖心情 Post By:2018/9/12 14:50:00 [只看该作者]

通关超级终端可以成功连接到梅特勒的天平。但设备不是主动给电脑传数据,需要在设备上按下打印按钮才可以将数据传输给电脑。我查找了相关资料,需要计算机给天平发送指令“SI” 设备才可以把数据传给电脑。
 在fox中 我怎么实现将指令 SI 传给 天平啊

FOX中
Ports.Add("COM3")
Ports("COM3").Open()
'MessageBox.Show(Ports("COM3").Open())
With Ports("COM3")
    .Close()
    .Parity = Parity.None
    .Handshake = Handshake.None
    .StopBits = StopBits.One
    .BaudRate = 9600
    .DataBits = 8
    .ReadBufferSize() = 4096
    .WriteBufferSize() = 2048
    .Open
End With

Ports("COM3").Write(CHR(83))
Ports("COM3").Write(CHR(73))
Ports("COM3").Write(CHR(13))
Ports("COM3").Write(CHR(10))

Dim s As String = Ports("COM3").ReadExisting
Output.Show(s)
MessageBox.Show("1")
Ports("COM3").close()
得不到数值
[此贴子已经被作者于2018/9/12 15:12:41编辑过]

 回到顶部
总数 14 1 2 下一页