RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  14516 - PROBLEMAS CON EL WINSOCK (4006)
Autor:  Fernando Diaz Sanchez
Buenas a Todos...

Soy principiante con el Winsock, y quisiera que me den una mano
ya que quiero hacer una especie de Winpopup primitivo, pero
a mi me sale un MALDITO error (4006)

Error \'4006\' en tiempo de ejecucion

Protocolo o estado de conexion erroneo pra la transaccion o peticion
solicitda

SI, ya se que esta pregunta ya la han hecho, pues la lei, era la numero
2729, pero no me funciono, me sigue saliendo ese error

No se que hacer, :(

este es el codigo que uso para el formulario Servidor
(ya que solo quiero probarlo en una maquina, nada mas...)

------------CODIGO DEL WINSOCK DE LA AYUDA DEL VB----------------
Private Sub Form_Load()
\' Establece la propiedad LocalPort en un entero.
\' Después invoca el método Listen.
tcpServer.LocalPort = 1001
tcpServer.Listen
frmClient.Show \' Muestra el formulario del cliente.
End Sub

Private Sub tcpServer_ConnectionRequest _
(ByVal requestID As Long)
\' Comprueba si el estado del control es cerrado.
\' De lo contrario, cierra la conexión antes de
\' aceptar la nueva conexión.
If tcpServer.State <> sckClosed Then _
tcpServer.Close
\' Acepta la petición con el parámetro
\' requestID.
tcpServer.Accept requestID
End Sub

Private Sub txtSendData_Change()
\' El control TextBox llamado txtSendData
\' contiene los datos que se van a enviar. Siempre
\' que el usuario escribe en el cuadro de texto,
\' se envía la cadena mediante el método SendData.
tcpServer.SendData txtSendData.Text \'-> AQUI SALE EL ERROR
End Sub

Private Sub


Nombre
Apellidos
Correo
Comentarios