Miren, no se como hacer para cerrar correctamente los sockets. O sea, cuando aprieto desconectar desde el terminal central (host) me gustaria que todos los clientes pierdan la conexion, y que el arreglo de sockets se limpie. Supongo que el codigo esta bien, pero cuando aprieto desconectar, y luego escuchar otra vez, me tira el error ese "ADDRESS ALREADY IN USE". Supongo que me estara faltando alguna instruccion.
Private Sub botonDescon_Click()
For i = 0 To numSocket - 1
MsgBox (i)
socketArray.CloseSck i
sockLista.RemoveItem (i)
Next i
numSocket = 0
End Sub
Private Sub botonEscuchar_Click()
If (txtPuerto.Text = "") Then
MsgBox ("Not a valid port.")
Else
socketArray.ArrayAdd numSocket
socketArray.Bind numSocket, txtPuerto.Text, socketArray.LocalIP(numSocket)
socketArray.Listen numSocket
labelEstado.Caption = "STATE: Listening at SCK " & numSocket
End If
End Sub
No uso winsock. Uso CSocketPlus que es muy similar en cuanto a instrucciones. Si alguien sabe para winsock, que comente igual porq es aplicable. gracias.