Os pongo el código que me importa:
Código:
Private Sub sckMain_ConnectionRequest(Index As Integer, ByVal requestID As Long)
On Error Resume Next
TotalIndex = TotalIndex + 1
sckMain(Index).Close
sckMain(Index).Accept requestID
Load sckMain(TotalIndex)
sckMain(TotalIndex).Listen
End Sub
Lo utilizo para una aplicación de administración remota.
¿Cómo sería eso en VB.NET???
