Steps through all attributes of the entry returned by a previous call to WebLdapNextEntry.
WebAPI.bdh
WebLdapNextAttribute( in hLDAP : number, out sName : string, in nMaxLen : number optional): boolean
true if there was at least one attribute left to receive from the entry
false otherwise
Parameter | Description |
---|---|
hLDAP | Handle to a Web connection that was created by WebLdapConnect. |
sName | This variable will receive the name of the next attribute. |
nMaxLen | Specifies the maximum length of the attribute name (optional). |
dclfunc function TWebLdapPrintSearchResults(hLdap: number) var sName : string(500); nEntries : number; begin nEntries := 0; while WebLdapNextEntry(hLdap, sName, STRING_COMPLETE, false) do nEntries := nEntries + 1; write("entry: "); write(sName); writeln; while WebLdapNextAttribute(hLdap, sName) do write(" attrib: "); write(sName); writeln; while WebLdapNextValue(hLdap, sName) do write(" value: "); write(sName); writeln; end; end; end; if (nEntries = 0) then write("No entries found"); writeln; end; writeln; end TWebLdapPrintSearchResults;
LDAP.sep