Re: Automated Password Changes
From: Rick Kingslan [MVP 2000/NT] (rkingsla.cox.net@127.0.0.1)
Date: 10/18/02
- Next message: Rick Kingslan [MVP 2000/NT]: "Re: User Account + Password lists"
- Previous message: NeoSadist: "Re: Shredding software for Win2k Pro"
- In reply to: Techboy: "Automated Password Changes"
- Next in thread: Karl Levinson [x y] MVP: "Re: Automated Password Changes"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ] [ attachment ]
From: "Rick Kingslan [MVP 2000/NT]" <rkingsla.cox.net@127.0.0.1> Date: Thu, 17 Oct 2002 17:01:48 -0500
If you're in a Win2k Domain, you can use Group Policy and the scripts that
run when the machine starts up (Startup script) to accomplish just this.
Edit the GP in the computer section and under the Scripts section you will
find Startup script. In the parameters, type:
%COMPUTERNAME% <Password goes in here>
Cut the script below and pull it into the GP in the Startup script. Restart
the machine, voila! Local Administrator password reset to your new
password.
Oh, and unless a user has the ability to edit GP, they can't get to the
password. Because the script exists in the SYSVOL, the might be able to get
to that, but the password isn't in the script.
Enjoy!
--
Rick Kingslan MCSE, MCSA, MCT
Microsoft MVP - Windows 2000/NT
Beta ID #108394
'===========================================
Option Explicit
dim NewName, computername, username, SComputer, objArgs, SOldname, SNewName,
SPassword
dim Wshshell, Control
'on error resume next
Set objArgs = WScript.Arguments
Set Wshshell = Wscript.CreateObject("Wscript.shell")
If objArgs.Count < 2 Then
WScript.Echo "Usage: admin.vbs servername Password"
WScript.Echo "admin.vbs cpoctsva01 Passw0rd!"
WScript.Echo "Resets local admin pwd"
WScript.Echo " "
Else
SComputer = objArgs(0)
SPassword = objArgs(1)
End If
Set computername = GetObject("WinNT://" & SComputer & ",computer")
Set username = computername.GetObject("user", "Administrator")
Username.SetPassword SPassword
UserName.SetInfo()
'================================================
"Techboy" <techboy@thomasville.org> wrote in message
news:60e001c27618$1a1fcea0$3aef2ecf@TKMSFTNGXA09...
> We have a Windows 2000 network and we want to change the
> local administrator password for all of our pcs in our
> LAN. Is there a way that we can automate this task so we
> don't have to go to each pc and change it? The Admin
> password will be the same on all pcs. Any help would be
> greatly appreciated. Thanks
>
> Techboy
- Next message: Rick Kingslan [MVP 2000/NT]: "Re: User Account + Password lists"
- Previous message: NeoSadist: "Re: Shredding software for Win2k Pro"
- In reply to: Techboy: "Automated Password Changes"
- Next in thread: Karl Levinson [x y] MVP: "Re: Automated Password Changes"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ] [ attachment ]
Relevant Pages
|
