Получить список пользователей Active Directory вместе с их полным именем и адресом электронной почты

Question

Мне нужно получить список пользователей Active Directory и их атрибутов, используя Delphi 2010.

Я видел несколько похожих вопросов по SO (например, Delphi - Найти основной адрес электронной почты для пользователя Active Directory ), но все они, кажется, требуют имя пользователя, прежде чем можно будет получить какую-либо дополнительную информацию .

Answer 1

Я написал статью для [The Delphi Magazine] еще тогда, когда ..... если у вас есть доступ к журналам этих журналов, то это проблема №.62 (октябрь 2000) - к сожалению, похоже, что эти проблемы больше не доступны для покупки: - (

Это слишком длинная статья и пример кода, чтобы публиковать здесь ... в основном речь идет об упаковкеIDirectorySearch интерфейс в более приятной Delphi-подобной оболочке. Вы передаете базовый контейнер для поиска, вы определяете фильтр LDAP и определяете набор интересующих вас атрибутов - затем выискать и возвращать в основном счетчик результатов, который вы можете получить один за другим.

Answer 2

В конце концов, я обнаружил TJvObjectPickerDialog , часть JVCL.Он оборачивает диалоговое окно Windows Select Object и делает все, что мне нужно, с очень небольшим количеством кода.Просто установите необходимые свойства и вызовите execute.Выбранные объекты пользователя возвращаются вместе с атрибутами, заданными в свойстве «Атрибуты».