RE: off topic- change local administrator password across the domain

  • From: "MJ" <mjtech@xxxxxxxxx>
  • To: "[ExchangeList]" <exchangelist@xxxxxxxxxxxxx>
  • Date: Sun, 8 Jan 2006 08:02:01 -0500

This script will do the trick for you

Start=====================================================

intMessage = Msgbox("Are you sure you want to change the Local Admin for
each computer in the domain, including servers?",_
vbYesNo, "Change Local Admin Password on All Domain Computers/Servers?")
If intMessage = vbYes Then
Wscript.Sleep 2500
OUS = Array("OU=Domain Controllers,DC=MyDomain,DC=com", _
"OU=Servers,DC=MyDomain,DC=com")

For Each OU in OUS

Set objOU = GetObject("LDAP://"; & OU)
objOU.Filter = Array("Computer")

On Error Resume Next
For Each objItem in objOU
strComputer = objItem.CN
Set objUser = GetObject("WinNT://" & strComputer & "/Administrator")
objUser.SetPassword("G00df3llas")
Next
wscript.echo "All passwords for the Computers in " & OU & " have changed as
of: " & Now()
Next
Else
Wscript.Echo "Done"
End IF

End=======================================================

do the necassery changes then save it as a vbs.

hope that helps

-----Original Message-----
From: Ara Avvali [mailto:ara.avvali@xxxxxxxxxxxxx]
Sent: Sunday, January 08, 2006 2:37 AM
To: [ExchangeList]
Subject: [exchangelist] RE: off topic- change local administrator
password across the domain


http://www.MSExchange.org/

Jeffery,
Thanks for response but this is not a good solution for 50+ computers.

-----Original Message-----
From: Jeffrey Moscone [mailto:jeff@xxxxxxxxxxxxxx]
Sent: Saturday, January 07, 2006 9:37 PM
To: [ExchangeList]
Subject: [exchangelist] RE: off topic- change local administrator
password across the domain

http://www.MSExchange.org/

Hello,
Use Computer Management. When it opens, right click on Computer
Management and choose Connect To. Connect to your Member Server and
browse to the account that you want to change.
Good Luck.

Jeffrey Moscone
jeff@xxxxxxxxxxxxxx
www.mosconeusa.com

-----Original Message-----
From: Ara Avvali [mailto:ara.avvali@xxxxxxxxxxxxx]
Sent: Saturday, January 07, 2006 9:21 PM
To: [ExchangeList]
Subject: [exchangelist] off topic- change local administrator password
across the domain

http://www.MSExchange.org/

Greetings,

Anyone knows a tool I can use to change local administrator password for
computers across the domain? I can rename the account with group policy
but no able to change the password.

Appreciated


------------------------------------------------------
List Archives: http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Exchange Newsletters: http://www.msexchange.org/pages/newsletter.asp
------------------------------------------------------
Visit TechGenix.com for more information about our other sites:
http://www.techgenix.com
------------------------------------------------------
You are currently subscribed to this MSExchange.org Discussion List as:
jeff@xxxxxxxxxxxxxx
To unsubscribe visit
http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Report abuse to info@xxxxxxxxxxxxxx

------------------------------------------------------
List Archives: http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Exchange Newsletters: http://www.msexchange.org/pages/newsletter.asp
------------------------------------------------------
Visit TechGenix.com for more information about our other sites:
http://www.techgenix.com
------------------------------------------------------
You are currently subscribed to this MSExchange.org Discussion List as:
ara.avvali@xxxxxxxxxxxxx
To unsubscribe visit
http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Report abuse to info@xxxxxxxxxxxxxx

------------------------------------------------------
List Archives: http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Exchange Newsletters: http://www.msexchange.org/pages/newsletter.asp
------------------------------------------------------
Visit TechGenix.com for more information about our other sites:
http://www.techgenix.com
------------------------------------------------------
You are currently subscribed to this MSExchange.org Discussion List as:
mjtech@xxxxxxxxx
To unsubscribe visit
http://www.webelists.com/cgi/lyris.pl?enter=exchangelist
Report abuse to info@xxxxxxxxxxxxxx



Other related posts: