Question

VB 6.0 winsock控件实现通信出错 “所需事物或请求的错误协议或连接状态”

使用TCP协议实现两台电脑的通信

代码如下：
Private Sub Command1_Click()
With Winsock1
Winsock1.RemoteHost = Text1.Text
Winsock1.RemotePort = 1001
Winsock1.Bind 1002
End With
End Sub

Private Sub Command2_Click()
Winsock1.SendData Text3.Text
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim strdata As String
Winsock1.GetData strdata
Text2.Text = strdata
End Sub

结果总提示“所需事物或请求的错误协议或连接状态” 然后点调试问题就出在Winsock1.SendData Text3.Text这一句

Answer 1

你只有服务端或者客户端一方，需要同时有服务端和客户端才能通讯。下面这个是我对同类型问题的回答http://zhidao.baidu.com/question/2116571997844758667.html?oldq=1

追问

还是同样的提示错误呀 还是那个错误还是那句代码

追答

那一句代码？