Here's a quick and dirty using the shiny new RC1 ...

code:

BREAK ON

$DOMAIN = GETOBJECT("WinNT://@LDOMAIN")

$DOMAIN.FILTER = USER,""

?
?"LOCKED ACCOUNTS IN @LDOMAIN:"
?

FOR EACH $USER IN $DOMAIN
IF $USER.ACCOUNTDISABLED
? $USER.NAME
ENDIF
NEXT

$DOMAIN=0

EXIT


-Shawn