If astreams.IsInitialized Then
astreams.Close
End If
socket1.Initialize("socket1")
'socket1.Connect("15.236.175.34",40640,0)
socket1.Connect("abouttimetcp.flyingneurons.io",40640,0)
Wait For socket1_Connected(successful As Boolean)
ToastMessageShow("socket1_connected event fired",False)
If successful Then
SetState(True)
astreams.Initialize(socket1.InputStream,socket1.OutputStream,"astreams")
End If