Visual Basic - error de protocolo

hola tengo un problemita

estoy mandando mensajes de una maquina a otra y a veces lo hace perfectamente y otras veces me dice

Estado de conecion o protocolo erroneo

por que sale esto?????????????????

explico mejor:
cuando levanto el programa en la maquina 1 y otro en la maquina 2 le mando mensajes ("a la 1era oportunidad") perfectamente luego cuando cierro uno de los programas y luego lo vuelvo a abrir y envio nmensajes me das el error de

"Protocolo o estado de conecion erroneo" por que me da ese error???

Hola

Lo que sucede es que el estado de la conexion no ha cambiado aun y estas forzando el envio de el mensaje, tienes que asegurarte de como esta el estado de la conexxion antes de enviar algun mensaje por ejemplo

Dim ws as Winsock
.
.
.

if ws.State <> sckConnected then
debug.print "Esperando conexion..."
end if

Saludos