Quote:
I cannot understand why it returns computers names if the filter is for users.


Ahhh, now its coming back to me why I stopped working on this, every time I turned around I was hunting for something else that didn't make sense. I think I know how to fix this though... All of this is in the function I referred you too ealier.

 Code:
Dim $objAdsPath, $obj, $filter[0]
$filter[0] = "computer"
$objADsPath = GetObject("LDAP://OU=IT Suite,OU=Computers,OU=whatever,DC=domain,DC=internal")
If @Error = 0
  $objAdsPath.filter = $filter
  For Each $obj In $objAdsPath
    if $filter[0]="User"
      if $obj.class="user"
        ? $obj.name
      endif
    else
      ? $obj.name
    endif
  Next
Else
  ? "Not able to connect to LDAP path."
Endif 


By the way, instead of using the quote tags, use the code tags instead, which is the next one beside the quote tag button.