基于Winsock控件實現(xiàn)PLC網(wǎng)絡(luò)通信控制設(shè)計方法
加入技術(shù)交流群
4.通信程序的具體實現(xiàn)
在新建VB工程后，需要執(zhí)行VB工具欄“工程/部件” 命令www.cechina.cn，將Winsock控件添加到工程中， 并命名為“WskClient”。程序采用TCP/IP協(xié)議進行通信，其主要屬性設(shè)定如下：
With WskClient
.Protocol = sckTCPProtocol ‘采用TCP/IP協(xié)議
.LocalPort = 9600 ‘本地計算機端口號
.RemoteHost = txtIP.Text ‘取得遠程PLC的IP地址
.RemotePort = txtPort.Text ‘遠程PLC端口號
.Bind 9600 ‘指定使用的本地端口
End With
初始化工作完成后向PLC提出連接請求，待PLC接受請求并發(fā)送應(yīng)答信息后，客戶端程序依照各種幀格式建立好要發(fā)送的信息幀，就可以與PLC進行雙向的數(shù)據(jù)交流了。在這一過程中控制工程網(wǎng)版權(quán)所有，可建立發(fā)送失敗后的重發(fā)機制，以增強通信的可靠性。
首先控制工程網(wǎng)版權(quán)所有，建立并發(fā)送“握手信息”指令（20字節(jié)），指明客戶機節(jié)點號;當(dāng)計算機接收到PLC返回幀（24字節(jié)）后，檢查PLC是否收到命令
控制工程網(wǎng)版權(quán)所有
，并取得服務(wù)器和客戶機節(jié)點號。當(dāng)計算機接收到PLC返回的數(shù)據(jù)時
控制工程網(wǎng)版權(quán)所有
，會產(chǎn)生DataArrival事件，參數(shù)BytesTotal包含接收到的數(shù)據(jù)字節(jié)數(shù)。在DataArrival事件中，可以調(diào)用GetData方法接收數(shù)據(jù)。如果接收到Close事件，則用Close方法關(guān)閉連接。另外，可用Winsock的State屬性來反映當(dāng)前TCP/IP的連接狀態(tài)。這里僅列舉主要程序如下：
‘向服務(wù)器請求連接
WskClient.Connect
TimeDelay 100
nbsp; Do
DoEvents
Loop Until WskClient.state=sckConnected
‘建立并發(fā)送FINS命令幀
Private Sub SendData_Click（）
ReDim SendData （19） As Byte
SendData （0） = H46‘FINS命令幀報頭的第1個字節(jié)
n
bsp; ……
WskClient.SendData SendData（） ‘發(fā)送FINS命令幀
End Sub
‘接收PLC響應(yīng)幀，并分析數(shù)據(jù)
Private Sub WskClient_DataArrival（ByVal bytesTotal As Long）
Dim i As Integer
ReDim ArriveData（bytesTotal） As Byte
wsk.GetData ArriveData
, vbArray + vbByte, bytesTotal
‘接收數(shù)據(jù)，保存在ArriveData數(shù)組中
For i = 0 To bytesTotal - 1
txtArData.Text = txtArData.Text ArriveData （i）
Next i
……‘其它數(shù)據(jù)處理
If ArriveData（7） > 16 Then
MsgBox“接收信息丟失“
ElseIf SendData（19）= ArriveData （bytesTotal-5） Then
MsgBox“節(jié)點地址錯誤“
End If
End If
在接收信息后,當(dāng)PLC收到傳輸過去的信息后,會將對應(yīng)的命令反饋值傳回,這個事件程序內(nèi)的程序?qū)⑺@示在文本框中,還可作進一步處理。主程序流程圖如圖4所示。本文引用地址：http://cafeforensic.com/article/202677.htm
圖4 程序流程圖
若采用UDP協(xié)議，則通信的基本過程與TCP相同，只是不需要建立連接。此外,UDP應(yīng)用程序可以是客戶機,也可以是服務(wù)器控制工程網(wǎng)版權(quán)所有,而不必象TCP應(yīng)用程序那樣必須分別建立客戶機程序和服務(wù)器程序。由于UDP在傳輸數(shù)據(jù)報前不用在客戶和服務(wù)器之間建立一個連接，且沒有超時重發(fā)等機制，故而傳輸速度很快。因此如果網(wǎng)絡(luò)中設(shè)備不是很多，且發(fā)送數(shù)據(jù)量不大時，可選擇耗費計算機“資源”更小的UDP協(xié)議進行通信。
5.結(jié)束語
采用Winsock控件實現(xiàn)的上位機以太網(wǎng)通信程序，已成功應(yīng)用于數(shù)字小樣并條機監(jiān)控系統(tǒng)中，該法簡單實用,在不追加投資的情況下,實現(xiàn)車間設(shè)備 的網(wǎng)絡(luò)數(shù)據(jù)實時監(jiān)控的功能，達到了理想的效果。而且以VB作為監(jiān)控軟件的開發(fā)平臺，軟件的二次開發(fā)不受限制，節(jié)約成本控制工程網(wǎng)版權(quán)所有，并可根據(jù)需要隨時對程序進行升級。為實現(xiàn)對控制系統(tǒng)進行有效的信息管理與監(jiān)控，基于以太網(wǎng)的PLC控制系統(tǒng)必將有更為廣泛的應(yīng)用，本文的論述對解決這類問題提供了一定參考價值。
評論