Lenovo ThinkPad R400 Dağıtım Kılavuzu - Sayfa 23

Masaüstü Lenovo ThinkPad R400 için çevrimiçi göz atın veya pdf Dağıtım Kılavuzu indirin. Lenovo ThinkPad R400 36 sayfaları. (bulgarian) setup guide
Ayrıca Lenovo ThinkPad R400 için: İlk Kurulum (2 sayfalar), Kurulum Kılavuzu (2 sayfalar), Broşür (4 sayfalar), Teknik Özellikler (4 sayfalar), Dağıtım Kılavuzu (44 sayfalar), Broşür (4 sayfalar), Uyarı (24 sayfalar), Uyarı (1 sayfalar), Dağıtım Kılavuzu (40 sayfalar), Kullanıcı Kılavuzu (28 sayfalar), (İspanyolca) Kurulum Posteri (2 sayfalar), (Portekizce) Kurulum Posteri (2 sayfalar), (Portekizce) Kurulum Posteri (2 sayfalar), (İtalyanca) Kurulum Posteri (2 sayfalar), (Almanca) Kurulum Posteri (2 sayfalar), (Felemenkçe) Kurulum Posteri (2 sayfalar), (Fince) Kurulum Posteri (2 sayfalar), (Danca) Kurulum Posteri (2 sayfalar), (Danca) Kurulum Posteri (2 sayfalar), (Rusça) Kurulum Posteri (2 sayfalar), (Romence) Kurulum Posteri (2 sayfalar), Kurulum Posteri (2 sayfalar), Kurulum Posteri (2 sayfalar), Kurulum Posteri (2 sayfalar), Kurulum Posteri (2 sayfalar), Kurulum Posteri (2 sayfalar)

strReturn = "error"

For Each objItem in colItems

WScript.Echo strRequest

WScript.Echo " SaveBiosSettings: " + strReturn

Set a single BIOS setting on the local computer if a supervisor

password exists

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 WakeOnLAN Disable pass,ascii,us

' Set specific BIOS Setting

On Error Resume Next

Dim colItems

If WScript.Arguments.Count <> 3 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

WScript.Echo strRequest

WScript.Echo " SetBiosSetting: " + strReturn

If strReturn <> "Success" Then

End If

Set colItems = objWMIService.ExecQuery("Select * from Lenovo_SaveBiosSettings")

strReturn = "error"

For Each objItem in colItems

WScript.Echo strRequest

WScript.Echo " SaveBiosSettings: " + strReturn

Use the sample scripts in the ZIP file as templates to list all BIOS settings and

values on a remote computer.

ObjItem.SaveBiosSettings ";", strReturn

WScript.Echo "SetConfigPassword.vbs [setting] [value] [password + encoding]"

WScript.Quit

WScript.Arguments(2) + ";"

&"{ImpersonationLevel=Impersonate}!\\" & strComputer & "\root\wmi")

ObjItem.SetBiosSetting strRequest, strReturn

WScript.Quit

ObjItem.SaveBiosSettings WScript.Arguments(2) + ";", strReturn

Appendix A. Sample Visual Basic scripts for configuring BIOS settings

' Change as needed.