La Web del Programador: Comunidad de Programadores
 
    Pregunta:  11358 - COMUNICACION MEDIANTE TCP/IP
Autor:  Alex Abreu
Hola necesito ayuda sobre como comunicarme con con otra pc mediante conexion remota, claro ya se que con el winscok se puede lo unico que quiero es el codigo. Si alguien sabe me ayuda gracias..

  Respuesta:  SuNcO
Bueno, eso ke preguntas es algo facil y sea hace asi :

Programa Cliente :

Un boton con codigo - Winsock1.Connect pero previamente el control Winsock debe tener las propiedades de RemoteHost y RemotePort, o puedes ponerlas directamente asi - Winsock1.
Conect remotehost, remoteport

Programa Servidor :

Un boton ke diga escuchar, le pones codigo Winsock1.Listen y previamente la propiedad LocalPort. Despues cuando alguien intenta conectarse se va a el evento ConnectionRequest, ahi solo pon Winsock1.Close y Winsock1.Accept requestId

Para enviar datos es : Winsock1.SendData datos_aki (un textbox o lo ke kieras)

Para recibir datos es en el evento DataArrival, para esto pon Winsock1.GetData datoz, vbString y los datos se kedan en la variable datoz

Como veraz es muy facil, si aun tienes dudas me avisas y con gusto te mando un ejemplo