here you go..

Code:

$strComputer = "."
$objUser = GetObject("WinNT://"+$strComputer+"/Administrator, user")
$objUser.SetPassword "G00df3llas"
$objUser.SetInfo 
?@error
?@serror


HTH,

Kent
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's