HB, Thank you for the ideas and suggestions. I installed kix 411 on my desktop (great idea).

The code you suggested works for name but group returns only empty fields. What am I doing wrong?

BREAK ON
$ou = GetObject("LDAP://mycompany.com/ou=texas,ou=sales,DC=mycompany,DC=com")
Dim $Filter[0]
$Filter[0] = "user"
$ou.Filter = $Filter
for each $account in $ou
$name = $account.name
? "name = $name"
$groups = $account.groups
for each $group in $groups
? "group = $group"
next
next