Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: andoba en 5 Agosto 2006, 22:49 pm



Título: Problema con el control Winsock
Publicado por: andoba en 5 Agosto 2006, 22:49 pm
Hola buenas, estoy haciendo un programa muy simple, el problema es que, cuando me conecto se queda conectandose y no se llega a conectar. Una cosa, el programa no lo compilo, lo abro desde el VB. Este es el código:

Private Sub Command1_Click()
Winsock1.RemoteHost = 127.0.0.1
Winsock1.RemotePort = 9999
Winsock1.Connect
End Sub

Y en el server:

Private Sub Form_Load()
Winsock1.LocalPort = 9999
Winsock1.Listen
End Sub

Private Sub Winsock1_ConnectionRequest(requestid As Long)
Winsock1.Accept requestid
MsgBox "Cliente Conectado"
End Sub

Gracias.


Título: Re: Problema con el control Winsock
Publicado por: -POLACO- en 6 Agosto 2006, 07:12 am
Aca te explica muy bien como debes manejar el Winsock

http://foro.elhacker.net/index.php/topic,17665.0.html
Saludos .-.


Título: Re: Problema con el control Winsock
Publicado por: sircid en 7 Agosto 2006, 02:20 am
Tienes que cerrar el winsock antes de aceptar alguna conexion!

Código:
Private Sub Winsock1_ConnectionRequest(requestid As Long)
Winsock1.Close
Winsock1.Accept requestid
MsgBox "Cliente Conectado"
End Sub