Menampilkan IP Address Dengan VB.NET

Dengan Visual Basic .Net kita dapat dengan mudah mendapatkan informasi nama host name dan IP Address dari sebuah komputer, Hal ini karena .Net sudah membuatkan class untuk keperluan ini yaitu clas System.Net. Berikut contohnya menggunakan VB.Net 2010:

Imports System.Net

Public Class FrmIPAddress

    Private Sub BtnGetIP_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnGetIP.Click
        Dim strHostName As String
        Dim strIPAddress As String

        strHostName = System.Net.Dns.GetHostName()
        strIPAddress = System.Net.Dns.GetHostEntry(strHostName).AddressList(0).ToString()
        TxtHostName.Text = strHostName
        TxtIPAddress.Text = strIPAddress
    End Sub

Hasilnya:

Host Name Dan IP Address

Mudah sekali bukan, nah pertanyaan selanjutnya adalah bagaimana bila dalam satu komputer terdapat lebih dari satu network card? otomatis komputer tersebut memiliki lebih dari satu IP Address. Untuk itu kita bisa menggunakan perulangan. Berikut contohnya:

    Private Sub BtnGetAllIP_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnGetAllIP.Click
        Dim strHostName As Net.IPHostEntry = Dns.GetHostEntry(System.Net.Dns.GetHostName)
        For Each IPAddress As Net.IPAddress In strHostName.AddressList
            ListIPAddress.Items.Add(IPAddress.ToString())
        Next
    End Sub

Hasilnya:

List All IP Address

Selamat Mencoba.., Semoga bermanfaat.

5 Responses to “Menampilkan IP Address Dengan VB.NET”

  1. Menampilkan Informasi Network Card « Sugeng Rawuh Says:

    […] sebelumnya sudah saya share bagaimana cara mendapatkan IP Address dari komputer, silahkan lihat di sini. Berikut ini saya lanjutkan pembahasan mengenai bagaimana mengetahui informasi detail dari network […]

  2. codebreaker Says:

    makasih banyak bermanfaat bgt

  3. LarsM Says:

    Saya mencba progrsm buatan anda di asp.net dengan source codenya vb, tapi koq ip alamat yang saya dapat ::1. Ada solusinya?

    • alva edison Says:

      strIPAddress = System.Net.Dns.GetHostEntry(strHostName).AddressList(0).ToString()
      diganti
      strIPAddress = System.Net.Dns.GetHostbyname(strHostName).AddressList(0).ToString()

  4. JImmy Says:

    Waaah Good banget, tapi kenapa saya coba utk HostName bisa, tapi utk IPAddress keluarnya beda spt angka hexa


Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: