Como obter IP da máquina na rede - VB.Net

Question

Olá pessoal bom dia!

Minha duvida acredito ser simples...

Estou precisando descobrir o IP da máquina que está executando a aplicação. o programinha executa, e pega o IP e o nome da máquina que está executando-o. Simples assim.

 o nome da máquina já sei como pega: 

Dim nome_maquina As String = Environment.MachineName

Sóóóóóóóóóóó que depois de uma certa bateria de pesquisas, achei milhares de respostas,das mais variadas sobre como pegar IP da máquina, desde funções no VB, até pessoas criando funções para a mesma, e sei que não deve ser coisa de outro mundo, e muito menos mirabolante... segue algumas respostas que achei...

'exemplo 1
Dim ip As String = Context.Request.UserHostAddress

'exemplo 2
Dim IP As String = CType(h.AddressList.GetValue(0), IPAddress).ToString()

'exemplo 3
Dim IP As String = System.Net.Dns.GetHostAddresses

'exemplo 4
Private Sub IPAddress()
Dim LocalHostName As String
Dim i As Integer
LocalHostName = Dns.GetHostName()
Dim ipEnter As IPHostEntry = Dns.GetHostByName(LocalHostName)
Dim IpAdd() As IPAddress = ipEnter.AddressList
For i = 0 To IpAdd.GetUpperBound(0)
Next
End Sub 

'eeee por ai vai... A coisa vai longe...

        

 

isso vai em um grid view, mas isso não vem ao caso, acredito que para pegar um IP não há necessidade de fazer nada com o grid view, nisto já estou resolvida. Só queria mesmo saber como pega o IP...

Agradeço desde já.

 

---

**A blonde girl who tries understand the world in C# and VB** ***_Hey, se alguém resolveu seu problema, não esquece de marcar e/ou deixar sua solução!_***

Answer 1

se for web é assim

label1.text = Request.UserHostAdress

---

Junior

Answer 2

Tem várias maneiras

http://stackoverflow.com/questions/1069103/how-to-get-my-own-ip-address-in-c

ou

Private string GetIP()
{
string strHostName = "";
strHostName = System.Net.Dns.GetHostName();

IPHostEntry ipEntry = System.Net.Dns.GetHostEntry(strHostName);

IPAddress[] addr = ipEntry.AddressList;

return addr[addr.Length-1].ToString();

}

---

Não esqueça de usar o componente </> na barra para posta seu código. Microsoft MCPD,MCTS,MCC

Answer 3

de fato é para web sim, em alguns minutos vou testar, ai te informo se funcionou! =)

---

**A blonde girl who tries understand the world in C# and VB** ***_Hey, se alguém resolveu seu problema, não esquece de marcar e/ou deixar sua solução!_***