User's Guide

I-2 Accessing Power and Performance Data
'call the driver
Dim outparams
set outparams = oipmi.execmethod_("requestresponse",oinparams)
WScript.Echo " Completion Code = 0x" & hex(outparams.Completioncode)
If outparams.Completioncode <> 0 Then
Wscript.Echo " Not supported"
Else
'WScript.Echo " Data LS Byte = 0x" & hex(outparams.ResponseData(1))
'WScript.Echo " Data MS Byte = 0x" & hex(outparams.ResponseData(2))
WScript.Echo " Power Consumption = " & outparams.ResponseData(2)*256 + _
outparams.ResponseData(1) & " watts"
End If
' End Script
Command Line (Example)
C:\VBS> cscript //nologo Power.vbs
Execution Result (Example)
Completion Code = 0x0
Power Consumption = 528 watts
The power consumption is 528 watts.
NOTE: Power consumption may not be collected depending on power
supply configuration of the server. In such a case, Completion Code is
shown as 0xC1 or 0xCB.