jag gjorde ett Klient och ett Server program.. fast när jag tröck på Connect i Klienten.. så Crashade Server Programmet,
nån som vet vad det kan vara för fel ?

Skicka med koden.

för Server programmet:
<code>
Private Sub cmdRefresh_Click()
Winsock1.Close
Winsock1.LocalPort = txtPort
Winsock1.Listen
End Sub

Private Sub Form_Load()
Winsock1.LocalPort = txtPort
Winsock1.Listen
txtStatus.Enabled = False
End Sub

Private Sub txtPort_Change()

End Sub

Private Sub txtStatus_Change()

End Sub

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Accept requestID
txtStatus.Text = "Connected"
End Sub
</code>

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID
txtStatus.Text = "Connected"
End Sub