在class_Terminate执行前,对应客户端的服务器一个实例保存在gcol中,由于VB采用引用记数,所以不会执行class_Terminate。
解决方法:
在服务器程序加一个方法,
public sub RemoveClient
gcol.remove key
end sub
客户端退出之前执行RemoveClient就可以了。
解决方法:
在服务器程序加一个方法,
public sub RemoveClient
gcol.remove key
end sub
客户端退出之前执行RemoveClient就可以了。
public sub RemoveClient
if gcnt =0 then gcol.remove key
end sub
人忘了些 REMOVECLIENT,不就有问题了?