关于winsock问题
客户端跟服务器端已成功建好了链接,但现在出现了问题,就是当我把客户端关闭后再启动(服务器继续运行中),就无法建立链接,只有把客户端跟服务器端都关闭后再重新启动才可以,此问题如何解决!
要看你服务器端的连接代码。
侦听的端口,接受连接是怎么写的。
程序代码:
Private Sub Form_Load()
Winsock1(0).LocalPort = 1001 '//第一个控件一直处于侦听状态
Winsock1(0).Listen
Dim i As Long
For i = 1 To 255
Load Winsock1(i)
Next
End Sub
Private Sub Winsock1_ConnectionRequest(Index As Integer, ByVal requestID As Long)
Static cnt As Long
cnt = cnt + 1
Winsock1(cnt).Accept requestID '//其他可用控件进行连接
End Sub