Please excuse the
VB code, but you should be able to translate quite easily.
Dim mc As ManagementClass
Dim moc As ManagementObjectCollection
Dim mo As ManagementObject
mc = New ManagementClass("Win32_NetworkAdapterConfiguration ")
moc = mc.GetInstances() ' Get all network adapter instances
For Each mo In moc
If mo.Item("IPEnabled") Then
MsgBox(mo.Item("MacAddress").ToString())
End If
Next
Best Regards,
Earl Francis