How to use vb6 winsock to close multiple connections

[Saaarc]

I have heard that we can establish multiple connections using Winsock and therefore I used it but when I closed winsock connection, I unable to open the form, but I think this won't happen because if there would be multiple connection with the multiple user i don't need to close every single user it should get every connection closed at any given point of time. how this is to be done.

[Swetlano]

The Winsock control allows you to make only one connection between two computers. However, you can create multiple connections (many computers to one) by creating multiple instances of the Winsock control at run time. I dont see any disconnect code, but basically, when the server connection is closed, you need to reset the socket.

[Addison_12]

Random port assigning is normally done with a control array. You will have one control array, and one normal sock.

Private Sub Form_Load()
Caption = Winsock1(0).LocalHostName & _
Winsock1(0).LocalIP
Winsock1(0).LocalPort = 1066
Print "Listening to " + Str(Winsock1(0).LocalPort)
Winsock1(0).Listen
End Sub

i was thinking winsock control, but if somthing else is more efficient than im open to it... I would recommend using the winsock control, its pretty easy to use, theres many tutorials at winsockvb.com I think there is a tut for multi connections

[Gonzo]

The way it works is the server winsock is a control array, winsock(0) is the interface when new clients connect, winsock(0) handles the connect attempt,

Sub Timer1_Timer()
If WinsockServer.State <> sckConnected Then
WinsockServer.Close
WinsockServer.Listen
End If
End Sub

The normal one wil listen on a certain port, and in its connection_request event, it will load a new sock in the control array and accept the request on that.