Professional OPC
Development Tools

logos

VB6 app in W7 is not releasing client connection to Kepware

More
13 Jul 2017 09:48 #5349 by support
What leads you to believe that the client connection is not terminated?

Have you tried the same with recent Kepware server version?

Regards

Please Log in or Create an account to join the conversation.

More
11 Jul 2017 15:12 - 13 Jul 2017 09:47 #5343 by William Doherty
Hi

I have a small VB6 app using a public function to read (see below) and write values to PLC via kepware.

Problem is when I exit the app, it will not terminate any client connection that it has created.

On subsequent restarts the client connection keeps getting bigger.

How do I kill all client connections when exiting the app.

Regards

Bill
Public Function ReadValue(TextString As String) As Variant
    On Error GoTo ErrorRoutine
     ' Create EasyOPC-DA component
    Dim Client As New EasyDAClient
 
    ' Read item value and display it
    ReadValue = Client.ReadItemValue("", "KEPWare.KEPServerEx.V4", TextString)
    'Set Client = Nothing
 
    '
Exit Function
ErrorRoutine:
    'Call LogError("ReadValue", Err.Description)
    'Set Client = Nothing
End Function
Last edit: 13 Jul 2017 09:47 by support.

Please Log in or Create an account to join the conversation.

Moderators: support
Time to create page: 0.162 seconds

      

 Recommend this on Google