你现在位置：首页>技术论文>数据通讯>正文
如何通过VB以DDE方式与AB PLC进行通讯？
日期：2006-7-10 22:34:27 来源：本站整理  
点击： 作者：未知
点击【 大 中 小 】放大字体.
   如何通过VB以DDE方式与AB PLC进行通讯？ 
WWW.PLCJS.COM——可编程控制器技术门户

——可——编——程——控－制－器－技——术——门——户

  如何使用Excel通过 DDE VBA方式访问Allen Bradley PLC? 
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)

  首先必须先安装RS Linx创建DDE topic. 比如我们定义一个topic名叫“N1”
WW.W_PLC※JS_C,OM－PL,C－技.术_网

plcjs.技.术_网

WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)

<<<<<<<<<<<<开始>>>>>>>>>>>>>>>>>>>>>
WWW.PLCJS.COM——可编程控制器技术门户

WWW_PL※CJS_COM－PLC－技.术_网

Public Const DDETOPIC As String = "DDE"
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

Sub DDEreadStation1()
WWW_P※LCJS_CO※M－PLC－技－.术_网

On Error GoTo MessageRSLinxDead:
WWW_PLCJS@_COM%－PLC－技.术_网

plcjs.技.术_网

    make sure the DDE Channel is Closed before we define a Topic channel
W1WW_P4LCJS_COM－PLC－技.术_网

    txtStat1Force.LinkMode = 0
WWW_PLCJS_COM－PLC－技.术_网

    txtStat1Status.LinkMode = 0
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

    
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)

    set the Application and Topic of the Control Property
P.L.C.技.术.网——可编程控制器技术门户

    DDETOPIC is a Public Constant in MainSubs Module
WWW_PLCJS_COM－PLC－技.术_网

    I might use a configuration file later and let the user set this
WWW_P※LCJS_CO※M－PLC－技－.术_网

    txtStat1Force.LinkTopic = "RSLinx|" & N1
WW.W_PLC※JS_C,OM－PL,C－技.术_网

    txtStat1Status.LinkTopic = "RSLinx|" & N1
plcjs.技.术_网

    
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

    set the Address of the PLC we want to read
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)

    txtStat1Force.LinkItem = "N7:1"
WW.W_PLCJS_COM－PLC－技.术_网

    txtStat1Status.LinkItem = "B3:1/1"
WWW.PLCJS.COM——可编程控制器技术门户

    
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)

    set the DDE mode to COLD Link, we will request the data manually
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

    txtStat1Force.LinkMode = 2
WWW_PLCJS@_COM%－PLC－技.术_网

    txtStat1Status.LinkMode = 2
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)

    
WWW_P※LCJS_COM－PLC－)技.术_网

    tell VB to get the data from the PLC NOW!
WWW_P※LCJS_CO※M－PLC－技－.术_网

    txtStat1Force.LinkRequest
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)

    txtStat1Status.LinkRequest
——可——编——程——控－制－器－技——术——门——户

    txtStat1TimeStamp.Text = Now()
WWW_PLCJS@_COM%－PLC－技.术_网

    
WWW_P※LCJS_COM－PLC－)技.术_网

GoTo SkipMessage
WWW_PLCJS_COM－PLC－技.术_网

WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)

MessageRSLinxDead:
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)

    MsgBox ("RSLINX 没有运行，连接失败！")
WWcW_PLCJS_COM－PLC－技.术_网

SkipMessage:
WWW_PLCJS_COM－PLC－技.术_网

plcjs.技.术_网

End Sub  
W1WW_P4LCJS_COM－PLC－技.术_网
评论内容
载入中...
载入中...
P
L
C
技
术
网
|
可
编
程
控
制
器
技
术
门
户
|
十
万
P
L
C
工
程
师
的
共
同
选
择
！
·最新招聘信息
·最新求职信息
·推荐产品
·推荐厂商
·栏目热门排行
·站内热门排行