Changes the passsword for a specific user on multiple PC's

Change-LocalPasswords

# List of hostnames
$computers = 'e:\computerlist.txt'

# Username and password to change to
$Username = ''
$NewPassowrd = ''
$ExistingCredentials = Get-Credential -Message 'Existing credentials'

foreach($Computer in (Get-Content $Computers)) {
    echo "Changing: $($Computer)"
    $System = New-Object system.directoryservices.directoryentry("WinNT://$($Computer)",$ExistingCredentials.Username,$ExistingCredentials.GetNetworkCredential().Password)

    $user = $System.Children.Find($Username, 'user')

    $user.setPassword($NewPassword)
    $user.setInfo()
    $System.close()
}