|
Скрипт для заведения пользователей в AD
|
|
|
|
Coverguy |
Четверг, 16 Марта 2006, 6:11
|
Участник
Профиль
Группа: Гость форума
Сообщений: 3
Регистрация: 16.03.2006
Пользователь №: 10895
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Ежедневно приходится вручную вносить по несколько пользователей в 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 и прочих сайтах. Неделю уже ищу. Но почему-то этот вопрос скриптописатели обходят стороной.
|
|
|
|
|
Чебуратор |
Четверг, 16 Марта 2006, 11:20
|
Участник
Профиль
Группа: Участник
Сообщений: 67
Регистрация: 29.09.2003
Пользователь №: 5945
Конфигурация
Корпус: -- Процессор: Core2 Duo/Extreme Материнская плата: ASUS Оперативная память: 512Mb Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: 3.5" CD/DVD: NEC DVD-R Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: Windows XP pro Прочее: --
|
Цитата recip = "CN=PupkinV" Это и есть full name. Сюда вноси свои Р&К. Цитата objUser.Put "samAccountName", "PupkinV" Вот это logon name, все правильно Цитата objUser.Put "DisplayName", "Рога и копыта Пупкин Василий" А это не full name , а просто отображаемое имя для консоли, или фиг знает чего Сообщение отредактировал Чебуратор - Четверг, 16 Марта 2006, 11:26
--------------------
...вопросы. Я буду использовать Гугл прежде чем задавать глупые вопросы. Я буду ...
|
|
|
|
|
Coverguy |
Четверг, 16 Марта 2006, 11:46
|
Участник
Профиль
Группа: Гость форума
Сообщений: 3
Регистрация: 16.03.2006
Пользователь №: 10895
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Цитата(Чебуратор @ Четверг, 16 Марта 2006, 19:20) Цитата recip = "CN=PupkinV" Это и есть full name. Сюда вноси свои Р&К. Это уже пробовал. При попытке вставить в этом месте кирилический текст скрипт выдаёт ошибку An invalid dn syntax has been specifiedМожет быть можно как-то поменять имя обекта уже после его создания?
|
|
|
|
|
Чебуратор |
Четверг, 16 Марта 2006, 12:35
|
Участник
Профиль
Группа: Участник
Сообщений: 67
Регистрация: 29.09.2003
Пользователь №: 5945
Конфигурация
Корпус: -- Процессор: Core2 Duo/Extreme Материнская плата: ASUS Оперативная память: 512Mb Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: 3.5" CD/DVD: NEC DVD-R Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: Windows XP pro Прочее: --
|
Попробуй сохранить скрипт в кодировке DOS-866
--------------------
...вопросы. Я буду использовать Гугл прежде чем задавать глупые вопросы. Я буду ...
|
|
|
|
|
Coverguy |
Среда, 22 Марта 2006, 12:30
|
Участник
Профиль
Группа: Гость форума
Сообщений: 3
Регистрация: 16.03.2006
Пользователь №: 10895
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Цитата(Чебуратор @ Четверг, 16 Марта 2006, 20:35) Попробуй сохранить скрипт в кодировке DOS-866попробовал. 3-я строчка получилась как Set objContainer = GetObject("LDAP://OU= ■чхЁ√-ыєчхЁ√,DC=lostserver, DC=ru") И теперь выскакивает ошибка, мол нет такого объекта. Добавлено Coverguy, Цитата(Coverguy @ Среда, 22 Марта 2006, 20:29) Цитата(Чебуратор @ Четверг, 16 Марта 2006, 20:35) Попробуй сохранить скрипт в кодировке DOS-866попробовал. 3-я строчка получилась как Set objContainer = GetObject("LDAP://OU= ■чхЁ√-ыєчхЁ√,DC=lostserver, DC=ru") И теперь выскакивает ошибка, мол нет такого объекта. И всё таки, можно ли поменять имя объекта после его создания?
|
|
|
|
|
|
1 чел. читают эту тему (1 Гостей и 0 Скрытых Пользователей)
|
0 Пользователей:
|
|
© Copyright by WinCity.Ru 2001 - 2008 | Обратная связьУслуги веб-хостинга предоставлены компанией MTW.RU
|
|