|
Компьютерный форум OSzone.net » Серверные продукты Microsoft » Microsoft Windows NT/2000/2003 » Создание личной папки, при создании профиля |
|
Создание личной папки, при создании профиля
|
Новый участник Сообщения: 47 |
Возможно ли такое, если контроллер домена, так же является файловым сервером? И как сделать?
|
|
Отправлено: 10:37, 07-07-2008 |
Ветеран Сообщения: 4900
|
Профиль | Сайт | Отправить PM | Цитировать Сделайте перемещаемые профили.
|
------- Отправлено: 13:43, 07-07-2008 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Старожил Сообщения: 371
|
Профиль | Отправить PM | Цитировать Сделайте с помощью политики перенаправление папки мои документы с созданием папки по каждому пользователю.
|
------- Отправлено: 14:23, 07-07-2008 | #3 |
Ветеран Сообщения: 4900
|
Профиль | Сайт | Отправить PM | Цитировать Сюда взгляните.
|
------- Отправлено: 14:58, 07-07-2008 | #4 |
В работе Сообщения: 851
|
Профиль | Сайт | Отправить PM | Цитировать Думаю, тут речь идет о создании так называемой домашней папке одновременно с созданием учетной записи. Т.е. чтобы не вручную через AD заносить все данные, а задать через скрипт только имя, а на выходе получить уже настроенную учетную запись пользователя.
Вот небольшой скрипт, который можно взять за основу: Option Explicit Const WAIT_ON_RETURN = True Const HIDE_WINDOW = 0 Const USER_ROOT_UNC = "\\dc1\users" 'Set Home Folder Location Here Dim WshShell, WshNetwork, objFS, objServer, objShare Set WshShell = Wscript.CreateObject("Wscript.Shell") Set WshNetwork = WScript.CreateObject("WScript.Network") Set objFS = CreateObject("Scripting.FileSystemObject") Set ou = GetObject("LDAP://OU=Users,OU=Billing,OU=Network,DC=my,DC=domain,DC=com") 'Create the User Set usr = ou.Create("user", "CN=James Smith") usr.Put "samAccountName", "jsmith" usr.Put "sn", "Smith" usr.Put "givenName", "James" usr.Put "userPrincipalName", "jsmith@my.domain.com" usr.Put "telephoneNumber", "(555) 555 0111" usr.Put "title", "Network Billing Dept" usr.SetInfo 'Now that the user is created, reset their password and enable the account. usr.SetPassword "secret***!" usr.AccountDisabled = False usr.SetInfo 'Now create the User's Home Folder and set permissions. strUser = usr.samAccountName Call objFS.CreateFolder(USER_ROOT_UNC & "\" & strUser) Call WshShell.Run("cacls " & USER_ROOT_UNC & "\" & strUser & _ " /e /g Administrators:F", HIDE_WINDOW, WAIT_ON_RETURN) Call WshShell.Run("cacls " & USER_ROOT_UNC & "\" & strUser & _ " /e /g " & strUser & ":C", HIDE_WINDOW, WAIT_ON_RETURN) |
|
------- Отправлено: 17:17, 07-07-2008 | #5 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Разное - explorer виснет при создании или переименовании папки | raxer | Microsoft Windows 7 | 2 | 11-01-2010 15:17 | |
Разное - Как удалить профильные папки из Личной Папки без последствий? | Котяр | Microsoft Windows 7 | 0 | 28-11-2009 20:36 | |
Как сделать при создании пользователя путь папке профиля, через групповые политики ? | zaqwsx_ | Microsoft Windows NT/2000/2003 | 5 | 15-10-2009 12:39 | |
VISTA BUSINESS и создание профиля! | 6AHKA_BODKu | Microsoft Windows Vista | 0 | 29-05-2007 14:40 | |
Создание профиля пользователя | YDen | Microsoft Windows NT/2000/2003 | 2 | 17-02-2006 11:54 |
|