Sub Process_Globals
Private wsc_Object As WebSocketClient
Private jo_WSC As JavaObject
End Sub
Public Sub InitializeWSC()
wsc_Object.Initialize("wsc_Object")
jo_WSC = wsc_Object.As(JavaObject).GetField("wsc")
End Sub
Public Sub CloseWSC()
wsc_Object.Close
End Sub
Private Sub wsc_Object_Closed (Reason As String)
Try
jo_WSC.RunMethod("stop",Null)
Catch
Log(LastException)
End Try
End Sub