10022Socket not bound, invalid address or listen is not invoked prior to accept

Question

求助。从网页中调用activeX控件，作为socket通讯的客户端，本地机器上运行服务端程序，两者进行socket通讯。开始，通讯正常，但是多次连续进行通讯操作之后，就出现标题所示的错误，请教各位。

Answer 1

用netstat命令发现有7，8个端口都被我的程序占用，处于time_wait状态，请问如何释放被占用的端口阿

Answer 2

1个专门负责坚挺，一个专门和客户端accept

Answer 3

做一个timer,每隔1分钟踢除不传送数据的端口。客户再连接会自动分配的。
timer:
dim winsocklastsendtime
发送时：
winsocklastsendtime(index)=timer
for i=1 to winsock1.count
if timer-winsocklastsendtime(i)>=60 then
winsock1(i).close
end if
next●●●●●我是新手，我要提高,把分给我,谢谢！◆◆◆◆◆◆◆◆
●你好，我好大家好！希望我能成为你某方面的专家！谢谢支持！●
●●●●●●●●●●●●●●●●●●●●●●●●●●●●●●