No announcement yet.

Admin Passwords

  • Filter
  • Time
  • Show
Clear All
new posts

  • Admin Passwords


    i need to change administrator passwords on more servers 2003(they all have domains for each other but the same dhcp) in the same time is that even possible, because i now need to enter each server when i need change passwords.ty

  • #2
    Re: Admin Passwords

    Do you want to change local admin passwords, or domain admin passwords, or both? Is there more than one domain? Do you have the current password(s)?
    ** Remember to give credit where credit is due and leave reputation points where appropriate **


    • #3
      Re: Admin Passwords

      every server has his own domain,i have all passwords and i need to change domain administrator


      • #4
        Re: Admin Passwords

        if server can reboot , then you can add in logon script,

        - Call to it "password.vbe" from logon script.
        - Group Policy start up script (Computer Configuration -> Windows
        Settings -> Scripts -> Startup).


        you can use script

        Option Explicit
        Dim strComputer, objAdmin, strPassword

        strPassword = "xzy213q"
        strComputer = "west241"
        Set objAdmin = GetObject("WinNT://" & strComputer & "/administrator,user")
        objAdmin.SetPassword strPassword
        To read a text file of computer NetBIOS names you could use code similar to:
        Option Explicit
        Dim strComputer, strPassword, objAdmin, strFile, objFSO, objFile
        Const ForReading = 1

        strPassword = "xzy213q"

        ' Open text file of computer names.
        strFile = "c:\scripts\computers.txt"
        Set objFSO = CreateObject("Scripting.FileSystemObject")
        Set objFile = objFSO.OpenTextFile(strFile, ForReading)

        ' Read the file.
        Do Until objFile.AtEndOfStream
        strComputer = Trim(objFile.ReadLine)
        ' Skip blank lines.
        If (strComputer <> "") Then
        ' Bind to local Administrator user on remote computer.
        ' Trap error if computer not available.
        On Error Resume Next
        Set objAdmin = GetObject("WinNT://" & strComputer _
        & "/administrator,user")
        If (Err.Number <> 0) Then
        Wscript.Echo "Unable to connect to " & strComputer
        End If
        On Error GoTo 0
        ' Reset password.
        objAdmin.SetPassword strPassword
        End If


        Use PsPasswd v1.22 tool, you can download from below link .

        Systems administrators that manage local administrative accounts on multiple computers regularly need to change the account password as part of standard security practices. PsPasswd is a tool that lets you change an account password on the local or remote systems, enabling administrators to create batch files that run PsPasswd against the computers they manage in order to perform a mass change of the administrator password.

        Just copy PsPasswd onto your executable path, and type "pspasswd" with the command-line syntax shown below..

        Using PsPasswd
        You can use PsPasswd to change the password of a local or domain account on the local or a remote computer.

        usage: pspasswd [[\\computer[,computer[,..] | @file [-u user [-p psswd]]] Username [NewPassword]

        computer Perform the command on the remote computer or computers specified. If you omit the computer name the command runs on the local system, and if you specify a wildcard (\\*), the command runs on all computers in the current domain.
        @file Run the command on each computer listed in the text file specified.
        -u Specifies optional user name for login to remote computer.
        -p Specifies optional password for user name. If you omit this you will be prompted to enter a hidden password.
        Username Specifies name of account for password change.
        NewPassword New password. If ommitted a NULL password is applied.