-
-
-
liujianfa0062 | 当前状态：离线
总积分：59 2024年可用积分：0
注册时间： 2007-03-11
最后登录时间： 2007-03-11
-
-
LG k120s与vb MSCOMM的通讯问题
liujianfa0062 发表于 2007/3/15 20:49:24 1196 查看 3 回复 [上一主题] [下一主题]
手机阅读
求助
敝公司原本有一批120s等PLC在用，现考虑再采购一批，将它们连接起来做自动化控制，想用VB做操作界面。但在用VB的MSCOMM控件时，发出指令到120s没反应，其指令如下：
MSComm1.Output = "ENQ" & "0" & "R" & "SS" & "01" & "05" & "%MT001" & "EOT" & "BCC" & vbCr
在串口调试助手里发 ENQ H00 R SS H01 H06 %MT001 EOT BCC 也没反应。
我用KGL-WC软件可正常上下载程序。
请问是否我发的指令有问题？本人基础较浅，看k120s操作手册实在不太明白。
如有回复，可否直接发至我的邮箱？
如蒙指教，感激不尽。
下面是我最近试的代码，PLC还是没反应，请各位高手高抬贵眼，帮忙看看问题到底出在那里啊。
Private Sub Form_Load()
Dim outdata As Variant
Dim InString As String
MSComm1.CommPort = 4
MSComm1.Settings = "9600,N,8,1"
MSComm1.OutBufferCount = 0 '清空发送缓冲区
MSComm1.InBufferCount = 0 '清空接收缓冲区
MSComm1.PortOpen = True '打开串行口
outdata = Chr(5) + "303072535330313036254D57313030" + Chr(4) '读M0100的状态
MSComm1.Output = outdata
MSComm1.InputLen = 0
If MSComm1.InBufferCount Then ' 将返回数据放在文本框
InString = MSComm1.Input
End If Text1.Text = InString
MSComm1.PortOpen = False ' 关闭串行端口。
End Sub
我的邮箱：jfliu0062@sohu.com
-
-
-
-
ytzidonghua | 当前状态：在线
总积分：11263 2024年可用积分：6
注册时间： 2006-09-18
最后登录时间： 2024-08-02
-
-
ytzidonghua 发表于 2007/3/12 13:12:50
高手帮忙给看看2楼 回复本楼
引用 ytzidonghua 2007/3/12 13:12:50 发表于2楼的内容
-
-
-
-
-
liujianfa0062 | 当前状态：离线
总积分：59 2024年可用积分：0
注册时间： 2007-03-11
最后登录时间： 2007-03-11
-
-
liujianfa0062 发表于 2007/3/14 1:19:53
小弟试了很久都不行，主要问题在命令的格式上，请各位高手帮帮手吧，谢啦3楼 回复本楼
引用 liujianfa0062 2007/3/14 1:19:53 发表于3楼的内容
-
-
-
-
-
liujianfa0062 | 当前状态：离线
总积分：59 2024年可用积分：0
注册时间： 2007-03-11
最后登录时间： 2007-03-11
-
-
liujianfa0062 发表于 2007/3/15 20:49:24
次问题已将解决，多谢版主费心。4楼 回复本楼
引用 liujianfa0062 2007/3/15 20:49:24 发表于4楼的内容
-