CL.InstanceParameters.Mode.AllowAsynchronousMethod = False

EasyDAClient.SharedParameters.ClientParameters.UseCustomSecurity = <True or False> EasyDAClient.SharedParameters.ClientParameters.TurnOffActivationSecurity = <True or False> EasyDAClient.SharedParameters.ClientParameters.TurnOffCallSecurity = <True or False>

Dim j = EasyDAClient.SharedInstance.ReadItemValue("172.25.118.1", "Kepware.KEPServerEX.V5", "Siem.VERXEMS08.FQ_GV12") MsgBox(j)

See the end of this message for details on invoking just-in-time (JIT) debugging instead of this dialog box. ************** Exception Text ************** OpcLabs.EasyOpc.OperationModel.OpcException: An OPC operation failure with error code -1073430509 (0xC004C013) occurred, originating from 'OpcLabs.EasyOpcRaw.DataAccess.RawEasyDAClient'. The inner exception contains details about the problem. ---> System.Runtime.InteropServices.COMException: Read not completed. This error indicates that it could not be verified that the requested read operation was completed during the timeout period. It is possible that the read operation will actually succeed or fail, but later. Increase the timeout period if you want to obtain positive or negative indication of the operation outcome. Other reason for this error may be that under heavy loads, topic request or response queue is overflowing. Check the event log for queue overflow errors (if event logging is supported by the product and enabled). --- End of inner exception stack trace --- at OpcLabs.EasyOpc.Internal.EasyUtilities.CheckSuccess(OperationResult operationResult) at OpcLabs.EasyOpc.DataAccess.IEasyDAClientExtension.ReadItemValue(IEasyDAClient client, ServerDescriptor serverDescriptor, DAItemDescriptor itemDescriptor, DAReadParameters readParameters) at OpcLabs.EasyOpc.DataAccess.IEasyDAClientExtension.ReadItemValue(IEasyDAClient client, ServerDescriptor serverDescriptor, DAItemDescriptor itemDescriptor) at OpcLabs.EasyOpc.DataAccess.IEasyDAClientExtension.ReadItemValue(IEasyDAClient client, String machineName, String serverClass, String itemId, VarType dataType) at OpcLabs.EasyOpc.DataAccess.IEasyDAClientExtension.ReadItemValue(IEasyDAClient client, String machineName, String serverClass, String itemId) at OPCReadTester.withSimpleRead.Button1_Click(Object sender, EventArgs e) at System.Windows.Forms.Control.OnClick(EventArgs e) at System.Windows.Forms.Button.OnClick(EventArgs e) at System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent) at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks) at System.Windows.Forms.Control.WndProc(Message& m) at System.Windows.Forms.ButtonBase.WndProc(Message& m) at System.Windows.Forms.Button.WndProc(Message& m) at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m) at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m) at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam) ************** Loaded Assemblies ************** mscorlib Assembly Version: 4.0.0.0 Win32 Version: 4.7.3416.0 built by: NET472REL1LAST_B CodeBase: file:///C:/Windows/Microsoft.NET/Framework/v4.0.30319/mscorlib.dll ---------------------------------------- OPCReadTester Assembly Version: 1.0.0.0 Win32 Version: 1.0.0.0 CodeBase: file:///D:/_Install/OPC%20Read%20Tester/OpcReadTester/OPCReadTester.exe ---------------------------------------- Microsoft.VisualBasic Assembly Version: 10.0.0.0 Win32 Version: 14.7.3062.0 built by: NET472REL1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Microsoft.VisualBasic/v4.0_10.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll ---------------------------------------- System Assembly Version: 4.0.0.0 Win32 Version: 4.7.3416.0 built by: NET472REL1LAST_B CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System/v4.0_4.0.0.0__b77a5c561934e089/System.dll ---------------------------------------- System.Core Assembly Version: 4.0.0.0 Win32 Version: 4.7.3362.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Core/v4.0_4.0.0.0__b77a5c561934e089/System.Core.dll ---------------------------------------- System.Windows.Forms Assembly Version: 4.0.0.0 Win32 Version: 4.7.3324.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms/v4.0_4.0.0.0__b77a5c561934e089/System.Windows.Forms.dll ---------------------------------------- System.Drawing Assembly Version: 4.0.0.0 Win32 Version: 4.7.3062.0 built by: NET472REL1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Drawing/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll ---------------------------------------- System.Configuration Assembly Version: 4.0.0.0 Win32 Version: 4.7.3324.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Configuration/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Configuration.dll ---------------------------------------- System.Xml Assembly Version: 4.0.0.0 Win32 Version: 4.7.3062.0 built by: NET472REL1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Xml/v4.0_4.0.0.0__b77a5c561934e089/System.Xml.dll ---------------------------------------- System.Runtime.Remoting Assembly Version: 4.0.0.0 Win32 Version: 4.7.3062.0 built by: NET472REL1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Runtime.Remoting/v4.0_4.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll ---------------------------------------- OpcLabs.EasyOpcClassic Assembly Version: 5.50.405.1 Win32 Version: 5.50.405.1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/OpcLabs.EasyOpcClassic/v4.0_5.50.405.1__6faddca41dacb409/OpcLabs.EasyOpcClassic.dll ---------------------------------------- OpcLabs.BaseLib Assembly Version: 5.50.405.1 Win32 Version: 5.50.405.1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/OpcLabs.BaseLib/v4.0_5.50.405.1__6faddca41dacb409/OpcLabs.BaseLib.dll ---------------------------------------- System.ServiceModel Assembly Version: 4.0.0.0 Win32 Version: 4.7.3324.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.ServiceModel/v4.0_4.0.0.0__b77a5c561934e089/System.ServiceModel.dll ---------------------------------------- System.Runtime.Serialization Assembly Version: 4.0.0.0 Win32 Version: 4.7.3324.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Runtime.Serialization/v4.0_4.0.0.0__b77a5c561934e089/System.Runtime.Serialization.dll ---------------------------------------- SMDiagnostics Assembly Version: 4.0.0.0 Win32 Version: 4.7.3324.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/SMDiagnostics/v4.0_4.0.0.0__b77a5c561934e089/SMDiagnostics.dll ---------------------------------------- System.ServiceModel.Internals Assembly Version: 4.0.0.0 Win32 Version: 4.7.3324.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.ServiceModel.Internals/v4.0_4.0.0.0__31bf3856ad364e35/System.ServiceModel.Internals.dll ---------------------------------------- System.Xaml Assembly Version: 4.0.0.0 Win32 Version: 4.7.3362.0 built by: NET472REL1LAST_C CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Xaml/v4.0_4.0.0.0__b77a5c561934e089/System.Xaml.dll ---------------------------------------- BoxedAppSDK.Managed Assembly Version: 3.3.14.0 Win32 Version: 5.50.405.1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/OpcLabs.BaseLib/v4.0_5.50.405.1__6faddca41dacb409/OpcLabs.BaseLib.dll ---------------------------------------- App_Web_OpcLabs.EasyOpcClassicRaw.x86 Assembly Version: 5.50.405.1 Win32 Version: 5.50.405.1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_32/App_Web_OpcLabs.EasyOpcClassicRaw.x86/v4.0_5.50.405.1__6faddca41dacb409/App_Web_OpcLabs.EasyOpcClassicRaw.x86.dll ---------------------------------------- OpcNetApi Assembly Version: 2.1.105.1 Win32 Version: 5.50.405.1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/OpcLabs.BaseLib/v4.0_5.50.405.1__6faddca41dacb409/OpcLabs.BaseLib.dll ---------------------------------------- Accessibility Assembly Version: 4.0.0.0 Win32 Version: 4.7.3062.0 built by: NET472REL1 CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Accessibility/v4.0_4.0.0.0__b03f5f7f11d50a3a/Accessibility.dll ---------------------------------------- ************** JIT Debugging ************** To enable just-in-time (JIT) debugging, the .config file for this application or computer (machine.config) must have the jitDebugging value set in the system.windows.forms section. The application must also be compiled with debugging enabled. For example: <configuration> <system.windows.forms jitDebugging="true" /> </configuration> When JIT debugging is enabled, any unhandled exception will be sent to the JIT debugger registered on the computer rather than be handled by this dialog box.

