Omron PLC FINS 通信源代码提供了针对欧姆龙可编程逻辑控制器（PLC）FINS协议进行通讯的详细程序代码，便于用户深入理解其工作原理并实现高效连接。
omron plc fins 通信源码
Private Declare Function WSAGetLastError Lib WSOCK32.DLL () As Long
Private Declare Function WSAStartup Lib WSOCK32.DLL _
(ByVal wVersionRequired As Long, lpWSADATA As WSADATA) As Long
Private Declare Function WSACleanup Lib WSOCK32.DLL () As Long
Private Declare Function gethostname Lib WSOCK32.DLL _
(ByVal szHost As String, ByVal dwHostLen As Long) As Long
Private Declare Function gethostbyname Lib WSOCK32.DLL _
(ByVal szHost As String) As Long
Private Declare Sub CopyMemory Lib kernel32 Alias RtlMoveMemory _
(hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long)
Private ICF As String
Private RSV As String
Private GCT As String
Private DNA As String
Private DA1 As String
Private DA2 As String
Private SNA As String
Private SA1 As String
Private SA2 As String
Private SID As Byte
Private HostNode As String
Private HeaderCode As String
Private DelayTim As String
Private Memory As String
Private CommandCode As String
Private Address As String
Private Bit As String
Private Num As String
Private WriteData As String
Private EndStr As String
Dim EtnFins() As Byte
Dim RevInfo() As Byte
Dim RevInfoStr As String
Dim RevinfoCnt As Long
5星
