Узнаем внешний IP адрес

Узнаем внешний адрес с помощью парсинга с сайта  https://www.getip.com/

Загрузить проект

vIP Узнаем внешний IP адрес

  Метки:
  Евгений
  Просмотров: 9 142
  Запись опубликована в 06:16

6 комментариев

  • BackdoorCybergate.2698 - поясните, пожалуйста.

  • Т.е. программа с подобным кодом обречена на поругание антивирем?

  • Мне кажется так короче:
    Public Class Form1
    Dim objEntry As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
    Dim strIP As String = CType(objEntry.AddressList.GetValue(0), System.Net.IPAddress).ToString

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    Label1.Text = " IP - " + (strIP)
    End Sub

    End Class
    :?:

  • http://ip-address.ru/show
    отсюда даже парсить не надо

  • Dim Client As New Net.WebClient
    Client.Proxy = New System.Net.WebProxy
    Dim Tmp As String = Client.DownloadString("http://ip-address.ru/show")
    Label1.Text = Tmp
    Client.Dispose()

Есть что сказать? Тогда действуй!