Lenovo ThinkStation D20 Manual de implantação - Página 23

Procurar online ou descarregar pdf Manual de implantação para Ambiente de trabalho Lenovo ThinkStation D20. Lenovo ThinkStation D20 28 páginas. Windows xp professional x64 edition recovery and conversion kit - japan
Também para Lenovo ThinkStation D20: Brochura (36 páginas), Especificações (4 páginas), Brochura e especificações (4 páginas), Manual (8 páginas), Manual de funções (1 páginas), Manual do software (japonês) (8 páginas)

Imprimir página
Lenovo ThinkStation D20 Manual de implantação
Set a single BIOS setting on the local computer if a
Administration password exists
 
@Copyright Lenovo 2010
WScript.Echo "
SetBiosSetting: "
If strReturn < > "Success" Then
WScript.Quit
End If
Set
colItems = objWMIService.ExecQuery("Select * from
Lenovo_SaveBiosSettings)
strReturn = "error"
For
Each objItem in colItems
ObjItem.SaveBiosSettings ",", strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SaveBiosSettings: "
Use the sample scripts in the ZIP file as templates to set a single 
BIOS setting on the local computer if a supervisor password 
exists. 
Syntax: cscript.exe SetConfigPassword.vbs [Item] [Value]
[Password +
Encoding]
Example: cscript.exe SetConfigPassword.vbs "Wake on LAN"
Disabled pass,ascii,us
'
' Set
specific BIOS Setting
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count < > 3 Then
WScript.Echo "SetConfigPassword.vbs
[password + encoding]"
WScript.Quit
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) +
","
strComputer = "LOCALHOST"
objWMISevice = GetObject("WinMgmts:" _
&"{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
WScript.Echo "
SetBiosSetting: "
If strReturn <> "Success" Then
WScript.Quit
+ strReturn
+ strReturn
[setting]
' Change as
needed.
+ strReturn
[value]
17