![]() Loading |
VBScript |
JavaScript |
Powershell |
Search Options: Tell Whether a Laptop Computer is Running Off Batteries
|
||
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\wmi") Set colItems = objWMIService.ExecQuery("Select * From BatteryStatus Where Voltage > 0") For Each objItem in colItems Wscript.Echo "Battery: " & objItem.InstanceName Wscript.Echo "On AC Power: " & objItem.PowerOnline Wscript.Echo "Battery is Discharging: " & objItem.Discharging Wscript.Echo "Battery is Charging: " & objItem.Charging Wscript.Echo "Remaining capacity: " & objItem.RemainingCapacity Next | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: |