"Wrong protocol or connection state for the requested transaction or request"
Англ. немного знаю. Суть ошибки понял, но не пойму откуда она берется и как её исправить. C Socket'ами столкнулся впервые.
- Код: Выделить всё
Private Sub Form_Load()
wnsServer.LocalPort = 1001
wnsServer.Listen
End Sub
Private Sub txtSendData_Change()
wnsServer.SendData txtSendData.Text '- здесь возникает ошибка
End Sub
Private Sub wnsServer_ConnectionRequest(ByVal requestID As Long)
If wnsServer.State <> sckClosed Then wnsServer.Close
wnsServer.Accept requestID
End Sub
Private Sub wnsServer_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
wnsServer.GetData strData
txtOutput.Text = strData
End Sub