Подключение сетевых дисков у пользователей AD

[davzom]

Народ конибудь сталкивался с проблемой подключения стевых дисков у пользователей домена. Можно указать в настройках пользователя, но в них можно указать только один сетевой диск, а мне нужно указать 4-5 сетевых. Помогите кто чем может....

[Michael]

logon скрипт с командой net use k: \\server\share

[bravo_ej]

а где этот logon скрипт вешается?

[HLT]

http://i028.radikal.ru/0712/67/80bc46f79d3a.jpg

файл скрипта кладешь в каталог netlogon

[Michael]

В AD - пользователи и компьютеры выбираешь Свойства нужного OU, затем Групповая политика - Изменить (если политика еще не создана, то сначала Создать). Конфигурация пользователя, Конфигурация Windows, Сценарии (Вход/Выход из системы). Здесь скрипт выполняется с правами пользователя. В секции Конфигурация компьютера, Конфигурация Windows, Сценарии (запуск/завершение) скрипт выполняется с правами System. Сам файл кидаешь в расшаренную папку и пути к нему указываешь не в формате C:\share, а именно \\server\share

[sacredboy]

1. мне нужно указать 4-5 сетевых
Для этого можно в одном батнике прописать все 4-5 сетевых шар типа
net use K: \\server\share
net use L: \\server\share
net use M: \\server\share
и т.д.
или нужно создавать отдельный батник для каждого подключения?

2. В профиле пользователя в строке Логон скрипт прописывать путь для скрипта тот же что и в политиках?

[artem_]

Или vb script



strDriveLetter_DBS = "P:"
strRemotePath_DBS = "\\10.10.5.1\PRIVATE$"
strDriveName_DBS = "PRIVATE"

'----------------------------------------------------------------------------------------------------

'процедура подключения сетевых дисков
Sub MapNetDriveNamed(Letter, Path, DriveName)
'мапим
Set objNetwork = CreateObject("WScript.Network")
objNetwork.MapNetworkDrive Letter, Path
'переименовываем
Set objShell = CreateObject("Shell.Application")
objShell.NameSpace(Letter).Self.Name = DriveName
End Sub

'функция проверки подключения сетевых дисков
function IsNetDriveConnected(Letter)
Set objNetwork = CreateObject("WScript.Network")
Set CheckDrive = objNetwork.EnumNetworkDrives()
For intDrive = 0 To CheckDrive.Count - 1 Step 2
If (CheckDrive.Item(intDrive) = Letter) Then IsNetDriveConnected = true
Next
End Function

'----------------------------------------------------------------------------------------------------

'проверка на наличие сетевых дисков в системе
If IsNetDriveConnected(strDriveLetter_DBS) Then
'WScript.echo "ОШИБКА подключения сетевых дисков или один из дисков уже подключен"
WScript.Quit
End If

'мапим общий сетевой диск
Call MapNetDriveNamed(strDriveLetter_DBS, strRemotePath_DBS, strDriveName_DBS)

WScript.Quit



Если несколько дисков можно сделать параметризированный скрипт или прописать массив который будет в себе держать букву, название и путь

[Michael]

sacredboy, 1. Можно одним файлом
2. Достаточно прописать в одном месте - либо в политиках, либо в logon script

[sacredboy]

2. Достаточно прописать в одном месте - либо в политиках, либо в logon script »
В Логон скрипт путь должен быть \\сервер\шара?

[artem_]

да и должен быть у всех доступ я обычно кладу в \\полное имя домена\netlogon

[XaHAleX]

я обычно кладу в \\полное имя домена\netlogon »
а если батник выкладывается, дополнительно настраивать еще что-нибудь надо?
Извините, но почему-то не проходит...

[sacredboy]

Извините, но почему-то не проходит... »
Подробное пошаговое описание действий.

[GreenIce]

В Логон скрипт путь должен быть \\сервер\шара? »
1. Если скрипт выложен в netlogon, то путь указывать не нужно. Смотри картинку в 4 сообщении.
2. Проверь права на скрипт, у пользователя должны быть права на чтение и выполнение, особенно актуально при переносе файла из другой папки, так как при этом права не перебиваются.
3. Если политикой прописаны разрешенные приложения для пользователя, то скрипт нужно добавить в список разрешенных приложений.
4. Если ничего не помогает попробуйте прописать скрипт для администратора, и проверьте выполнится ли он для него.

[XaHAleX]

Подробное пошаговое описание действий. »
написал бат'ник keyfind.bat:
\\server\common\keyfinder.exe /save \\server\common\users\ /close /file %computername%.txt
в учетке пользователя домена в logon script указал keyfind.bat, в NETLOGON выложил соответствующий файл. При входе пользователя в систему должен появляться текстовый файл с именем компа, но.... причем если по сети зайти под данным пользователям в папку Netlogon и запустить батник ручками - все нормально... (это, кстати к: права на скрипт, у пользователя должны быть права на чтение и выполнение »)

[sacredboy]

XaHAleX и у меня поначалу загвоздка была в разрешениях на сам батник, вернее в их (разрешениях) отсутствии

[XaHAleX]

поначалу загвоздка была в разрешениях на сам батник »
ну так под профилем пользователя "ручками" отрабатывает же... :dont-know

[Delirium]

напиши ты просто батник
net send %computername% test from %username%
и попробуй войти в систему. Может там системе нет доступа на bat файл а пользователю есть.

[XaHAleX]

Delirium, спасибо, помогло: увидел где искать... не отрабатывает только на одной машине счас буду разбираться с правами пользователя...

[Rhamzes]

с подключением через vbs больше понравилось, хотя я в нем не селен.

через net use, подключенный диск называется папка_на_сервере_имя_сервера_[диск] - тоесть длинно и нелепо.
через vbs просто имя и диск, как и надо.

А как через тотже скрипт vbs подключить неслько дисков, не подскажите... )

спасибо

[Delirium]

А что там смотреть:
objNetwork.MapNetworkDrive Letter, Path
'переименовываем
Set objShell = CreateObject("Shell.Application")
objShell.NameSpace(Letter).Self.Name = DriveName »
Соответственно, дописываешь
objNetwork.MapNetworkDrive Second_Letter, Second_Path
objShell.NameSpace(New_Letter).Self.Name = New_DriveName