Right from the MSDN site adopted for KiXtart:
Code:

dim $filter[0]
$objOU = GetObject('LDAP://cn=Users,dc=NA,dc=fabrikam,dc=com')
$filter[0]='user'  
$ObjOU.Filter=$filter
For Each $objUser in $objOU
  ? $objUser.cn
Next
_________________________
There are two types of vessels, submarines and targets.