[VBNET] [WMI] 네트워크 IP 및 Subnet, Gateway 얻어오기

*VBNET WMI 를 이용한 네트워크 IP 및 Subnet, Gateway 얻어 오기 예제...

- WMI 를 사용하기 위해 참조 -> System.Management dll 을 추가 -> 소스 코드 imports System.Management

 

Main

전체 소스 코드

Form1.vb

 

Imports System.Management

Public Class Form1

    Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click

        Dim MC As ManagementClass = New ManagementClass("Win32_NetworkAdapterConfiguration")
        Dim MOC As ManagementObjectCollection = MC.GetInstances()

        For Each MO As ManagementObject In MOC

            'nothing 아니면...
            If Not MO("IPAddress") Is Nothing Then

                If TypeOf MO("IPAddress") Is Array Then
                    'IP 및 Subnet, Gateway String 배열로 변환...
                    Dim address() As String = CType(MO("IPAddress"), String())
                    Dim subnets() As String = CType(MO("IPSubnet"), String())
                    Dim gateways() As String = CType(MO("DefaultIPGateway"), String())

                    '모두 nothing 이 아니면...
                    If (Not address Is Nothing) And (Not subnets Is Nothing) And (Not gateways Is Nothing) Then

                        '화면에 표시...
                        lblIP.Text = address(0)
                        lblSubnet.Text = subnets(0)
                        lblGateway.Text = gateways(0)

                    End If


                End If
                
            End If

        Next


    End Sub

End Class

*예제 결과

 

결과화면

 

윈도우 시작 -> 실행 -> cmd -> ipconfig 를 입력 하시면 위 그림과 같이 네트워크 IP 를 확인 하실 수 있습니다.

 

 

https://kdsoft-zeros.tistory.com/154

[C#] [WMI] 네트워크 IP 및 Subnet , Gateway 얻어오기