Auf Störungs-Zusammenfassung zunächst
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
arrComputers = Reihe („Computer1“, „Computer2“)
Für jedes strComputer in den arrComputers
WScript.Echo
WScript.Echo „==========================================“
WScript.Echo „Computer: “ u. strComputer
WScript.Echo „==========================================“
objWMIService = GetObject einstellen („winmgmts: \ \“ u. strComputer u. „\ Wurzel \ CIMV2“)
colItems = objWMIService.ExecQuery einstellen („* VON Win32_NetworkAdapter VORWÄHLEN“, „WQL“, _
wbemFlagReturnImmediately + wbemFlagForwardOnly)
Für jedes objItem in den colItems
WScript.Echo „Untertitel: “ u. objItem.Caption
WScript.Echo „MACAddress: “ u. objItem.MACAddress
WScript.Echo „Hersteller: “ u. objItem.Manufacturer
WScript.Echo „Name: “ u. objItem.Name
WScript.Echo
Zunächst
Zunächst
|