namespace Client { using System; using System.Threading; using Opc.UaFx.Client; public class Program { public static void Main() { using (var client = new OpcClient("opc.tcp://localhost:4840")) { client.Connect(); while (true) { var temperature = client.ReadNode("ns=2;s=Temperature"); Console.WriteLine("Current Temperature is {0} °C", temperature); Thread.Sleep(1000); } } } } }
Imports System Imports System.Threading Imports Opc.UaFx.Client Namespace Client Public Class Program Public Shared Sub Main() Using client = New OpcClient("opc.tcp://localhost:4840") client.Connect() While True Dim temperature = client.ReadNode("ns=2;s=Temperature") Console.WriteLine("Current Temperature is {0} °C", temperature) Thread.Sleep(1000) End While End Using End Sub End Class End Namespace
namespace Server { using System.Threading; using Opc.UaFx; using Opc.UaFx.Server; public class Program { public static void Main() { var temperatureNode = new OpcDataVariableNode<double>("Temperature", 100.0); using (var server = new OpcServer("opc.tcp://localhost:4840/", temperatureNode)) { server.Start(); while (true) { if (temperatureNode.Value == 110) temperatureNode.Value = 100; else temperatureNode.Value++; temperatureNode.ApplyChanges(server.SystemContext); Thread.Sleep(1000); } } } } }
Imports System.Threading Imports Opc.UaFx Imports Opc.UaFx.Server Namespace Server Public Class Program Public Shared Sub Main() Dim temperatureNode = New OpcDataVariableNode(Of Double)("Temperature", 100.0) Using server = New OpcServer("opc.tcp://localhost:4840/", temperatureNode) server.Start() While True If (temperatureNode.Value = 110) Then temperatureNode.Value = 100 Else temperatureNode.Value += 1 End If temperatureNode.ApplyChanges(server.SystemContext) Thread.Sleep(1000) End While End Using End Sub End Class End Namespace