基于Winsock控件實現(xiàn)PLC網(wǎng)絡(luò)通信控制
初始化工作完成后向PLC提出連接請求,待PLC接受請求并發(fā)送應(yīng)答信息后,客戶端程序依照各種幀格式建立好要發(fā)送的信息幀,就可以與PLC進(jìn)行雙向的數(shù)據(jù)交流了。在這一過程中,可建立發(fā)送失敗后的重發(fā)機制,以增強通信的可靠性。
首先,建立并發(fā)送“握手信息”指令(20字節(jié)),指明客戶機節(jié)點號;當(dāng)計算機接收到PLC返回幀(24字節(jié))后,檢查PLC是否收到命令,并取得服務(wù)器和客戶機節(jié)點號。當(dāng)計算機接收到PLC返回的數(shù)據(jù)時,會產(chǎn)生DataArrival事件,參數(shù)BytesTotal包含接收到的數(shù)據(jù)字節(jié)數(shù)。在DataArrival事件中,可以調(diào)用GetData方法接收數(shù)據(jù)。如果接收到Close事件,則用Close方法關(guān)閉連接。另外CONTROL ENGINEERING China版權(quán)所有,可用Winsock的State屬性來反映當(dāng)前TCP/IP的連接狀態(tài)。這里僅列舉主要程序如下:
‘向服務(wù)器請求連接
WskClient.Connect
TimeDelay 100
Do
DoEvents
Loop Until WskClient.state=sckConnected
‘建立并發(fā)送FINS命令幀
Private Sub SendData_Click()
ReDim SendData (19) As Byte
SendData (0) = H46‘FINS命令幀報頭的第1個字節(jié)
……
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ū)⑺@示在文本框中,還可作進(jìn)一步處理。主程序流程圖如圖4所示。
若采用UDP協(xié)議,則通信的基本過程與TCP相同,只是不需要建立連接。此外,UDP應(yīng)用程序可以是客戶機,也可以是服務(wù)器,而不必象TCP應(yīng)用程序那樣必須分別建立客戶機程序和服務(wù)器程序。由于UDP在傳輸數(shù)據(jù)報前不用在客戶和服務(wù)器之間建立一個連接,且沒有超時重發(fā)等機制,故而傳輸速度很快。因此如果網(wǎng)絡(luò)中設(shè)備不是很多,且發(fā)送數(shù)據(jù)量不大時,可選擇耗費計算機“資源”更小的UDP協(xié)議進(jìn)行通信。
5.結(jié)束語
采用Winsock控件實現(xiàn)的上位機以太網(wǎng)通信程序,已成功應(yīng)用于數(shù)字小樣并條機監(jiān)控系統(tǒng)中,該法簡單實用,在不追加投資的情況下,實現(xiàn)車間設(shè)備的網(wǎng)絡(luò)數(shù)據(jù)實時監(jiān)控的功能,達(dá)到了理想的效果。而且以VB作為監(jiān)控軟件的開發(fā)平臺,軟件的二次開發(fā)不受限制,節(jié)約成本,并可根據(jù)需要隨時對程序進(jìn)行升級。為實現(xiàn)對控制系統(tǒng)進(jìn)行有效的信息管理與監(jiān)控,基于以太網(wǎng)的PLC控制系統(tǒng)必將有更為廣泛的應(yīng)用,本文的論述對解決這類問題提供了一定參考價值。
評論