Lenovo ThinkStation E31 Manuel de déploiement - Page 33

Parcourez en ligne ou téléchargez le pdf Manuel de déploiement pour {nom_de_la_catégorie} Lenovo ThinkStation E31. Lenovo ThinkStation E31 36 pages. Avid workstation tower/sff single quad core cpu qualified for software only symphony 6.x, media composer 6.x, & newscutter 10.x
Également pour Lenovo ThinkStation E31 : Manuels de configuration (15 pages)

Lenovo ThinkStation E31 Manuel de déploiement
Set a Administrator password on a remote computer
when a Administrator password exists
@Copyright Lenovo 2012
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
&
strComputer &
Set
colItems
=
Lenovo_SetBiosPassword")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SetBiosPassword strRequest, strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SetBiosPassword: "
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 SetAdminPasswordRemote.vbs [old password]
[new password] [encoding] [hostname]
Example: cscript.exe SetAdminPasswordRemote.vbs oldpass newpass
"ascii,us" mattdev-c5
'
' Update Administrator password
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count < > 4 Then
WScript.Echo
"SetAdminPasswordRemote.vbs
[newpassword] [encoding] [hostname]"
WScript.Quit
End If
strRequest="pap,"+WScript.Arguments(0)+","+ WScript.Arguments(1)
+ ","Wscript.Arguments(2)+";"
strCompter = Wscript.Arguments(3) 'change as needed
Set
objWMIService
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
&
strComputer &
Set
colItems
=
Lenovo_SetBiosPassword")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SetBiosPassword strRequest, strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SetBiosPassword: "
"\root\wmi")
objWMIService.ExecQuery("Select
+ strReturn
= GetObject("WinMgmts:" _
"\root\wmi")
objWMIService.ExecQuery("Select
+ strReturn
*
from
[oldpassword]
*
from
25