Tengo una duda, quisiera saber como funcionan los socckets, es decir, dos ordenadores, y poder mandar desde un texto a otro, que ese lo reciba y que además pueda mandar texto al otro.
Tengo esto para conectar, pero no se como va la cosa.
Agradecería cualquier ayuda, he encontrado ejemplos pero nada claro, se van mucho por la ramas.
Algo sencillo, conectar, enviar y recibir
Código:
Public Function Conectar(ByVal servidor As String, ByVal puerto As Integer) As Boolean Try Dim s As Socket Dim hostadd As IPAddress ' Resolviendo el Host remoto... hostadd = Dns.GetHostEntry(servidor).AddressList(0) ' Creando la dirección completa.... ' ... me conectare al puerto 23... Dim EPhost As New IPEndPoint(hostadd, puerto) ' Registrando el socket ... s = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp) ' Intentando conexión con el host ... s.Connect(EPhost) If Not s.Connected Then Return False Else Return True End If Catch ex As Exception Return False End Try End Function