• 技术与支持
  • 技术资料
    您现在的位置:首页 >> 技术与支持 >> 技术资料

    VB与Realinfo之间的DDE通讯

    2016-11-9 15:40:24 来源:原创 点击:
    关键词:DDE通讯,VB应用程序,数据交换

    DDE(Dynamic Data Exchange)技术是实现Windows下的应用程序之间的数据交换,通讯时,其中一应用程序作为客户端(Client),另一应用程序作为服务端(Server),或两者均可。
    一、VB应用程序访问Realinfo(VB应用程序为客户端,Realinfo作为服务端)的编程步骤:
    1.新建工程项目,将窗体命名为DDEClient:

    在窗体中绘制四个标签,分别为Label1、Label2、Label3、Label4
    在窗体中绘制四个文本,分别为Text1、Text2、Text3、Text 4
    2.标签不需要做任何设置,文本框的设置如下(例Text1):


    Realinfo的应用程序名为DB,话题名为DB,数据连接项为数据库变量名。
    LinkItem:a1.PV(数据库变量名)
    LinkMode:0,1,2,3
    LinkTopic:DB|DB
    (注:LinkMode初始为0,当Realinfo已启动可设置为1)

    Text2、Text3、Text4的LinkItem的分别为a2.PV、a3.PV、a4.PV,其它设置和Text1相同。
    3.在Form_Load()中编写如下脚本:


    将各个文本设置为自动连接方式,运行时应先启动Realinfo,否则报错。
    4.Realinfo中的组态:在DB数据库组态中建立四个数据库点,分别为a1、a2、a3和a4(与VB中文本LinkItem的属性值一致)
    5.先运行Realinfo,再启动VB程序,效果图如下:


    Realinfo运行系统 VB程序

    二、Realinfo访问VB应用程序访 (VB应用程序为服务端,Realinfo作为客户端)的编程步骤:

    1. 新建工程项目,将窗体更名为DDEServer:

    在窗体中绘制四个标签,分别为Label1、Label2、Label3、Label4
    在窗体中绘制四个文本,分别为var1、var2、var3、var 4(四个属性值初始为1.00000)
    2. 文本和标签均不需要做任何设置,窗体DDEServer的设置如下:


    LinkMode:1-Source(表示程序作为服务端)
    LinkTopic:窗体的名字(即DDEServer)
    3. 生成VB应用程序(注意应用程序名字不能超过8个字符)
    4. Realinfo中的组态:

    第一步 建立DDE设备

    定义设备名称:DDE

    第二步 输入服务和主题名称

    服务器名称:输入生成的应用程序名
    主题名称:VB应用程序窗体名称


    第三步 进入数据库组态

    建立四个数据库点:a1、a2、a3和a4

    第四步 建立数据连接

    DDE连接项:输入VB窗体中文本框的名字
    四个点分别对应var1、var2、var3和var4

    5. 先启动VB程序,再启动Realinfo运行效果如下:

    VB应用程序 Realinfo运行系统

    关键字: