imho.ws
IMHO.WS  

Вернуться   IMHO.WS > Программы и Операционные системы > Операционные системы M$
Опции темы
Старый 13.12.2003, 02:11     # 1
leonski
Junior Member
 
Регистрация: 16.07.2003
Сообщения: 134

leonski Путь к славе только начался
Как создать 200 новых юзеров в Ad при помощи скрипта?

Господа NT/2000/2003 СусАдмины хотелось бы узнать как вы создаете новых юзеров в AD(Active Directory). Я имею ввиду не одного-двух юзеров а так к примеру 300-500 одним махом при помощи batch или *.vbs скрипта. Понятное дело что вручную можно просто чокнуться делать тучу экаунтов в домене, поделитесь пожалуйста своим оппытом.

В моем же случае нужно сделать 200 новых юзеров в AD, плюс home диски для них на файл сервере, плюс добавить их в соответствующие группы и так далее. Нужно сделать *.vbs скрипт который будет брать данные для нового юзера с text или Excel файла. В инете попадаются частично подобные решения но так что бы все в "одном флаконе" пока не видел. Большими знаниями в *.vbs скриптах не блещу, ну если есть готовое решение то думаю что смогу наладить под свои нужды.

Заранее спасибо.
leonski вне форума  
Старый 16.12.2003, 15:09     # 2
[smart]
Full Member
 
Аватар для [smart]
 
Регистрация: 15.10.2003
Адрес: [ crystalnet ]
Сообщения: 1 114

[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру[smart] Отец (мать) всех Гуру
Вот, пользуйте...
Код:
Set objRootDSE = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://cn=Users," & _
                             objRootDSE.Get("defaultNamingContext"))

For i = 1 To 500
    Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
    objLeaf.Put "sAMAccountName", "UserNo" & i
    objLeaf.SetInfo
Next
WScript.Echo "500 Users created."
а это для конфига аккаунта, только прицепи его сам в цикл

Код:
Set objUser = GetObject _
  ("LDAP://cn=myerken,ou=management,dc=fabrikam,dc=com")

objUser.Put "profilePath", "\\sea-dc-01\Profiles\myerken"
objUser.Put "scriptPath", "logon.bat"
objUser.Put "homeDirectory", "\\sea-dc-01\HomeFolders\myerken"
objUser.Put "homeDrive", "H:"

objUser.SetInfo
[smart] вне форума  
Старый 08.01.2004, 04:19     # 3
leonski
Junior Member
 
Регистрация: 16.07.2003
Сообщения: 134

leonski Путь к славе только начался
Не могу поверить что все WinNT/2K/2003 СусАдмины вручную создают 200-300 новых юзеров в домене. Понятное дело что требование к созданию нового экаунта варируется от одной компании к другой. Но все таки, общие требования всегда похожы. Для каждого нового юзера нужно как правило сделать Home папку, добавить его в соответствующую группу, OU и так далее. Неужели никто не пользуется скриптами для этой цели? К сожалению я в скриптах не очень силен, так бы уже давно что то свое слепил бы.

Спасибо a.Ardvark за отклик, к сожалению это не совсем то что я спрашывал. Данный скрипт это только частичный пример а не готовое решение. Мне нужен vbs срипт который будет работать вместе с text или excel файлом.
leonski вне форума  
Старый 10.04.2006, 17:30     # 4
KomatoZo
::VIP::
 
Аватар для KomatoZo
 
Регистрация: 14.05.2005
Сообщения: 939

KomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собойKomatoZo Имеются все основания чтобы гордиться собой
вряд ли кому интересно уже, но на всякий случай:
ldifde, csvde. Весьма мощные и однозначно стандартные инструменты.
__________________
"Поживем - увидим" - сказал слепой, больной СПИДом...
Телепаты в отпуске. Все поголовно. Навсегда.
И кому я что должен - всем простил.
KomatoZo вне форума  
Старый 17.04.2006, 17:03     # 5
@leksey
Newbie
 
Регистрация: 08.04.2006
Сообщения: 11

@leksey Путь к славе только начался
А сразу все таки и не делается ничего... (Все постепенно)
Обычно когда нужно создать много аккаунтов, по идее создаются только учетная запись, и описание (ФИО), с пустым паролем(ну либо нулями забит), в теории аккаунт должен быть заблокирован по умолчанию...
А так что бы и рыбку съесть и ... сухим из воды выйти это вряд ли...
@leksey вне форума  
Старый 17.04.2006, 17:35     # 6
Ghost
::VIP::
Звезда первого сезона
Молчун-2004
 
Аватар для Ghost
 
Регистрация: 24.08.2002
Сообщения: 1 575

Ghost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех ГуруGhost Отец (мать) всех Гуру
leonski
В NT-ResourceKit'е есть специальная приблуда:
Цитата:
Сообщение от ADDUSERS.EXE
Adds, Writes, or Erases accounts as specified by a delimited file.

ADDUSERS [/?] [\\computername [[/c | /d | /e] filename]] [/s:?]

/? Display this help screen.
/c Create accounts specified in the file.
/d Write current accounts to the specified file.
/e Erase user accounts specified in the file.
/s:? Sets the seperator character for the input/output file. Replace the
? with the character to be used for seperating fields. (eg /s:~)
Note: The seperator character is a comma ',' by default.

For detailed information please refer to the Resource Kit Help file.
Она как раз и позволяет вносить новых пользователей из файла с разделителями.
__________________
Действовать надо тупо и это лучшее доказательство нашей чистоты и силы!
Ghost вне форума  

Опции темы

Ваши права в разделе
Вы НЕ можете создавать новые темы
Вы не можете отвечать в темах.
Вы НЕ можете прикреплять вложения
Вы НЕ можете редактировать свои сообщения

BB код Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Часовой пояс GMT +4, время: 15:09.




Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.