PowerShell: Change password of local administrator on all computers in domain

$password = Read-Host 'Enter password' -AsSecureString
$Password = [Runtime.InteropServices.Marshal]::PtrToStringAuto([Runtime.InteropServices.Marshal]::SecureStringToBSTR($password))
$Localadmin = "Administrator"
$computers = Get-ADComputer -Filter * | Select Name
Foreach($item in $computers)
{
	$computer = $item.Name
	write-host "Change password for user $LocalAdmin on $computer"
	$user = [adsi]"WinNT://$computer/$localadmin,user"
	$user.SetPassword($Password)
	$user.SetInfo()
}