当前位置：工控论坛 > > 产品 > PLC > 三菱(Mitsubishi)PLC

PLC与计算机的通信 点击：1440 | 回复：9



龙五

    
  • 精华：0帖
  • 求助：0帖
  • 帖子：4帖 | 5回
  • 年度积分：0
  • 历史总积分：67
  • 注册：2005年4月15日
发表于：2005-05-12 11:42:00
楼主
请教各位高手，我现在在搞计算机与PLC的通信，PLC是三菱FXIN的，计算机编程是用VB，PLC的数据发送地址是（D123，D124），数据接收地址是（D120，D121），发送数据为四各字节，由于本人对VB不是很精通，又没找到这方面的书籍，所以请高手们指点下用VB如何编程，谢谢了
分享到：
收藏 邀请回答 回复楼主 举报



小菜kkk

  • 精华：13帖
  • 求助：0帖
  • 帖子：54帖 | 123回
  • 年度积分：0
  • 历史总积分：271
  • 注册：2003年11月05日
发表于：2005-05-12 16:57:00
1楼
1、照你的用法,就必须用BD板了,自己编写协议.例如: &H02 0123(D123的数据) 0124(D124的数据) &H03 2、用现成的PLC通讯DLL/OCX，这是最方便的，你不用了解PLC内部通讯工作原理。 可以用MSN加我讨论：jhonhwa@hotmail.com
回复 引用 举报

大可長弓

  • 精华：0帖
  • 求助：0帖
  • 帖子：0帖 | 8回
  • 年度积分：0
  • 历史总积分：8
  • 注册：2005年5月07日
发表于：2005-05-12 17:47:00
2楼
我也想和你讨论一下，行不？？
回复 引用 举报

龙五

  • 精华：0帖
  • 求助：0帖
  • 帖子：4帖 | 5回
  • 年度积分：0
  • 历史总积分：67
  • 注册：2005年4月15日
发表于：2005-05-12 17:57:00
3楼
我没有ＭＳＮ帐号，可以用ＱＱ讨论吗？我的ＱＱ是：346771681
回复 引用 举报

子昕

  • 精华：0帖
  • 求助：0帖
  • 帖子：1帖 | 8回
  • 年度积分：0
  • 历史总积分：164
  • 注册：2004年5月21日
发表于：2005-05-18 15:23:00
4楼
我做过一些VB与PLC通讯的项目，用编程口协议，可以省下买通讯板的钱
回复 引用 举报

csnzy

  • 精华：0帖
  • 求助：0帖
  • 帖子：21帖 | 85回
  • 年度积分：0
  • 历史总积分：456
  • 注册：2002年6月16日
发表于：2005-05-19 11:21:00
5楼
哎呀！我测了一下sc-09电缆，自己焊了一根，可是通讯老是不稳定 不知哪位有sc-09的接线图，能否提供一下！ 我是用它和上位机的程序做数据通讯。这种电缆最长多少，我要 用5米长
回复 引用 举报

micke（深圳）

  • 精华：0帖
  • 求助：0帖
  • 帖子：0帖 | 281回
  • 年度积分：0
  • 历史总积分：362
  • 注册：2003年10月10日
发表于：2005-05-23 09:06:00
6楼
我用VB写过好多个这样的程序，而且我还下载到了一个控件，直接调用几个函数就可以实现PC通过PLC的编程口读写PLC内的所有存储器。PLC中不用编写任何与PC访问有关的程序，而且也不用作任何设置（对于编程口的模式）！VB中的MSCOM控件设置成：9600，e,7,1(只能用这个）。通信协议到处都可以下载到。
回复 引用 举报

朱海峰

  • 精华：0帖
  • 求助：0帖
  • 帖子：2帖 | 53回
  • 年度积分：45
  • 历史总积分：815
  • 注册：2007年1月30日
发表于：2007-07-14 23:09:00
7楼

   Word = hex(....)
   Sd = ENQ + "00FFWW5D" + 0123 + "02" + Word
   frmMain.Rscom.Output = Sd
   Twrite = 1
   Timer1.Interval = 80
   Timer1.Enabled = True
Delay: DoEvents
   If Twrite = 1 Then GoTo Delay
   Timer1.Enabled = False
   RD = frmMain.Rscom.Input
   If Left(RD, 5) = ACK + "00FF" Then exit sub

.........
 SD = ENQ + "00FFWR3D0120" + "02"
  Moncom.Output = SD
  Tread = 1
  Timer2.Interval = 100
  Timer2.Enabled = True
Delay4: DoEvents
  If Tread = 1 Then GoTo Delay4
  Timer2.Enabled = False
  RDD = Moncom.Input
  If Left(RDD, 5) = STX + "00FF" Then EXIT SUB
...............看一下FX的通讯手册把这两段程序看懂了就可以了









回复 引用 举报

TZ筱筱

  • 精华：0帖
  • 求助：1帖
  • 帖子：22帖 | 347回
  • 年度积分：0
  • 历史总积分：1169
  • 注册：2006年11月25日
发表于：2007-07-14 23:37:00
8楼
我也想学学
回复 引用 举报

hanbing

  • 精华：0帖
  • 求助：0帖
  • 帖子：28帖 | 69回
  • 年度积分：0
  • 历史总积分：215
  • 注册：2005年9月25日
发表于：2007-07-16 21:38:00
9楼
刚刚发了个例子,可以去参考一下,有什么问题一起讨论
回复 引用 举报

热门招聘
相关主题

官方公众号
智造工程师