思思久久96热在精品国产10-思思久久96热在精品国产免费-思思久久99-思思久久99热-一级毛片免费观看视频-一级毛片免费看

ysusy
級(jí)別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看ysusy的 主題 / 回貼
樓主  發(fā)表于: 2008-12-28 14:36
想用PC直接對PLC進(jìn)行讀寫操作,想用PRODAVE,照寫了網(wǎng)上的一個(gè)例子[如下],但是沒有實(shí)現(xiàn),PS:我的PPI電纜是U口的,
如果不用這個(gè)方法,直接在VB下用自由口通信,哪位朋友能給個(gè)示例程序么,謝謝了
來自網(wǎng)上的一個(gè)例子
“最近要做一個(gè)項(xiàng)目,使用S7-200,用VB編寫程序,來調(diào)用w95_s7.dll動(dòng)態(tài)鏈接數(shù)據(jù)庫。通過3天的努力,終于小有成果,一下是我試驗(yàn)基本方法。供大家參考!
1.Prodave 是用于pc 與s7 系列plc 之間的數(shù)據(jù)鏈接通信的工具箱。其實(shí)質(zhì)就是用戶通過調(diào)用“w95_s7.dll”等庫函數(shù)來解決 PLC 與PC之間的數(shù)據(jù)交換和數(shù)據(jù)處理問題。 所需硬件為:CPU22x,PC/PPI編程電纜,帶COM口的PC。這可能是最簡單的配置,很容易實(shí)現(xiàn)試驗(yàn)的目的。這里不需要安裝Prodave軟件,只要把“w95_s7.dll”文件拷貝到您程序相應(yīng)的目錄中去即可。
2.通訊設(shè)置:打開“控制面板”中“設(shè)置PG/PC接口”選項(xiàng),在“應(yīng)用程序訪問點(diǎn)”列表框內(nèi)選擇“S7ONLINE (STEP7)  PC/PPI Cable”,在其屬性內(nèi)的“超時(shí)”可以設(shè)置大點(diǎn),這里設(shè)置為100ms,“波特率”設(shè)置為9.6kbps(因?yàn)槲业膒c/ppi電纜為國產(chǎn)的,不支持多主站),“地址”為0。
3。源代碼:①PLC程序:LD  I0.0   MOVW  4766, VW0 ②VB程序:
****在模塊中聲明****:
Public plcadr As plcadrtype
Public gb_PlcConnected As Boolean
Type plcadrtype
     adr As Byte                ‘站地址,默認(rèn)值為2
     SEGMENTID As Byte       ‘段標(biāo)識(shí)符,固定值為0
     SLOTNO As Byte           ‘槽的編號(hào),默認(rèn)值為2
     RACKNO As Byte           ‘機(jī)架號(hào),固定為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
。。。。。。。                  ‘省略其它定義函數(shù)。
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存儲(chǔ)區(qū)的數(shù)據(jù)函數(shù)
****在窗體中聲明****
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連接錯(cuò)誤")
        gb_PlcConnected = False
    Else
        gb_PlcConnected = True
        MsgBox ("plc連接正確")
        Label1.Caption = buffer(0) * 256 + buffer(1)
    End If
End Sub
通過以上程序可以正確讀出PLC中的數(shù)據(jù)。之后可以擴(kuò)展內(nèi)容,編寫一個(gè)監(jiān)控軟件。”

主站蜘蛛池模板: 黄子片在线观看免费网站 | 国产伦一区二区三区免费 | 成人αv在线视频高清 | 免费a级在线观看完整片 | 久久99热成人精品国产 | 久久久久久福利 | 国产小视频在线观看 | 成人日韩精品 | 久久国产片 | 久久九九八八色偷偷 | 久久久全国免费视频 | 国产社区| 久久午夜精品视频 | 久久久99精品久久久 | 国产欧美日韩不卡 | 久久99国产乱子伦精品免费 | 国产在线高清不卡免费播放 | 精品国产免费人成在线观看 | 国内成人精品视频 | 欧美a视频在线观看 | 国产成人免费网站在线观看 | 国产精品99久久久 | 国产精品91在线播放 | 老司机一级毛片 | 老妇激情毛片免费 | 久久夜夜| 麻豆国产原创剧情精品 | 美女被免费网站在线视频免费 | 国产成人 免费观看 | 女人精aaaa片一级毛片女女 | 久久9999国产精品免费 | 国产欧美日韩在线一区二区不卡 | 久久精品嫩草影院免费看 | 美女黄网站人色视频免费国产 | 免费高清精品国偷自产在线 | 成年女人午夜免费视频 | 久久久久久毛片免费播放 | 国产麻豆a一级毛片爽爽影院 | 精品一区二区三区在线观看 | 国产精品免费观看视频播放 | 国产欧美综合精品一区二区 |