BREAK ON
SETOPTION("WrapAtEOL", "ON")
CALL "@SCRIPTDIR\fnLDAPQuery.kix"

$Attributes = "sAMAccountName", "displayName", "Title", "Company", "streetAddress", "postalCode", "postOfficeBox"
$ADPath = "LDAP://"+GetObject("LDAP://rootDSE").Get("defaultNamingContext")
$Filter = "(&(objectCategory=person)(objectClass=user))"

$Results = fnLDAPQuery($Attributes, $ADPath, $Filter)
? "@ERROR | @SERROR"

FOR $c = 0 TO UBOUND($Results)
    FOR $r = 0 TO UBOUND($Results,2)
        ? $Results[$c,$r]
    NEXT
    ? ""
NEXT