The application-specific permission settings do not grant Local Activation permission for the COM Server application with CLSID {D63B10C5-BB46-4990-A94F-E40B9D520160} and APPID {9CA88EE3-ACB7-47C8-AFC4-AB702511C276} to the user PHARMA\E0417130 SID (S-1-5-21-299502267-1645522239-682003330-1077462486) from address LocalHost (Using LRPC) running in the application container Unavailable SID (Unavailable). This security permission can be modified using the Component Services administrative tool.

Imports OpcLabs.BaseLib.Collections.Generic.Extensions Imports OpcLabs.EasyOpc.DataAccess Imports OpcLabs.EasyOpc.DataAccess.OperationModel Public Class withSubscription Private client As New EasyDAClient Public Sub New() InitializeComponent() client.InstanceParameters.HoldPeriods.TopicRead = 80000 client.InstanceParameters.Mode.AllowAsynchronousMethod = True client.InstanceParameters.Mode.AllowSynchronousMethod = True client.InstanceParameters.Timeouts.ReadItem = 58000 client.InstanceParameters.Timeouts.BrowseServers = 50000 End Sub Private Sub BtnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click AddHandler client.ItemChanged, Sub(senderCL As Object, eCL As EasyDAItemChangedEventArgs) If eCL.Succeeded Then TextBox1.Text &= String.Format("{0}: {1}", eCL.Arguments.ItemDescriptor.ItemId, eCL.Vtq.Value) & vbCrLf Else TextBox1.Text &= String.Format("{0} *** Failure: {1}", eCL.Arguments.ItemDescriptor.ItemId, eCL.ErrorMessageBrief) & vbCrLf End If End Sub Dim tags As New List(Of DAItemGroupArguments) #If DEBUG Then tags.Add(New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Simulation.Random", 5000, Nothing)) tags.Add(New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Trends.Ramp (1 min)", 5000, Nothing)) tags.Add(New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Trends.Sine (1 min)", 5000, Nothing)) tags.Add(New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Simulation.Register_I4", 5000, Nothing)) #Else tags.Add(New DAItemGroupArguments("172.25.118.1", "Kepware.KEPServerEX.V5", "Siem.VERXEMS08.FQ_GV12", 5000, Nothing)) tags.Add(New DAItemGroupArguments("172.25.118.1", "Kepware.KEPServerEX.V5", "Siem.VERXEMS08.FT_GV12", 5000, Nothing)) tags.Add(New DAItemGroupArguments("172.25.118.1", "Kepware.KEPServerEX.V5", "Siem.VERXEMS08.FQ_GV13", 5000, Nothing)) tags.Add(New DAItemGroupArguments("172.25.118.1", "Kepware.KEPServerEX.V5", "Siem.VERXEMS08.FT_GV13", 5000, Nothing)) #End If client.SubscribeMultipleItems(tags.ToArray()) End Sub End Class

