Estoy creando un programa Cliente/Servidor en el que el Cliente etsa mandanando constantemente un intento de conexion a una IP especifica con un Puerto especifico... El servidor esta escuchando diferentes puertos para saber quien esta intentando conectarse, lo que no logro es establecer una conexion cuando estos dos se encuentran....
El procedimiento de busqueda es este:
For A = 1 To 9999
A = Winsock1.LocalPort
Winsock1.listen
If Winsock1.State = sckConnected Then
MSGBOX "Conectado!!!"
Else
Winsock1.Close
End If
Next
Y lo que no logro esque cuando el puerto conciden entre los dos no me aparece el mensaje.....
testeando un poco vi que el problema estaba en que el interminable inteto de conexion del cliente evitaba la conexion, para probar esto en ves de que a cada hora de intentar conectarse solo pudiera conectarse cuando oprimiera un boton y ahy fue cuando me dio resultado; me aparecia el mansaje... No se que es lo que voy a hacer para solucionar este problema, necesito su ayuda mientras sigo bucando una forma de solucionarlo.....
