Chat lan en vb.net

[elfenchesco]

Buenas tardes, cómo puedo hacer un chat en una red privada? (quiero usar VB.net) me puse a investigar un poco pero lo único que encontré fue con una ip y un puerto (usando sockets); no hay otra forma? porque las computadoras que voy a usar no les puedo poner ip local fija y siempre necesitaría estar revisando la nueva ip. Lo necesito sencillo, sin imágenes ni nada, sólo textos. Digamos que si tengo buenos conocimientos de vb.net pero la verdad estoy en ceros con conexiones tanto Lan como Web. Además me gustaría saber cómo instalar por ejemplo 3 clientes y un servidor.

De antemano, Gracias

[Fann_Lavigne]

El camino esta bien con sockets, no es necesario que los clientes tengan IP fijas, eso si, debera haber un server donde todas las maquinas clientes hagan la conexion con su respectivo programa cliente, este si debe ser una sola IP....

[elfenchesco]

El problema es que el server también tiene ip local variable, no conoces otra manera que no sea con sockets?
Gracias por tu respuesta

[Fann_Lavigne]

La vdd no se me viene a la mente alguna otra forma, pero te dejo esta liga http://www.codeproject.com/KB/cs/Cha...etSockets.aspx tal vez te ayude en algo...

[elfenchesco]

Bueno, pues gracias, seguiré buscando.

[tiger015]

saludo, hace mucho hice en c# y lo hice de esta forma:

Socket socket = new Socket(AddressFamily.InterNetwork,SocketType.Strea m,ProtocolType.Tcp);

IPAddress ip =Dns.GetHostEntry("localhost").AddressList[0];
//como no usas ip fija solo pones el nombre de la pc en caso de lan o DNS en caso de ke sea por //internet en "localhost"
IPEndPoint ipend = new IPEndPoint(ip,2222);

socket.Bind(ipend);
socket.Listen(10);

//en este caso cuando se conecte el primer cliente sera redirigido a nuevosocket
//kedando socket libre y a la escucha en el mismo puerto

Socket nuevosocket = socket.Accept();

byte[] datos = new byte[2048];
string info = "";
while (nuevosocket.Connected == true)
{
int contador = nuevosocket.Receive(datos);
info = Encoding.ASCII.GetString(datos,0,contador);
}

//como se observa los datos recividos se guardan en la varible info y si quieres enviar datos //haces lo contratio

byte[] enviardato = Encoding.ASCII.GetBytes(info):
nuevosocket.Send(enviardato);


espero ke te sirva;

[elfenchesco]

Muchas gracias tiger015, realmente me sirvio de mucho tu ayuda, ahora ya tengo una idea más o menos de cómo hacerlo
Gracias