Imports System.Globalization Imports OpcLabs.EasyOpc.DataAccess Imports OpcLabs.EasyOpc.DataAccess.Generic Imports OpcLabs.EasyOpc.DataAccess.OperationModel Imports OpcLabs.EasyOpc.OperationModel Public Class withSimpleRead Public CL_GLOBAL As New EasyDAClient() Public Sub New() InitializeComponent() CL_GLOBAL.InstanceParameters.HoldPeriods.TopicRead = 80000 End Sub Private Sub BtnRead_Click(sender As Object, e As EventArgs) Handles btnRead.Click btnRead.Enabled = False txtLog.Text &= "------------------------------------------------------------------" & vbCrLf Try Dim item As New DAReadItemArguments(txtServer.Text, txtProgId.Text, txtTag.Text, CInt(txtValueAge.Text)) Dim res = ReadTagValuesFromOPC(item) For Each i In res txtLog.Text &= "Result: " & i.ToString() & vbCrLf Next Catch ex As Exception txtLog.Text &= "Error during read OPC tag values: " & ex.Message & vbCrLf If ex.InnerException IsNot Nothing Then txtLog.Text &= "InnerException: " & ex.InnerException.Message & vbCrLf End If Finally btnRead.Enabled = True End Try End Sub Public Function ReadTagValuesFromOPC(ByVal tagData As DAReadItemArguments) As DAVtqResult() CL_GLOBAL.InstanceParameters.Mode.AllowAsynchronousMethod = True CL_GLOBAL.InstanceParameters.Mode.AllowSynchronousMethod = True CL_GLOBAL.InstanceParameters.HoldPeriods.TopicRead = 59000 CL_GLOBAL.InstanceParameters.Timeouts.ReadItem = 58000 CL_GLOBAL.InstanceParameters.Timeouts.BrowseServers = 50000 Return CL_GLOBAL.ReadMultipleItems(New DAReadItemArguments() {tagData}) End Function Private Sub BtnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click My.Settings.Save() End Sub End Class

Dim item As New DAReadItemArguments(txtServer.Text, txtProgId.Text, txtTag.Text, CInt(txtValueAge.Text))

OpcLabs.EasyOpc.DataAccess.Engine.EasyDAClientHoldPeriods.Default.TopicRead = 80 ' I need set seconds here?