谁想要VB写的PC和PLC的通讯程序-专业自动化论坛-中国工控网论坛

谁想要VB写的PC和PLC的通讯程序点击：5902 | 回复：98

精华：0帖
求助：0帖
帖子：25帖 | 330回
年度积分：0
历史总积分：852
注册：2003年10月23日

发表于：2006-08-16 11:52:00

楼主

写这个程序只是为了在没有软件的情况下，用PC和三菱PLC通讯，可以进行监控输入，输出也可以进行单点，批量写入读出操作，支持FX全系列，Q系列的Q02到Q06H，可以使用COM，ETHERNET，USB通讯协议。如果有特别需要的话，本人愿代写此类工程程序。请大家多多指教！

分享到：

邀请回答

回复楼主

自控小生

精华：0帖
求助：0帖
帖子：54帖 | 204回
年度积分：0
历史总积分：349
注册：2005年11月29日

发表于：2007-04-24 11:11:00

41楼

不错，学习一下，谢谢了！

回复引用举报

gongkongedit

精华：1099帖
求助：0帖
帖子：14392帖 | 54470回
年度积分：0
历史总积分：622
注册：2008年9月08日

发表于：2007-04-24 23:17:00

42楼

  我要一份.!
  谢谢.!
        521denghong@163.com

回复引用举报

gongkongedit

精华：1099帖
求助：0帖
帖子：14392帖 | 54470回
年度积分：0
历史总积分：622
注册：2008年9月08日

发表于：2007-04-24 23:23:00

43楼

我是个初学者./!
请大家关照.!

回复引用举报

水边清浅横枝瘦

精华：0帖
求助：4帖
帖子：78帖 | 3488回
年度积分：8
历史总积分：5664
注册：2006年7月11日

发表于：2007-04-25 08:12:00

44楼

历害，高，太有才了。

回复引用举报

水边清浅横枝瘦

精华：0帖
求助：4帖
帖子：78帖 | 3488回
年度积分：8
历史总积分：5664
注册：2006年7月11日

发表于：2007-04-25 08:22:00

45楼

请问 FX系列中D的地址是什么，我想读D值，发0100回来的是M的值。

回复引用举报

幽灵使者

精华：0帖
求助：0帖
帖子：1帖 | 38回
年度积分：0
历史总积分：219
注册：2004年8月30日

发表于：2007-04-25 13:47:00

46楼

楼主!能不能帮我写个啊!
我用三菱Q00JCPU,71C24通讯模块,我想将托利多600系列的仪表中的重量传到PLC中,怎么做啊

回复引用举报

dbjefn

精华：0帖
求助：0帖
帖子：0帖 | 1回
年度积分：0
历史总积分：4
注册：2007年3月11日

发表于：2007-04-28 18:28:00

47楼

楼主，你好！请问你有VB 与　S7-200之间的通迅控制程序吗？有的可以发个例子给我吗？谢谢！dbjefn@126.com

回复引用举报

StoneChen

精华：0帖
求助：0帖
帖子：25帖 | 330回
年度积分：0
历史总积分：852
注册：2003年10月23日

发表于：2007-05-04 21:08:00

48楼

也不留个联系方式，我怎么告诉你们啊？你们发给我吧
QQ：38680350
MSN:jackychenboy@msn.com
E-Mail:chl2686@163.com

回复引用举报

StoneChen

精华：0帖
求助：0帖
帖子：25帖 | 330回
年度积分：0
历史总积分：852
注册：2003年10月23日

发表于：2007-05-04 21:13:00

49楼

To dbjefn
VB与S7-200的通讯程式我这里没有，真的不好意思！因为西门子的PLC的内部代码没有公开，没有ID也就没有办法来串口通讯。

回复引用举报

444

精华：0帖
求助：0帖
帖子：0帖 | 3回
年度积分：0
历史总积分：3
注册：2006年6月21日

发表于：2007-05-22 11:32:00

50楼

我想要一份:66200866@163.com

回复引用举报

周德

精华：0帖
求助：0帖
帖子：0帖 | 4回
年度积分：0
历史总积分：54
注册：2007年5月22日

发表于：2007-05-22 15:23:00

51楼

你好,我在搞毕业设计,我能要一份吗？
zhouduck2003@163.com

回复引用举报

StoneChen

精华：0帖
求助：0帖
帖子：25帖 | 330回
年度积分：0
历史总积分：852
注册：2003年10月23日

发表于：2007-05-25 11:07:00

52楼

