Настройка Visual Basic 6.0 для разработки ADSI
Настройка среды разработки Microsoft Visual Studio 2010 для Visual Basic
Запустите Visual Studio 2010.
Создайте проект Visual Basic.
Добавьте ссылку на библиотеку типов Active DS.
Примечание.
Если вам не требуется ранняя привязка COM-объекта, пропустите этот шаг.
- Выбор проекта | Добавьте ссылку.
- Выберите вкладку COM .
- Выберите библиотеку типов Active DS.
Начните программирование с ПОМОЩЬЮ ADSI.
Прежде чем начать, войдите в домен Windows. Необходимо иметь разрешение на изменение базы данных Active Directory. По умолчанию Администратор istrator имеет эту привилегию.
Пример приложения Visual Basic 6.0: изменение fullName и описание пользователя
Выполните предыдущие действия, чтобы создать стандартный исполняемый проект Visual Basic.
Дважды щелкните форму. В Form_Load введите следующее. Необходимо заменить строку LDAP://CN=jeffsmith, CN=users,DC=fabrikam, DC=com на ADsPath существующего пользователя в контейнере в вашем домене. Создайте тестовую учетную запись пользователя, которую можно изменить для этой цели.
'------------------------------------------------------------ ' This code example is used to set the FullName and Description '------------------------------------------------------------ Dim usr As IADsUser ' Bind to a user object. Set usr = GetObject("LDAP://CN=jeffsmith,CN=users,DC=fabrikam,DC=com") usr.FullName = "Jeff Smith" usr.Description = "A user for fabrikam.com" usr.SetInfo ' Commit the changes to the directory
Нажмите клавишу <F5> для запуска программы.
Чтобы проверить изменения, используйте средство управления Пользователи и компьютеры Active Directory. Дополнительные сведения об использовании ADSI и Visual Basic см. в статье "Доступ к Active Directory с помощью Visual Basic".