![]() |
Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета. Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме. С уважением, ваш призрачный админ, BigMac... |
|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - Подключение сетевых дисков |
|
Любой язык - Подключение сетевых дисков
|
Сообщения: 595 |
Здравствуйте!
Есть батник: --------------------------------------------------------------------------------- @echo off net time /domain:mou102.local /set /y rem net use m: \\server2\Metodika$ /persistent:no rem net use r: \\server2\Biblioteka$ /persistent:no rem if %username%==borodulya net use s: \\Server2\Shared_folder$\school\erudit /persistent:no rem подключение пользовательского диска net use u: /delete - это типа сначал удаляем существующий диск if exist \\server2\Shared_folder$\%username% goto label rem проверяем наличие папки, если есть такая папка, то идем на ок, rem если нету папки, идем дальше mkdir \\server2\Shared_folder$\%username% rem создаем папку c таким же именем, с каким пользователь входит в сеть xcacls \\server2\Shared_folder$\%username% /t /c /g Domain\%username%:c /y rem назначаем для пользователя на папку разрешения Change :label net use u: \\server2\Shared_folder$\%username% /persistent:no rem подключаем папку как сетевой диск U --------------------------------------------------------------------------------- Батник подключает общие и персональный сетевые диски. Есть скрипт: --------------------------------------------------------------------------------- On Error Resume Next Set objWshNetwork = CreateObject( "WScript.Network" ) Set objShell = CreateObject("Shell.Application") MapDrive "U:", "\\server2\Shared_folder\school\%username%", "Пользовательский" MapDrive "S:", "\\server2\Shared_folder\school\school", "Общий" Sub MapDrive(strDrive, strPath, strName) On Error Resume Next objWshNetwork.RemoveNetworkDrive strDrive, vbTrue, vbTrue objWshNetwork.MapNetworkDrive strDrive, strPath, vbTrue objShell.NameSpace(strDrive).Self.Name = strName End Sub --------------------------------------------------------------------------------- Это скрипт мне подсказали на форуме - дает имя сетевому диску. Хочу из скрипта и батника сделать один скрипт или батник делающий следующее: создает общие сетевые диски и дает имя им, и создает персональные диски, закрепляет права пользователя и дает имя этому диску. Подскажите пожалуйста код. Спасибо |
|
Отправлено: 14:33, 20-11-2009 |
Старожил Сообщения: 426
|
Профиль | Отправить PM | Цитировать 1. Я недостаточно внимательно посмотрел приведенный "alecsandrb" скрипт, добавлять пользователя туда не надо, он лежит в переменной "UsersFolderName". Можно заменить права изменения на полные (:c заменить на :f).
2. Нужно посмотреть на готовую строку с xcacls после раскрытия переменных - возможно где-то пропущен пробел (или наоборот лишний) - просмотрите содержимое переменной StrCmdRightUsers перед вызовом CMD. 3. Попробуйте выполнить указанную строку вручную - какие ошибки будут... |
------- Отправлено: 15:04, 02-08-2010 | #11 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
![]() Пользователь Сообщения: 67
|
Профиль | Отправить PM | Цитировать Добрый день.
Есть vbs скрипт для подключения сетевых дисков у пользователей. Set fs = WScript.CreateObject("Scripting.FileSystemObject") Set wn = WScript.CreateObject("WScript.Network") Set ap = CreateObject("Shell.Application") if fs.DriveExists("Y:") then wn.RemoveNetworkDrive "Y:", true, true wn.MapNetworkDrive "Y:", "\\server\share01", false, login, password if fs.DriveExists("Z:") then wn.RemoveNetworkDrive "Z:", true, true wn.MapNetworkDrive "Z:", "\\server\share02", false, login, password Сценарий: C:\mab.vbs Строка: 5 Символ: 1 Ошибка: Сетевой пароль указан неверно Код: 80070056 Источник: WSHNetwork.MapNetworkDrive то после выполнения скрипт выполняется, после перезагрузки ситуация повторяется. Сеть без домена, подключение идёт к шаре на Samba. Ну или подскажите, как сделать так, чтобы при запуске батника не было видно окна командной строки. |
------- Последний раз редактировалось atm_kzn, 01-03-2011 в 16:19. Отправлено: 14:12, 01-03-2011 | #12 |
Сообщения: 53589
|
Профиль | Отправить PM | Цитировать Цитата atm_kzn:
|
|
Отправлено: 16:53, 01-03-2011 | #13 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Подключение сетевых дисков у пользователей AD | davzom | Microsoft Windows NT/2000/2003 | 35 | 30-05-2013 07:53 | |
Подключение сетевых дисков | dinamitbrein | Сетевые технологии | 6 | 05-07-2012 16:33 | |
Разное - Автоматическое подключение сетевых дисков | hoho | Microsoft Windows 2000/XP | 5 | 11-06-2012 09:08 | |
Подключение сетевых дисков (маппинг) | ss777 | Microsoft Windows NT/2000/2003 | 1 | 25-08-2008 08:55 | |
подключение сетевых дисков у пользоватетей AD | e v g e n | Microsoft Windows NT/2000/2003 | 2 | 10-12-2007 11:21 |
|