《上位计算机通过以太网发送fins命令》由会员分享，可在线阅读，更多相关《上位计算机通过以太网发送fins命令（5页珍藏版）》请在金锄头文库上搜索。
1、 上位计算机通过以太网发送 FINS 命令有两种方式可以实现 VB 通过以太网读写 PLC 数据 1） 使用 Windows 的以太网 Winsocket 控件实现 2） 通过 OMRON 提供的 Compolet 控件实现 以下通过两种方式分别实现以太网 UDP 发送 FINS 命令一通过 Windows 的 Winsocket 控件：利用 WinSock 控件可以与远程计算机建立连接，并通过用户数据报协议 (UDP)或者 传输控制协议 (TCP)进行数据交换。这两种协议都可以用来创建客户与服务器应用程序。 与 Timer 控件类似，WinSock 控件在运行时是不可见的。 可能的用途： 创
2、建收集用户信息的客户端应用程序，并将收集的信息发送到某中央服务器。 创建一个服务器应用程序，作为多个用户的数据的汇入点。 创建“聊天”应用程序。 选择通讯协议： 在使用 WinSock 控件时，首先需要考虑使用什么协议。可以使用的协议包括 TCP 和 UDP。两种协议之间的重要区别在于它们的连接状态： TCP 协议控件是基于连接的协议，可以将它同电话系统相比。在开始数据传输之前，用户 必须先建立连接。 UDP 协议是一种无连接协议，两台计算机之间的传输类似于传递邮件：消息从一台计算机 发送到另一台计算机，但是两者之间没有明确的连接。另外，单次传输的最大数据量取决 于具体的网络。 到底选择哪一种
3、协议通常是由需要创建的应用程序决定的。下面的几个问题将有助于选择 适宜的协议： 在收发数据的时候，应用程序是否需要得到客户端或者服务器的确认信息？如果需要，使 用 TCP 协议，在收发数据之前先建立明确的连接。 数据量是否特别大（例如图象与声音文件）？在连接建立之后，TCP 协议将维护连接并确 保数据的完整性。不过，这种连接需要更多的计算资源，因而是比较“昂贵”的。 数据发送是间歇的，还是在一个会话内？例如，如果应用程序在某个任务完成的时候需要 通知某个计算机，UDP 协议是更适宜的。UDP 协议适合发送少量的数据。 1 在 VB 中添加 Winsocket 控件2 设定需要的通讯协议和需要的
4、端口：UDP 协议不需要显式的连接。要在两个控件中间发送数据，需要完成以下的三步（在 连接的双方）： 将 RemoteHost 属性设置为另一台计算机的名称。 将 RemotePort 属性设置为第二个控件的 LocalPort 属性。 调用 Bind 方法，指定使用的 LocalPort。 （下面将详细地讨论该方法。 ） 因为两台计算机的地位可以看成“平等的” ，这种应用程序也被称为点到点的。 可以在 Winsocket 的控件属性内设定：通讯协议，RemoteHost 和 RemotePort 以及 LocalPort也可以在 From 的窗口内设定以上属性： With Winsock1.
5、Protocol = sckUDPProtocol.LocalPort = 9600.RemotePort = 9600.Bind 9600End With 3 设定需要发送的 FINS 命令并且发送数据： 在以太网发送的 FINS 命令是二进制的数据，不是 ASCII 数据，命令如下： senddata(0) = &H80senddata(1) = &H0senddata(2) = &H2senddata(3) = “&H“ & Hex(RNet)senddata(4) = “&H“ & Hex(RNode)senddata(5) = &H0senddata(6) = “&H“ & Hex(
6、SNet)senddata(7) = “&h“ & Hex(SNode)senddata(8) = &H0senddata(9) = &H0 以上对应 FINS 命令在以太网上发送时的头代码： For i = 0 To Len(FinsCommand.Text) / 2 - 1senddata(10 + i) = “&H“ & Mid(FinsCommand.Text, 2 * i + 1, 2)Next i 以上将 FINS 命令的 ASCII 数据转换为 16 进制数据 当数据准备好以后，使用 Winsocket 的方法 Senddata 发送数据： Winsock1.senddata s
7、enddata() 4 接受以太网模块返回的数据：Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)Dim recvdata() As ByteWinsock1.GetData recvdata, vbarry + vbByte, bytesTotalEnd Sub使用 Winsock1_DataArrival（）来接受数据，在该事件内使用 GetData 方法接受数 据，并进行分解。 5 在发送 FINS 命令前需要设定以下参数：PLC 以太网的 IP 地址：202.2.250.8 需要访问的远程网络号：1 ；节点号： 8 ；
8、以及源网络号：1；节点号：111 需要发送的 FINS 命令：0101300000000050二通过 OMRON 提供得 Compolet 控件实现 OMRON 提供了可以在 Finsgateway 上运行的 VB 控件，通过该控件可以访问以太网以 及其他网络上的 PLC，只要知道对方的网络号和节点号即可： 1 在 VB 中添加 Compolet FINS 命令控件，2 FinsMsg 发送 FINS 命令： FinsMsg 的方法 send，具体如下： FinsMsg1.sendFinsCommand NetNo.Text, NodeNo.Text, UnitNo.Text, “0501“
9、FinsMsg.sendFinsCommand 网络号，节点号，单元号，Fins 命令 3 FinsMsg 的响应接受： 提供 FinsMsg 的响应事件 FinsMsg1_OnReceive()接受响应，在该函数内使用 FisnMsg.receiveMessgae()接受返回数据 Private Sub FinsMsg1_OnReceive() Dim net As Integer, node As Integer, unit As Integer Text1.Text = FinsMsg1.receiveMessage(net, node, unit, vbString) End Sub4通过以上使用 Compolet 控件可以方便的在 FinsGateway 支持的任何网络上采集数据， 无论是以太网，CLK，串口网络都可以支持
