// This example shows how to read the attributes of 4 OPC-UA nodes specified by browse paths at once, and display the
// results.
using System;
using OpcLabs.EasyOpc.UA;
using OpcLabs.EasyOpc.UA.Navigation.Parsing;
using OpcLabs.EasyOpc.UA.OperationModel;
namespace UADocExamples._EasyUAClient
{
partial class ReadMultiple
{
public static void BrowsePath()
{
UAEndpointDescriptor endpointDescriptor =
"opc.tcp://opcua.demo-this.com:51210/UA/SampleServer";
// or "http://opcua.demo-this.com:51211/UA/SampleServer" (currently not supported)
// or "https://opcua.demo-this.com:51212/UA/SampleServer/"
// Instantiate the client object.
var client = new EasyUAClient();
// Instantiate the browse path parser.
var browsePathParser = new UABrowsePathParser {DefaultNamespaceUriString = "http://test.org/UA/Data/"};
// Prepare arguments.
// Note: Add error handling around the following statement if the browse paths are not guaranteed to be
// syntactically valid.
var readArgumentsArray = new[]
{
new UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Dynamic/Scalar/FloatValue")),
new UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Dynamic/Scalar/SByteValue")),
new UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Static/Array/UInt16Value")),
new UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Static/UserScalar/Int32Value"))
};
// Obtain attribute data.
UAAttributeDataResult[] attributeDataResultArray = client.ReadMultiple(readArgumentsArray);
// Display results.
for (int i = 0; i < attributeDataResultArray.Length; i++)
{
UAAttributeDataResult attributeDataResult = attributeDataResultArray[i];
if (attributeDataResult.Succeeded)
Console.WriteLine($"results[{i}].AttributeData: {attributeDataResult.AttributeData}");
else
Console.WriteLine($"results[{i}]: *** Failure: {attributeDataResult.ErrorMessageBrief}");
}
}
// Example output:
//results[0].AttributeData: 4.187603E+21 {Single} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
//results[1].AttributeData: -98 {Int16} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
//results[2].AttributeData: [58] {38240, 11129, 64397, 22845, 30525, ...} {Int32[]} @2019-11-09T14:00:07.543 @@2019-11-09T14:05:46.268; Good
//results[3].AttributeData: 1280120396 {Int32} @2019-11-09T14:00:07.590 @@2019-11-09T14:05:46.268; Good
}
}
# This example shows how to read the attributes of 4 OPC-UA nodes specified by browse paths at once, and display the
# results.
#requires -Version 5.1
using namespace OpcLabs.EasyOpc.UA
using namespace OpcLabs.EasyOpc.UA.Navigation.Parsing
using namespace OpcLabs.EasyOpc.UA.OperationModel
# The path below assumes that the current directory is [ProductDir]/Examples-NET/PowerShell/Windows .
Add-Type -Path "../../../Components/net472/OpcLabs.EasyOpcUA.dll"
[UAEndpointDescriptor]$endpointDescriptor =
"opc.tcp://opcua.demo-this.com:51210/UA/SampleServer"
# or "http://opcua.demo-this.com:51211/UA/SampleServer" (currently not supported)
# or "https://opcua.demo-this.com:51212/UA/SampleServer/"
# Instantiate the client object.
$client = New-Object EasyUAClient
# Instantiate the browse path parser.
$browsePathParser = New-Object UABrowsePathParser -Property @{DefaultNamespaceUriString = "http://test.org/UA/Data/"}
# Prepare arguments.
# Note: Add error handling around the following statement if the browse paths are not guaranteed to be
## syntactically valid.
$readArgumentsArray = @(
(New-Object UAReadArguments($endpointDescriptor,
$browsePathParser.Parse("[ObjectsFolder]/Data/Dynamic/Scalar/FloatValue"))),
(New-Object UAReadArguments($endpointDescriptor,
$browsePathParser.Parse("[ObjectsFolder]/Data/Dynamic/Scalar/SByteValue"))),
(New-Object UAReadArguments($endpointDescriptor,
$browsePathParser.Parse("[ObjectsFolder]/Data/Static/Array/UInt16Value"))),
(New-Object UAReadArguments($endpointDescriptor,
$browsePathParser.Parse("[ObjectsFolder]/Data/Static/UserScalar/Int32Value")))
)
# Obtain attribute data.
$attributeDataResultArray = $client.ReadMultiple($readArgumentsArray)
for ($i = 0; $i -lt $attributeDataResultArray.Length; $i++) {
$attributeDataResult = $attributeDataResultArray[$i]
if ($attributeDataResult.Succeeded) {
Write-Host "results[$($i)].AttributeData: $($attributeDataResult.AttributeData)"
}
else {
Write-Host "results[$($i)]: *** Failure: $($attributeDataResult.ErrorMessageBrief)"
}
}
# Example output:
#
#results[0].AttributeData: 4.187603E+21 {Single} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
#results[1].AttributeData: -98 {Int16} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
#results[2].AttributeData: [58] {38240, 11129, 64397, 22845, 30525, ...} {Int32[]} @2019-11-09T14:00:07.543 @@2019-11-09T14:05:46.268; Good
#results[3].AttributeData: 1280120396 {Int32} @2019-11-09T14:00:07.590 @@2019-11-09T14:05:46.268; Good
' This example shows how to read the attributes of 4 OPC-UA nodes specified by browse paths at once, and display the
' results.
Imports OpcLabs.EasyOpc.UA
Imports OpcLabs.EasyOpc.UA.Navigation.Parsing
Imports OpcLabs.EasyOpc.UA.OperationModel
Namespace _EasyUAClient
Partial Friend Class ReadMultiple
Public Shared Sub BrowsePath()
' Define which server we will work with.
Dim endpointDescriptor As UAEndpointDescriptor =
"opc.tcp://opcua.demo-this.com:51210/UA/SampleServer"
' or "http://opcua.demo-this.com:51211/UA/SampleServer" (currently not supported)
' or "https://opcua.demo-this.com:51212/UA/SampleServer/"
' Instantiate the client object
Dim client = New EasyUAClient()
Dim browsePathParser = New UABrowsePathParser()
browsePathParser.DefaultNamespaceUriString = "http://test.org/UA/Data/"
' Prepare arguments
' Note: Add error handling around the following statement if the browse paths are Not guaranteed to be
' syntactically valid.
Dim readArgumentsArray = New UAReadArguments() _
{
New UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Dynamic/Scalar/FloatValue")),
New UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Dynamic/Scalar/SByteValue")),
New UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Static/Array/UInt16Value")),
New UAReadArguments(endpointDescriptor,
browsePathParser.Parse("[ObjectsFolder]/Data/Static/UserScalar/Int32Value"))
}
' Obtain attribute data. By default, the Value attributes of the nodes will be read.
Dim resultArray() As UAAttributeDataResult = client.ReadMultiple(readArgumentsArray)
' Display results
For i As Integer = 0 To resultArray.Length - 1
Dim attributeDataResult As UAAttributeDataResult = resultArray(i)
If attributeDataResult.Succeeded Then
Console.WriteLine("results[{0}].AttributeData: {1}", i, attributeDataResult.AttributeData)
Else
Console.WriteLine("results[{0}]: *** Failure: {1}", i, attributeDataResult.ErrorMessageBrief)
End If
Next i
' Example output:
'results[0].AttributeData 4.187603E+21 {System.Single} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
'results[1].AttributeData: -98 {System.Int16} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
'results[2].AttributeData: [58] {38240, 11129, 64397, 22845, 30525, ...} {System.Int32[]} @2019-11-09T14:00:07.543 @@2019-11-09T14:05:46.268; Good
'results[3].AttributeData: 1280120396 {System.Int32} @2019-11-09T14:00:07.590 @@2019-11-09T14:05:46.268; Good
End Sub
End Class
End Namespace
// This example shows how to read the attributes of 4 OPC-UA nodes specified
// by browse paths at once, and display the results.
class procedure ReadMultiple.BrowsePath;
var
Arguments: OleVariant;
BrowsePathParser: _UABrowsePathParser;
Client: OpcLabs_EasyOpcUA_TLB._EasyUAClient;
I: Cardinal;
ReadArguments1, ReadArguments2, ReadArguments3, ReadArguments4: _UAReadArguments;
Result: _UAAttributeDataResult;
Results: OleVariant;
begin
BrowsePathParser := CoUABrowsePathParser.Create;
BrowsePathParser.DefaultNamespaceUriString := 'http://test.org/UA/Data/';
ReadArguments1 := CoUAReadArguments.Create;
ReadArguments1.EndpointDescriptor.UrlString :=
//'http://opcua.demo-this.com:51211/UA/SampleServer';
//'https://opcua.demo-this.com:51212/UA/SampleServer/';
'opc.tcp://opcua.demo-this.com:51210/UA/SampleServer';
// Note: Add error handling around the following statement if the browse path is not guaranteed to be syntactically valid.
ReadArguments1.NodeDescriptor.BrowsePath := BrowsePathParser.Parse('[ObjectsFolder]/Data/Dynamic/Scalar/FloatValue');
ReadArguments2 := CoUAReadArguments.Create;
ReadArguments2.EndpointDescriptor.UrlString :=
//'http://opcua.demo-this.com:51211/UA/SampleServer';
//'https://opcua.demo-this.com:51212/UA/SampleServer/';
'opc.tcp://opcua.demo-this.com:51210/UA/SampleServer';
// Note: Add error handling around the following statement if the browse path is not guaranteed to be syntactically valid.
ReadArguments2.NodeDescriptor.BrowsePath := BrowsePathParser.Parse('[ObjectsFolder]/Data/Dynamic/Scalar/SByteValue');
ReadArguments3 := CoUAReadArguments.Create;
ReadArguments3.EndpointDescriptor.UrlString :=
//'http://opcua.demo-this.com:51211/UA/SampleServer';
//'https://opcua.demo-this.com:51212/UA/SampleServer/';
'opc.tcp://opcua.demo-this.com:51210/UA/SampleServer';
// Note: Add error handling around the following statement if the browse path is not guaranteed to be syntactically valid.
ReadArguments3.NodeDescriptor.BrowsePath := BrowsePathParser.Parse('[ObjectsFolder]/Data/Static/Array/UInt16Value');
ReadArguments4 := CoUAReadArguments.Create;
ReadArguments4.EndpointDescriptor.UrlString :=
//'http://opcua.demo-this.com:51211/UA/SampleServer';
//'https://opcua.demo-this.com:51212/UA/SampleServer/';
'opc.tcp://opcua.demo-this.com:51210/UA/SampleServer';
// Note: Add error handling around the following statement if the browse path is not guaranteed to be syntactically valid.
ReadArguments4.NodeDescriptor.BrowsePath := BrowsePathParser.Parse('[ObjectsFolder]/Data/Static/UserScalar/Int32Value');
Arguments := VarArrayCreate([0, 3], varVariant);
Arguments[0] := ReadArguments1;
Arguments[1] := ReadArguments2;
Arguments[2] := ReadArguments3;
Arguments[3] := ReadArguments4;
// Instantiate the client object
Client := CoEasyUAClient.Create;
// Perform the operation
TVarData(Results).VType := varArray or varVariant;
TVarData(Results).VArray := PVarArray(Client.ReadMultiple(Arguments));
// Display results
for I := VarArrayLowBound(Results, 1) to VarArrayHighBound(Results, 1) do
begin
Result := IInterface(Results[I]) as _UAAttributeDataResult;
if Result.Succeeded then
WriteLn('results[', I, '].AttributeData: ', Result.AttributeData.ToString)
else
WriteLn('results[', I, '] *** Failure: ', Result.ErrorMessageBrief);
end;
VarClear(Results);
VarClear(Arguments);
// Example output:
//results[0].AttributeData: 4.187603E+21 {System.Single} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
//results[1].AttributeData: -98 {System.Int16} @2019-11-09T14:05:46.268 @@2019-11-09T14:05:46.268; Good
//results[2].AttributeData: [58] {38240, 11129, 64397, 22845, 30525, ...} {System.Int32[]} @2019-11-09T14:00:07.543 @@2019-11-09T14:05:46.268; Good
//results[3].AttributeData: 1280120396 {System.Int32} @2019-11-09T14:00:07.590 @@2019-11-09T14:05:46.268; Good
end;