Pcs de LAN

22/06/2007 - 00:55 por Franklin Maza | Informe spam
Hola amigos del foro

Como puedo obtener en un arreglo todas las pcs con sus ips

que estan dentro de mi LAN.

gracias por su ayuda
 

Leer las respuestas

#1 Angel J. Hernández M.
25/06/2007 - 18:08 | Informe spam
Hola, lo que deseas conseguir lo puedes hacer haciendo uso de lo que te
ofrece el SO (ping y net). A continuación te muestro como sería

string equipo, direccionip;
Dictionary<string, string> equiposlan = new
Dictionary<string,string>();
System.Diagnostics.Process proc = new
System.Diagnostics.Process();
proc.StartInfo = new
System.Diagnostics.ProcessStartInfo(Environment.GetFolderPath(Environment.SpecialFolder.System)
+ @"et.exe", "view");
proc.StartInfo.UseShellExecute = false;
proc.StartInfo.RedirectStandardOutput = true;
proc.Start();
StringBuilder buffer = new StringBuilder();
buffer.Append(proc.StandardOutput.ReadToEnd());
buffer.Replace('', ' ');
buffer.Replace('', ' ');
string[] partes = buffer.ToString().Split(new string[]
{@"\\"},StringSplitOptions.RemoveEmptyEntries);

proc.StartInfo.FileName =
Environment.GetFolderPath(Environment.SpecialFolder.System) + @"\ping.exe";

for (int x = 1; x < partes.Length; x++) {
buffer.Length = 0;
equipo = partes[x].Substring(0, partes[x].IndexOf(' '));
proc.StartInfo.Arguments = equipo;
proc.Start();
buffer.Append(proc.StandardOutput.ReadToEnd());
direccionip = buffer.ToString();
direccionip = direccionip.Substring(direccionip.IndexOf('[')
+ 1, (direccionip.IndexOf(']') - direccionip.IndexOf('[')) - 1);
equiposlan.Add(equipo, direccionip);
}



Saludos,


Angel J. Hernández M.
MCP,MCAD,MCSD,MCDBA,MCT
Microsoft MVP
http://msmvps.com/blogs/angelhernandez



"Franklin Maza" wrote in message
news:
Hola amigos del foro

Como puedo obtener en un arreglo todas las pcs con sus ips

que estan dentro de mi LAN.

gracias por su ayuda

Preguntas similares