Active Directory auslesen

[renekr]

Hallo,
Kann mir jemand sagen wie ich aus einem AD per SQL über Delphi zb. User Gruppen usw auslesen kann.

Habe schon einige Beispiele gefunden ,aber nicht per Delphi.

Unsere AD Struktur ist zudem nciht so easy weil, wir mehrere OU's haben mit unter OU's usw.

Ich will nun alle User mit Details ( email usw ) auslesen wenn möglich Gruppiert nach OU's ( das sind bei uns die Abt. Kürzel.)

Im SQL Server habe ich es so,aber ich muß dann die OU direkt angeben,aber ich will ja die komplette Struktur.

SQL-Code:

exec sp_addlinkedserver 'ADSI','','ADSDSOObject'

create view vwADusers
as
Select [name],SN[Last Name],ST State
from Openquery (ADSI,
'Select Name,SN,ST from
''LDAP://server/ cn=users,DC=hbi,DC=ad,DC=Firma,DC=com''
where objectcategory =''Person'' and
objectClass =''user''')


go

Select * from VWADUsers order by name

Vielen Dank.

[renekr]

Hallo,

Hat den hier noch niemand was mit LDAP in Delphi gemacht?

Habs nun soweit hinbekommen das ich alles auslesen kann,aber ich bekomme aus Sicherheitsgründen nur die ersten 1000 Ergebnisse zurück.

Weiß jemand eine Lösung wie ich zb. Pagenext oder Next mache?

Danke.