| 发表于:2007-01-21 00:25:172楼 得分:0 |
首先要添加两个winsock控件,一个命名为listensock,一个命名为usersock,并设置后者的index属性为0 private sub listensock_connectionrequest(byval requestid as long) '接受客户端的连接 on error resume next for each sock in usersock if sock.state <> 7 then sock.close i=sock.index goto accept end if i=usersock.count load usersock(i) accept: usersock.accept requestid end sub 基本上就是这样,它能实现动态地添加新的连接,并且将已关闭的winsock重新利用起来 | | |
|