Lenovo ThinkPad R500 Podręcznik wdrażania - Strona 22

Przeglądaj online lub pobierz pdf Podręcznik wdrażania dla Pulpit Lenovo ThinkPad R500. Lenovo ThinkPad R500 36 stron. Bios windows management instrumentation interface
Również dla Lenovo ThinkPad R500: Plakat konfiguracji (2 strony), Instrukcja konfiguracji początkowej (2 strony), Broszura (4 strony), Specyfikacje (4 strony), Podręcznik wdrażania (44 strony), Zawiadomienie (24 strony), Zawiadomienie (1 strony), Podręcznik wdrażania (40 strony), Podręcznik użytkownika (28 strony)

Drukuj stronę
Lenovo ThinkPad R500 Podręcznik wdrażania
Syntax: cscript.exe ListAll.vbs
Example: cscript.exe ListAll.vbs
'
' List all BIOS settings
'
On Error Resume Next
Dim colItems
strComputer = "LOCALHOST"
Set objWMIService = GetObject("WinMgmts:" _
Set colItems = objWMIService.ExecQuery("Select * from Lenovo_BiosSetting")
For Each objItem in colItems
Next

Set a single BIOS setting on the local computer

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] [Value]
Example: cscript.exe SetConfig.vbs WakeOnLAN Disable
'
' Set specific BIOS Setting
'
On Error Resume Next
Dim colItems
If WScript.Arguments.Count <> 2 Then
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) + ";"
strComputer = "LOCALHOST"
Set objWMIService = GetObject("WinMgmts:" _
Set colItems = objWMIService.ExecQuery("Select * from Lenovo_SetBiosSetting")
For Each objItem in colItems
Next
WScript.Echo strRequest
WScript.Echo " SetBiosSetting: " + strReturn
If strReturn <> "Success" Then
End If
Set colItems = objWMIService.ExecQuery("Select * from Lenovo_SaveBiosSettings")
14
Lenovo BIOS Windows Management Instrumentation Interface Deployment Guide
&"{ImpersonationLevel=Impersonate}!\\" & strComputer & "\root\wmi")
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, 256)
WScript.Echo StrItem + " = " + StrValue
End If
WScript.Echo "SetConfig.vbs [setting] [value]"
WScript.Quit
&"{ImpersonationLevel=Impersonate}!\\" & strComputer & "\root\wmi")
ObjItem.SetBiosSetting strRequest, strReturn
WScript.Quit
' Change as needed.
' Change as needed.