Lenovo ThinkCentre M90p Руководство по развертыванию - Страница 28

Просмотреть онлайн или скачать pdf Руководство по развертыванию для Настольный компьютер Lenovo ThinkCentre M90p. Lenovo ThinkCentre M90p 32 страницы. (simplified chinese) power manager deployment guide
Также для Lenovo ThinkCentre M90p: Технические характеристики (4 страниц), Руководство по развертыванию (44 страниц), Руководство по развертыванию (44 страниц), Руководство по конфигурации (40 страниц), Руководство по развертыванию (на английском языке) (46 страниц), (Итальянский) Руководство по развертыванию (44 страниц), (Немецкий язык) Руководство по внедрению (46 страниц), (Японский) Руководство по развертыванию (44 страниц), Руководство по развертыванию (42 страниц)

Печатать страницу
Lenovo ThinkCentre M90p Руководство по развертыванию
Set a Administrator password on the local computer
when a Administrator password exists
Lenovo BIOS Windows Management Instrumentation Interface Deployment Guide for Desktop
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) +
";"
strComputer = WScript.Arguments(3)
Set
objWMIService
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
&
strComputer &
Set
colItems
=
Lenovo_SetBiosSetting")
For
Each objItem in colItems
ObjItem.SetBiosSetting strRequest, strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SetBiosSetting: "
If strReturn <> "Success" Then
WScript.Quit
End If
Set
colItems
=
Lenovo_SaveBiosSettings")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SaveBiosSettings Wscript.Arguments(2)+";", 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 a remote computer.
Note: You cannot set a password if one does not already exist.
Syntax: cscript.exe SetAdminPassword.vbs [old password] [new
password] [encoding]
Example: cscript.exe SetAdminPassword.vbs oldpass newpass
"ascii,us"
'
' Update Administrator password
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count < > 3 Then
WScript.Echo "SetAdminPassword.vbs [oldpassword] [newpassword]
[encoding]"
WScript.Quit
End If
strRequest="pap,"+WScript.Arguments(0)+","+ WScript.Arguments(1)
+ ","Wscript.Arguments(2)+";"
strCompter = "LOCALHOST" 'change as needed
Set
objWMIService
= GetObject("WinMgmts:" _
"\root\wmi")
objWMIService.ExecQuery("Select
+ strReturn
objWMIService.ExecQuery("Select
+ strReturn
= GetObject("WinMgmts:" _
*
from
*
from
20