break on

$computer = getobject("WinNT://@WKSTA,computer")

if $computer

 $computer.filter = "user", ""

 for each $user in $computer

  if $user.description = "This is a vendor's account for the Help and Support Service"

    ?"Found account " + $user.name

    ; delete/disable it !

  endif

 next

endif

exit 0