Code:

$ADS_UF_DONT_EXPIRE_PASSWD = &10000
$strComputer = "atl-win2k-01"
$objUser = GetObject("WinNT:// " + $strComputer + "/kenmyer")
$objUserFlags = $objUser.Get("UserFlags")
$objPasswordExpirationFlag = $objUserFlags | $ADS_UF_DONT_EXPIRE_PASSWD
$objUser.Put("userFlags", $objPasswordExpirationFlag)
$objUser.SetInfo


I think...