Lenovo ThinkStation S20 Podręcznik wdrażania - Strona 23

Przeglądaj online lub pobierz pdf Podręcznik wdrażania dla Pulpit Lenovo ThinkStation S20. Lenovo ThinkStation S20 28 stron. Windows xp professional x64 edition recovery and conversion kit - japan
Również dla Lenovo ThinkStation S20: Broszura (36 strony), Specyfikacje (4 strony), Broszura i specyfikacje (4 strony), Podręcznik (8 strony), Podręcznik funkcji (1 strony), (Japoński) Instrukcja oprogramowania (8 strony)

Drukuj stronę
Lenovo ThinkStation S20 Podręcznik wdrażania
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