Summary: Illustrates RhinoScript code that determines the physical, or MAC, address of a computer.
The following RhinoScript uses the Windows Management Instrumentation (WMI) to determine the physical addresses, or MAC addresses, of a computer.
Sub PrintMacAddress Dim strComputer strComputer = "." Dim objWMIService Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Dim colAdaptors Set colAdapters = objWMIService.ExecQuery _ ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True") Dim n n = 1 For Each objAdapter In colAdapters Rhino.Print Rhino.Print "Network Adapter " & n Rhino.Print " Description: " & objAdapter.Description Rhino.Print " Physical (MAC) address: " & objAdapter.MACAddress n = n + 1 Next End Sub