就是我弄了一个远程传送消息的小软件
服务端和客户端都用winsock控件

刚启动服务端就自动设成服务器，就是服务端状态处于"监听"状态
当客户机第一次成功连线后，断开连接，想再次连接服务器就总不成功
根据软件自己的现实的状态就是，一旦客户机断开连接，服务端的状态就变成“关闭”了
米办法回到“监听”状态

想让服务器再次回到“监听”状态，而又不用重新启动服务器要怎么办啊？？？

可以使用別的WINSOCK來囬復````

Private Sub socksev_ConnectionRequest(Index As Integer, ByVal requestID As Long)
If Index = 0 Then
For i = 1 To 4000 '找尋一個關閉的WINSOCK`
If socksev(i).State <> sckConnected Then
socksev(i).LocalPort = 0
socksev(i).Accept requestID '由新的WINSOCK來囬復客戶的請求```
DoEvents
Exit Sub
End If
Next i
End If

[此贴子已经被作者于2007-1-16 17:46:23编辑过]

我把代码贴进去了，说“过程声明与同名事件或过程的描述不匹配”
那是不是在窗体上要放这么多的winsock控件，搞一个控件数组啊？？？

[此贴子已经被作者于2007-1-16 21:36:25编辑过]

嗯```放一個就行叻```把INDEX設置為0 然后LOADSOCKSEV(I)