Visual Basic - Error 40006 del control Winsock1

Necesito que alguien me diga algo de como evitar un error que me aparece en
una aplicacion que estoy haciendo que emplea el control winsock.


> El error que me aparece es "error 40006 en tiempo de ejecución. Protocolo o
> estado de conexión erroneo para la transaccion o petición solicitada"
>

> Pistas: Me aparece cuando invoco el Sock1.SendData.
> La conexión aparentemente no es rechazada cuando aplico el Sock1.Connect
Una máquina tiene IP 100.0.0.1
La otra que teoricamente está a la escucha, tiene la IP 100.0.0.2

¿Podría ser por el LocalPort o el remotePort?

Si alguien me puede ayudar le estaré agradecido.

Saludos.

para enviar datos tienes que estar conectado si no te saldra ese error

puedes poner esto que previene de enviar datos cuando la conexion esta cerrada

if Winsock.State = SckConnected then
Winsock.SendData (Datos)
end if

o un pequeno sub

public sub EnviarDatos(Data as string)
if Winsock.State = SckConnected then
Winsock.SendData (Data)
end if
end sub

maCo