Change Local Administrator Password on 9000 WS via AD

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

We need to change local administrator password on 9000 workstartion and was
wondering if this can be done by creating a script and deploying it by AD.

Can someone please help and advise. Any help would be grately appreciated.

Thanks
 
Hi Rodney,
Many thanks for your reply. I have had a look and have a
question for you. Would this be an automated process or manual as in do I
have to type the computer name individually for each client machine that
needs local admin password resetting ?

What I would ideally like to do is change local admin password on all the
9000 clients by implementing a group policy which will run this script.

Please advise.

Thanks.
 
That would do one at a time manually.

Try this :)

sPassword = "" ' put your static password here
sComputer = "."
Set oUser = GetObject("WinNT://" & sComputer & "/Administrator, user")
WScript.Echo "changing the password on " & sComputer & " to " & sPassword
oUser.SetPassword "'" & sPassword & "'"
oUser.SetInfo
If (err.Number <> 0) Then
MsgBox Err.Description,,"Error!"
Else
MsgBox "Password Change is complete",,"Completed"
End if


--
Rodney Buike
MVP Windows Server - Directory Services

http://thelazyadmin.com
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top