Hálózati kártya MAC Address-ének lekérdezése programból

A megoldáshoz egy WMI (Windows Management Instrumentation) lekérdezést futtatunk, mely a hálózati kártyák információit szolgáltatja számunkra. WMI lekérdezéshez a ManagementObjectSearcher osztály nyújt segítséget.

Dim mos As New ManagementObjectSearcher("select * from Win32_NetworkAdapter")
      ...

A lekérdezés futtatása után a ManagementObjectSearcher osztály Get függvényével kaphatunk egy kollekciót, melyben az összes hálózati kártya helyet kap. Ezen a kollekción megyünk végig egy foreach ciklussal. A kollekció minden eleme egy ManagementObject osztály lesz, melyen keresztül elérhetjük a számunkra szükséges adatokat.

    For Each mo In mos.Get()
      Try
        s(0) = mo("Name").ToString()
        s(1) = mo("MACAddress").ToString()
        s(2) = mo("AdapterType").ToString()
        lvi = New ListViewItem(s)
        listView1.Items.Add(lvi)
      Catch
      End Try
    Next mo

Ha a Win32_NetworkAdapter lekérdezést futtatjuk, akkor az alábbi adatokat érhetjük el a MACAddresse-en kívül: