刚学winsock啊

我想知道它监听比如 8089

   有一台机器连接了8089

      等有第二台机器连接8089时会不会发生错误？

------------------------------------
以上


                                  我自己就1台机器不能测试啊。。拜托拜托！有知道的吗？

听某某某人说要建立个winsock的空件数组来循环监听！不要这么麻烦吧？？？？

用UDP 一个Winsock就可以和多台电脑通讯。

一台电脑怎么不能测试……再不行装虚拟机

第二台机器连接8089  是发送连接请求，
如果通过，可以使用SERVER的加载SOCK控件，设置个随机端口，然后ACCEPT连接请求。
这样第二台机器连接的服务器并不是8089端口。可以继续LISTEN下一个请求。

　　Private Sub TcpSever—ConnectionRequest(Index As Integer, ByVal requestID As Long)

　　 If Index=0 Then

　　 ′生成新的WinSock控件响应客户端的请求

　　 WSockIndex=WSockIndex＋1

　　 Load TcpSever(WSockIndex)

　　 TcpSever(WSockIndex).LocalPort=0

　　 ′检查控件的 State 属性是否为关闭的。如果不是，在接受新的连接之前先关闭此连接

　　 If TcpSever(WSockIndex).State〈〉sckClosed Then

　　 TcpSever(WSockIndex).Close

　　 End If

　　 ′接受具有requestID参数的连接

　　 TcpSever(WSockIndex).Accept requestID

　　 ′为新的连接设立双向数据传输的TextBox

　　 If WSockIndex>1 Then

　　 Load TextSend(WSockIndex－1)

　　 TextSend(WSockIndex－1).Left=TextSend(0).Left＋(20＋TextSend(0).Width)?(WSockIndex－1)

　　 Load TextReceive(WSockIndex－1)

　　 TextReceive(WSockIndex－1).Left=TextRecieve(0).Left＋(20＋TextReceive(0).Width)?(WSockIndex－1)

　　 TextSend(WSockIndex－1).Visible=True

　　 TextReceive(WSockIndex－1).Visible=True

　　 End If

　　End If

　　End Sub