Obtener IP con VB.NET y C# Fecha: 02/Feb/2005 (01/02/2005)
|
Esta es una pequeña aplicación de consola para mostrar las IPs de un host, recibe como parametro el nombre del host en la linea de comandos, si no recibe este parametro, despliega las IPs locales, originalmente esta escrito en VB.NET, pero va la traducción a C# tambien :)
Código en Visual Basic:
Imports System.Net Module Module1 Sub Main() Dim i_cont As Integer Dim Host As String ' Si no se pasa como parametro un nombre, muestra las ip locales If Environment.GetCommandLineArgs().Length > 1 Then Host = Environment.GetCommandLineArgs(1) Else Host = Dns.GetHostName End If Dim IPs As IPHostEntry = Dns.GetHostByName(Host) Dim Direcciones As IPAddress() = IPs.AddressList 'Se despliega la lista de IP's For i_cont = 0 To i_cont = Direcciones.Length Console.WriteLine("IP {0}: {1} ", i_cont + 1, Direcciones(i_cont).ToString()) Next Console.Read() End Sub End Module
Código en C#:
using System; using System.Net; namespace ip_cs{ class Class1{ [STAThread] static void Main(string[] args){ string Host; string[] argumentos; //Si no se pasa como parametro un nombre, muestra las ip locales if(Environment.GetCommandLineArgs().Length > 1 ){ argumentos = Environment.GetCommandLineArgs(); Host = argumentos[1]; } else{ Host = Dns.GetHostName(); } IPHostEntry IPs = Dns.GetHostByName(Host); IPAddress [] Direcciones = IPs.AddressList; //Se despliega la lista de IP's for(int i_cont = 0 ; i_cont < Direcciones.Length ; i_cont ++){ Console.WriteLine("IP {0}: {1} ", i_cont + 1, Direcciones[i_cont].ToString()); } Console.Read(); } } }Si este código te fue util no olvides darle una calificación en PanoramaBox :)
Espacios de nombres usados en el código de este artículo:
System.Net