OPC实验指导书.doc

实验名称 OPC客户端的编程 实验目的： 通过实际操作进一步了解OPC的各种概念，掌握OPC客户端的编写方法。并对微软的DCOM有一定的了解，要求通过合适的DCOM配置，使客户端能够读取网络上服务器中的数据。 实验内容： 1）利用VB语言编写出一个简单的OPC客户端程序，要求这个客户端能够读取服务器中的数据，并显示出来。 2）配置DCOM，使客户端能够能过DCOM读取另一台服务器上的数据。 实验步骤： 建立一个Visual Basic工程 1）启动Visual Basic,新建一个Visual Basic工程。选择[Standard EXE]作为新建工程的类型。 图3-1 Visual Basic 工程的建立 2）设置OPC包装DLL 因为在新建的Visual Basic工程OPC包装DLL还没有被注册，必须用下述方法对OPC包装DLL进行注册。设置方法： 1.从Visual Basic菜单里选择[Project]-[References]。 2.在[Available References]表示中，选择对应OPC包装DLL的文件名。这里我们选择[OPC Automation 2.0]。 图3-2 引用的设置 （2）建立一个OPC对象 在Visual Basic里，是以对象的单位对OPC服务器进行访问。OPC自动化接口是由以下四种对象所定义。 OPC服务器 OPC组（OPC组集合） OPC标签（OPC标签集合） OPC浏览器 这里只说明OPC服务器，OPC组以及OPC标签对象的使用方法。具体的来说，先连接一个特定的OPC服务器，然后建立OPC组，最后添加OPC标签。 1） 变量声明 参考图3-3所示的示范代码，先对OPC对象变量进行声明。变量的数据类型应该指定为对象型。这些对象变量最好在窗体代码的（General）部分声明。因为在（General）部分声明的变量，可以在窗体的任何方法的代码内引用。 图3-3 OPC对象变量的声明 有关定义OPC对象的声明及其说明列于表3-1 表3-1 OPC对象变量的声明 变量名 说明 objServer OPCServer对象，用于连接OPC服务器。 objGroups OPCGroups对象，用于添加OPC组的OPC组集合 objTestGrp OPCGroup对象，演示用的OPC组。 objItems OPCItems对象，用于添加OPC标签的OPC标签集合。 lServerHandles() 长整型的数组，用于保存OPC标签的服务器句柄。 2） 连接OPC服务器和建立OPC组 下面说明如何连接OPC服务器和建立OPC组。考虑到代码的可反复使用性，这里采用子程序进行编程。 这里用“NEW”关键词生成OPC服务器的对象，然后调用OPC服务器对象的“Connect”方法，和OPC服务器连接。在连接远程服务器的时候，需要指定作为选用参数的远程计算机名（表3-2） 表3-2 Connect子程序 Sub Connect(strProgID As String, Optional strNode As String) If objServer Is Nothing Then 建立一个OPC服务器对象 Set objServer = New OPCServer End If If objServer.ServerState = OPCDisconnected Then 连接OPC服务器 objServer.Connect strProgID, strNode End If If objGroups Is Nothing Then 建立一个OPC组集合 Set objGroups = objServer.OPCGroups End If If objTestGrp Is Nothing Then 添加一个OPC组 Set objTestGrp = objGroups.Add(TestGrp) End If End Sub 3） 添加OPC标签 对OPC服务器进行访问前，必须先在OPC组里添加要访问的OPC标签。 这里添加OPC标签的标识符和数目是固定的，但是实际的OPC应用程序往往要按照用户的指定或读取组态文件取得和处理需要添加OPC标签（表3-3） 表3-3 AddItem子程序 Sub AddItem() Dim strI