求救关于PLC通信的编程-专业自动化论坛-中国工控网论坛

求救关于PLC通信的编程点击：732 | 回复：3

budey

精华：0帖
求助：0帖
帖子：2帖 | 2回
年度积分：0
历史总积分：11
注册：2003年1月30日

发表于：2003-04-24 09:40:00

楼主

有谁知道用PLC编写通信程序怎么下手？我的毕业设计课题是“基于VB的上位机与PLC通信研究”。帮帮忙好吗？告诉我一个思路。谢谢！

分享到：

邀请回答

回复楼主

gongkongedit

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

发表于：2003-04-21 10:20:00

1楼

有了这方面的资料能否给我一发一份。我也需要。谢谢！！！

回复引用举报

高-荷塘月色

精华：0帖
求助：0帖
帖子：6帖 | 50回
年度积分：0
历史总积分：70
注册：2002年8月16日

发表于：2003-04-23 12:27:00

2楼

Private Sub SaveData() Dim i As Integer Dim valid As Boolean On Error Resume Next valid = True Data1.Recordset.AddNew Data1.Recordset.Fields("dtime") = TimeSerial(OnHour, OnMinute, OnSecond) Data1.Recordset.Fields("systime") = Time Data1.Recordset.Fields("get_xl") = LF(1) Data1.Recordset.Fields("get_fjs") = LF(2) Data1.Recordset.Fields("get_cs") = LF(3) Data1.Recordset.Fields("get_sys") = LF(4) Data1.Recordset.Fields("get_cj") = LF(5) On Error Resume Next Data1.Recordset.Update ‘更新数据库记录 Data1.Recordset.MovePrevious End Sub

回复引用举报

gongkongedit

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

发表于：2003-04-24 09:40:00

3楼

这一段程序是什么作用？能否解释一下？这样就可以直接和PLC连接通讯了么？

回复引用举报

热门招聘

﻿求救关于PLC通信的编程 ﻿点击：732 | 回复：3

求救关于PLC通信的编程点击：732 | 回复：3