请查收您的邮箱！有问题QQ：38680350

回复引用举报

FanRan630

精华：0帖
求助：1帖
帖子：9帖 | 72回
年度积分：0
历史总积分：66
注册：2003年6月18日

发表于：2007-05-26 12:20:00

53楼

楼主，我正在做一个工程，其中就有FX1n-60MR，刚刚才看到您的大作，有点儿喜出望外的感觉，是否可以给我一份呢？先谢谢了！！
我的邮箱是ylrobert@126.com，再次谢谢！等待......

回复引用举报

StoneChen

精华：0帖
求助：0帖
帖子：25帖 | 330回
年度积分：0
历史总积分：852
注册：2003年10月23日

发表于：2007-05-28 18:40:00

54楼

代码已经在论坛里了，不清楚QQ：38680350

回复引用举报

小菜kkk

精华：13帖
求助：0帖
帖子：54帖 | 123回
年度积分：0
历史总积分：271
注册：2003年11月05日

发表于：2007-06-04 14:56:00

55楼

谢谢 idnfmmfe 兄弟，居然还记得我的作品，不过我现在已经离开上海理工大学了，现在又完善了新的版本,解决了以前的单线程卡死的问题。

回复引用举报

牛头人

精华：3帖
求助：0帖
帖子：55帖 | 134回
年度积分：0
历史总积分：436
注册：2001年4月30日

发表于：2007-06-04 16:18:00

56楼

jackychen：的文章不错，我推荐大家了解三菱MX-COMPONENT控件，可以问三菱代理提供

回复引用举报

牛头人

精华：3帖
求助：0帖
帖子：55帖 | 134回
年度积分：0
历史总积分：436
注册：2001年4月30日

发表于：2007-06-04 16:22:00

57楼

尤其读取二进制的这部分，可以用下列函数来实现：Devbox(0) = "X88"
Devbox(1) = "X89"
Devbox(2) = "X8A"
Devbox(3) = "X8B"
Devbox(4) = "X8C"
Devbox(5) = "X8D"
Devbox(6) = "X8E"
Devbox(7) = "X8F"
Devbox(8) = "D61"
Devbox(9) = "D1"
Devbox(10) = "D3"
Devbox(11) = "W210"
Devbox(12) = "W212"
Devbox(13) = "W0"
Devbox(14) = "W200"
Devbox(15) = "W400"

For W = 0 To Isize - 1
  szDeviceList = szDeviceList + Devbox(W)
  If W <> Isize Then
    szDeviceList = szDeviceList + vbLf
    End If
    Next
  IRet = QJ71E71.ReadDeviceRandom(szDeviceList, Isize, IDataR(0))

回复引用举报

牛头人

精华：3帖
求助：0帖
帖子：55帖 | 134回
年度积分：0
历史总积分：436
注册：2001年4月30日

发表于：2007-06-04 16:23:00

58楼

用下列方式来实现位元件的读取，比较方便
Devbox(0) = "X88"
Devbox(1) = "X89"
Devbox(2) = "X8A"
Devbox(3) = "X8B"
Devbox(4) = "X8C"
Devbox(5) = "X8D"
Devbox(6) = "X8E"
Devbox(7) = "X8F"
Devbox(8) = "D61"
Devbox(9) = "D1"
Devbox(10) = "D3"
Devbox(11) = "W210"
Devbox(12) = "W212"
Devbox(13) = "W0"
Devbox(14) = "W200"
Devbox(15) = "W400"

For W = 0 To Isize - 1
  szDeviceList = szDeviceList + Devbox(W)
  If W <> Isize Then
    szDeviceList = szDeviceList + vbLf
    End If
    Next
  IRet = QJ71E71.ReadDeviceRandom(szDeviceList, Isize, IDataR(0))

回复引用举报

牛头人

精华：3帖
求助：0帖
帖子：55帖 | 134回
年度积分：0
历史总积分：436
注册：2001年4月30日

发表于：2007-06-04 16:25:00

59楼

如果需要控件，可以联系工控联盟 QQ群15658672

回复引用举报

StoneChen

精华：0帖
求助：0帖
帖子：25帖 | 330回
年度积分：0
历史总积分：852
注册：2003年10月23日

发表于：2007-06-04 19:47:00

60楼

谢谢牛头人，本人QQ：38680350

回复引用举报

热门招聘

﻿谁想要VB写的PC和PLC的通讯程序 ﻿点击：5902 | 回复：98

谁想要VB写的PC和PLC的通讯程序点击：5902 | 回复：98