关于 Winsock 的问题

[Wonny]

如果在关闭连接时立即释放地址。
我的程序关闭后再次启动时，出会出现 Address in use 的错误 。

[TechnoFantasy]

你是如何选择关闭的，应该从服务器端关闭：
服务端的数据接受过程：
Sub Server_DataArrival(ByVal bytesTotal as Long)
Dim vbStr as String
Server.GetData DataReceived, vbStr
if Cstr(DataReceived)= "QUIT" then
server.close
server.LocalPort = 1111
server.Listen
end if
。。。。。
End Sub

客户端关闭时：
Client.SendData "QUIT"