資源簡介
1.Prodave 是用于pc 與s7 系列plc 之間的數據鏈接通信的工具箱。其實質就是用戶通過調用“w95_s7.dll”等庫函數來解決 PLC 與PC之間的數據交換和數據處理問題。 所需硬件為:CPU22x,PC/PPI編程電纜,帶COM口的PC。這可能是最簡單的配置,很容易實現試驗的目的。這里不需要安裝Prodave軟件,只要把“w95_s7.dll”文件拷貝到您程序相應的目錄中去即可。2.通訊設置:打開“控制面板”中“設置PG/PC接口”選項,在“應用程序訪問點”列表框內選擇“S7ONLINE (STEP7) PC/PPI Cable”,在其屬性內的“超時”可以設置大點,這里設置為100ms,“波特率”設置為9.6kbps(因為我的pc/ppi電纜為國產的,不支持多主站),“地址”為0。3。源代碼:①PLC程序:LD I0.0 MOVW 4766, VW0 ②VB程序:
****在模塊中聲明****:
Public plcadr As plcadrtype
Public gb_PlcConnected As Boolean
Type plcadrtype
adr As Byte ‘站地址,默認值為2
SEGMENTID As Byte ‘段標識符,固定值為0
SLOTNO As Byte ‘槽的編號,默認值為2
RACKNO As Byte ‘機架號,固定為0
End Type
Public Res As Long
Declare Function load_tool Lib "w95_s7.dll" (ByVal nr As Byte, ByVal dev As String, adr As plcadrtype) As Long
。。。。。。。 ‘省略其它定義函數。
Declare Function as200_vs_field_read Lib "w95_s7.dll" (ByVal nr As Long, ByVal anz As Long, value As Byte) As Long ‘讀200PLC V存儲區的數據函數
****在窗體中聲明****
Private Sub Form_Load()
Dim buffer(1) As Byte
plcadr.adr = 2
plcadr.SEGMENTID = 0
plcadr.SLOTNO = 2
plcadr.RACKNO = 0
Res = load_tool(1, "S7ONLINE", plcadr)
Res = as200_vs_field_read(0, 2, buffer(0))
If Res 0 Then
MsgBox ("PLC連接錯誤")
gb_PlcConnected = False
Else
gb_PlcConnected = True
MsgBox ("plc連接正確")
Label1.Caption = buffer(0) * 256 + buffer(1)
End If
End Sub
通過以上程序可以正確讀出PLC中的數據。之后可以擴展內容,編寫一個監控軟件。

代碼片段和文件信息
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件?????110592??2001-03-26?11:33??用VB編寫PC與S7-200通訊軟件,帶原代碼\VB程序\W95_s7.dll
?????文件??????20480??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\VB程序\試驗.exe
?????目錄??????????0??2007-08-29?14:45??用VB編寫PC與S7-200通訊軟件,帶原代碼\VB程序
?????文件?????110592??2001-03-26?11:33??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\W95_s7.dll
?????文件???????2254??2007-08-29?13:26??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\Module1.bas
?????文件?????????80??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\工程1.vbw
?????文件???????1167??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\Form1.frm
?????文件????????717??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\工程1.vbp
?????文件????????190??2007-08-29?09:28??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\MSSCCPRJ.SCC
?????目錄??????????0??2007-08-29?14:46??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼
?????文件???????1305??2007-08-29?13:53??用VB編寫PC與S7-200通訊軟件,帶原代碼\項目1.mwp
?????目錄??????????0??2007-10-18?16:02??用VB編寫PC與S7-200通訊軟件,帶原代碼
?????文件??????23040??2007-10-18?16:04??用VB編寫PC與S7-200通訊軟件,帶原代碼\150556.doc
-----------?---------??----------?-----??----
???????????????270417????????????????????13
-----------?---------??----------?-----??----
?????文件?????110592??2001-03-26?11:33??用VB編寫PC與S7-200通訊軟件,帶原代碼\VB程序\W95_s7.dll
?????文件??????20480??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\VB程序\試驗.exe
?????目錄??????????0??2007-08-29?14:45??用VB編寫PC與S7-200通訊軟件,帶原代碼\VB程序
?????文件?????110592??2001-03-26?11:33??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\W95_s7.dll
?????文件???????2254??2007-08-29?13:26??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\Module1.bas
?????文件?????????80??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\工程1.vbw
?????文件???????1167??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\Form1.frm
?????文件????????717??2007-08-29?14:43??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\工程1.vbp
?????文件????????190??2007-08-29?09:28??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼\MSSCCPRJ.SCC
?????目錄??????????0??2007-08-29?14:46??用VB編寫PC與S7-200通訊軟件,帶原代碼\源代碼
?????文件???????1305??2007-08-29?13:53??用VB編寫PC與S7-200通訊軟件,帶原代碼\項目1.mwp
?????目錄??????????0??2007-10-18?16:02??用VB編寫PC與S7-200通訊軟件,帶原代碼
?????文件??????23040??2007-10-18?16:04??用VB編寫PC與S7-200通訊軟件,帶原代碼\150556.doc
-----------?---------??----------?-----??----
???????????????270417????????????????????13
- 上一篇:VB開發的一個溫度采集程序,含源碼
- 下一篇:串口接收+實時曲線VB6 源碼
評論
共有 條評論