VB6 Winsock.ocx写的支持多客户端的服务端和客户端昨天 21:53
建立一个工程Server
用记事本打开 Server.vbp ，代码是：
具体代码只能由VIP查看，请升级 。
用记事本打开 Server.frm ，代码是：
具体代码只能由VIP查看，请升级 。
另外再建立一个工程Client
用记事本打开 Client.vbp ，代码是：
具体代码只能由VIP查看，请升级 。
用记事本打开 Client.frm ，代码是：
具体代码只能由VIP查看，请升级 。
当Server开启后，Client0,、Client1、Client2 连接Server成为Sock(0)、Sock(1)、Sock(2)，
就算Client1退出，再连接，还是Sock(1)，因为会自动从0开始检查空闲的编号。
全部回复（0）