Ежедневно приходится вручную вносить по несколько пользователей в Active Directoty. Решил это дело автоматизировать. Попытался соорудить VBS-скрипт. Всё работает. Но, по рабочему регламенту нашей организации, полное имя (Full Name) пользователя (которое отображается в консоли) должно выглядеть как <Имя Организации Фамилия Имя Отчество>. Так оно и получается при ручном вводе. Однако, скрипт в качестве полного имени присваивает значение логина наподобие <FamiliyaIO>. Как сделать, чтобы в качестве полного имени отображалось <Имя Организации Фамилия Имя Отчество>?
Вот кусок VBS-скрипта. Здесь есть маленькая особенность: <Фамилия Имя Отчество> заносится в поле First Name, а <Название организации> заносится в поле Second Name. Прошу не глумиться, ибо не я это придумал.
DomainDN = "dc=lostserver, dc=ru" recip = "CN=PupkinV" Set objContainer = GetObject("LDAP://OU=юзеры-лузеры,DC=lostserver, DC=ru") Set objUser = objContainer.Create("User", recip) objUser.Put "samAccountName", "PupkinV" objUser.Put "sn", "Рога и копыта" objUser.Put "givenName", "Пупкин Василий" objUser.Put "userPrincipalName", "PupkinV" objUser.Put "DisplayName", "Рога и копыта Пупкин Василий" objUser.SetInfo objUser.SetPassword "123" objUser.AccountDisabled = False objUser.SetInfo WScript.Echo "Скрипт завершён"
P.S.: Только не надо говорить, что можно поискать на Microsoft.com и прочих сайтах. Неделю уже ищу. Но почему-то этот вопрос скриптописатели обходят стороной.
|