Opc data Access Automation Specification

4.4.3

 

Summary of Events 

DataChange AsyncReadComplete 

AsyncWriteComplete 

AsyncCancelComplete  

 

 

Example 

Syntax 

Base  

The following sample code is necessary for the subsequent Visual Basic Examples to be operational. 

.  

This code is referred to as OPCGroupObjectBase. 

Dim WithEvents AnOPCServer As OPCServer 

Dim ARealOPCServer As String 

Dim ARealOPCNodeName As String 

Dim AnOPCServerBrowser As OPCBrowser 

Dim MyGroups As OPCGroups 

Dim DefaultGroupUpdateRate As Long 

Dim WithEvents OneGroup As OPCGroup 

Dim AnOPCItemCollection As OPCItems 

Dim AnOPCItem As OPCItem 

Dim ClientHandles(100) As Long 

Dim AnOPCItemIDs(100) As String 

46 

 

---

OPC Data Access Automation Specification2.02 

Dim AnOPCItemServerHandles() As Long 

Dim AnOPCItemServerErrors() As Long 

Set AnOPCServer = New OPCServer 

ARealOPCServer = “VendorX.DataAccessCustomServer” 

ARealOPCNodeName = “SomeComputerNodeName” 

AnOPCServer.Connect(ARealOPCServer, ARealOPCNodeName) 

Set MyGroups = AnOPCServer.OPCGroups 

MyGroups.DefaultGroupIsActive = True 

Set OneGroup = MyGroups.Add( “AnOPCGroupName” ) 

Set AnOPCItemCollection = OneGroup.OPCItems 

For  x = 1 To AddItemCount 

 

ClientHandles(x)  

= x + 1 

 

AnOPCItemID(x) = “Register_”  &  x 

Next x 

AnOPCItemCollection.AddItems AddItemCount, AnOPCItemIDs, AnOPCItemServerHandles, 

AnOPCItemServerErrors