// This example shows how to obtain all branches at the root of the address space. For each branch, it displays whether // it may have child nodes. // // Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . using System; using OpcLabs.EasyOpc.DataAccess; using OpcLabs.EasyOpc.DataAccess.AddressSpace; using OpcLabs.EasyOpc.OperationModel; namespace DocExamples.DataAccess._EasyDAClient { class BrowseBranches { public static void Main1() { // Instantiate the client object. var client = new EasyDAClient(); DANodeElementCollection branchElements; try { branchElements = client.BrowseBranches("", "OPCLabs.KitServer.2", ""); } catch (OpcException opcException) { Console.WriteLine("*** Failure: {0}", opcException.GetBaseException().Message); return; } foreach (DANodeElement branchElement in branchElements) Console.WriteLine($"BranchElements(\"{branchElement.Name}\").HasChildren: {branchElement.HasChildren}"); } // Example output: // //BranchElements("$ServerControl").HasChildren: True //BranchElements("Boilers").HasChildren: True //BranchElements("Simulation").HasChildren: True //BranchElements("SimulateEvents").HasChildren: True //BranchElements("Trends").HasChildren: True //BranchElements("Demo").HasChildren: True //BranchElements("Greenhouse").HasChildren: True } }
# This example shows how to obtain all branches at the root of the address space. For each branch, it displays whether # it may have child nodes. # # Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . # OPC client and subscriber examples in Python on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-Python . # The QuickOPC package is needed. Install it using "pip install opclabs_quickopc". import opclabs_quickopc # Import .NET namespaces. from OpcLabs.EasyOpc.DataAccess import * from OpcLabs.EasyOpc.OperationModel import * # Instantiate the client object. client = EasyDAClient() # Perform the operation. try: nodeElements = IEasyDAClientExtension.BrowseBranches(client, '', 'OPCLabs.KitServer.2', '') except OpcException as opcException: print('*** Failure: ' + opcException.GetBaseException().Message) exit() # Display results. for nodeElement in nodeElements: print('NodeElements["', nodeElement.Name, '"].HasChildren: ', nodeElement.HasChildren, sep='')
' This example shows how to obtain all branches at the root of the address space. For each branch, it displays whether ' it may have child nodes. ' ' Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . Imports OpcLabs.EasyOpc.DataAccess Imports OpcLabs.EasyOpc.DataAccess.AddressSpace Imports OpcLabs.EasyOpc.OperationModel Namespace DataAccess._EasyDAClient Partial Friend Class BrowseBranches Shared Sub Main1() Dim client = New EasyDAClient() Dim branchElements As DANodeElementCollection Try branchElements = client.BrowseBranches("", "OPCLabs.KitServer.2", "") Catch opcException As OpcException Console.WriteLine("*** Failure: {0}", opcException.GetBaseException().Message) Exit Sub End Try For Each branchElement In branchElements Console.WriteLine($"BranchElements(""{branchElement.Name}"").HasChildren: {branchElement.HasChildren}") Next branchElement End Sub ' Example output ' 'BranchElements("$ServerControl").HasChildren: True 'BranchElements("Boilers").HasChildren: True 'BranchElements("Simulation").HasChildren: True 'BranchElements("SimulateEvents").HasChildren: True 'BranchElements("Trends").HasChildren: True 'BranchElements("Demo").HasChildren: True 'BranchElements("Greenhouse").HasChildren: True End Class End Namespace
Rem This example shows how to obtain all branches at the root of the address space. For each branch, it displays whether Rem it may have child nodes. Rem Rem Find all latest examples here : https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . Option Explicit Dim Client: Set Client = CreateObject("OpcLabs.EasyOpc.DataAccess.EasyDAClient") On Error Resume Next Dim BranchElements: Set BranchElements = Client.BrowseBranches("", "OPCLabs.KitServer.2", "") If Err.Number <> 0 Then WScript.Echo "*** Failure: " & Err.Source & ": " & Err.Description WScript.Quit End If On Error Goto 0 Dim BranchElement: For Each BranchElement In BranchElements WScript.Echo "BranchElements(""" & BranchElement.Name & """).HasChildren: " & BranchElement.HasChildren Next
Copyright © 2004-2024 CODE Consulting and Development, s.r.o., Plzen. All rights reserved. Web page: www.opclabs.com
Send Documentation Feedback. Resources: Knowledge Base, Product Downloads. Technical support: Online Forums, FAQ.Missing some example? Ask us for it on our Online Forums! You do not have to own a commercial license in order to use Online Forums, and we reply to every post.