Private Sub WebSocket_Connected (WebSocket1 As WebSocket) ws = WebSocket1 tmr.Initialize("tmr", 1000) tmr.Enabled = True End Sub Sub tmr_Tick ws.RunFunction("NOP", Null) ws.Flush Log("tick") End Sub
Most likely I did not understand the purpose of that code .Did you try it? Just add the timer in the server and run it. It worked properly here.
I think that evey second the server tries to call a non-existing routine on the client but this fact does not raise an exception, since the websocket "seems" to be connected, so nothing should happen.