Microsoft, Server 2003, sp2, Active Directory

I need to change the local admin pswd and admin name in AD to all of our workstations. I have over 1000 workstaion. I want to be able to push it with AD, it is possible? Thanks
Who is Participating?
txhockey26Connect With a Mentor Commented:
Following is a script you can use to change the local admin password on the workstations in your network.

<This first line is the path in AD where all your workstations sit>
Set objOU = GetObject("LDAP://OU=Workstations, OU=ou, DC=domain, DC=local")  
objOU.Filter = Array("Computer")

For Each objItem in objOU
    strComputer = objItem.CN
    Set objUser = GetObject("WinNT://" & strComputer & "/<local admin name>")
    objUser.SetPassword("<put password here>")
You can use Group Policy to rename the account, however, you will have to write a script to change the password as this cannot be done via GP.

Computer Configuration > Windows Settings > Security Settings > Local
Policies > Security Option you will find "Accounts: Rename administrator

Nice script tx.
Another option is to deploy the Group Policy Preferences extensions, which will allow you to both rename and change passwords via policy:

Deployment caveat - requires you to use a Vista SP1 workstation to create/manage your GPOs. Good news is that it doesn't require 2008 AD, and there's down-level support for GP Preferences on XP and 2003.
FonziMAuthor Commented:
Thanks. That work.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.