Lenovo ThinkStation D20 Manual de implantación - Página 22

Navegue en línea o descargue pdf Manual de implantación para Escritorio Lenovo ThinkStation D20. Lenovo ThinkStation D20 28 páginas. Windows xp professional x64 edition recovery and conversion kit - japan
También para Lenovo ThinkStation D20: Folleto (36 páginas), Especificaciones (4 páginas), Folleto y especificaciones (4 páginas), Manual (8 páginas), Manual de funciones (1 páginas), (Japonés) Manual del software (8 páginas)

Lenovo ThinkStation D20 Manual de implantación

List all BIOS settings on the local computer

Set a single BIOS setting on the local computer

Lenovo BIOS Windows Management Instrumentation Interface Deployment Guide for Workstations
Use the sample scripts in the ZIP file as templates to list all 
BIOS settings and values on the local computer. 
Syntax:  cscript.exe
Example:  cscript.exe
'
' List all BIOS settings
'
On
Error Resume Next
Dim colItems
strComputer = "LOCALHOST"
Set
objWMIService
&"{ImpersonationLevel=Impersonate}!\\" & strComputer _
&"\root\wmi")
Set
colItems = objWMIService.ExecQuery("Select * from
Lenovo_BiosSetting")
For
Each objItem in colItems
If
Len(objItem.CurrentSetting) > 0 Then
Setting = ObjItem.CurrentSetting
StrItem = Left(ObjItem.CurrentSetting,InStr(
ObjItem.CurrentSetting, ",")-1)
StrValue = Mid(ObjItem.CurrentSetting,InStr(
ObjItem.CurrentSetting, ",")-1)
WScript.Echo StrItem + " = " + StrValue
End If
Next
Use the sample scripts in the ZIP file as templates to set a single 
BIOS setting on the local computer. 
Syntax: cscript.exe SetConfig.vbs [Item]
Example: cscript.exe SetConfig.vbs "Wake on LAN"
'
' Set
specific BIOS Setting
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count < > 2 Then
WScript.Echo "SetConfig.vbs
WScript.Quit
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) +
","
strComputer = "LOCALHOST"
Set
objWMIService
&"{ImpersonationLevel=Impersonate}!\\" & strComputer _
&"\root\wmi")
Set
colItems = objWMIService.ExecQuery("Select * from
Lenovo_SetBiosSetting")
For
Each objItem in colItems
ObjItem.SetBiosSetting strRequest, strReturn
Next
WScript.Echo strRequest
ListAll.vbs
ListAll.vbs
= GetObject("WinMgmts:" _
[Value]
[setting]
= GetObject("WinMgmts:"_
' Change as
needed.
Disabled
[value]"
' Change as
needed.
16