一份价钱一分货——如何加载多个winsock？

Question

如果有不能确定数量的多个客户端，如何在服务器端加载多个winsock?

Answer 1

正所谓一分钱一分货5分也就5个字： 用控件数组不过今天给你优惠，多送几个字： 
Dim nWskServerCount as long
nWskServerCount = nWskServerCount + 1
Load wskServer(nWskServerCount)
wskServer.Accept ....

Answer 2

原理:
　　http://www.china-askpro.com/msg18/qa75.shtml
　　http://www.china-askpro.com/msg10/qa55.shtml
　　
　　代码参考:
　　http://dev.csdn.net/develop/article/19/19601.shtm

Answer 3

没动力...贴不下地址...http://qyii.533.net/...