Visual Basic - Winsock

Necesito relizar una conexion cliente servidor por medio del winsock, si se conecta pero al momento de enviar datos por el getdata me marca el error 40006
Que pedo hacer??

De antemano Gracias!

ok, PUEDES VER CON CLARIDAD QUE SUCEDE SI OBTIENES LA DESCRIPCION DEL ERROR PE:
debug.print err.description
pues el codigo no dice mucho, verdad.
teniendo esto puede ser mas facil ayudarte