Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - [решено] Подключение нескольких сетевых дисков одним скриптом

Ответить
Настройки темы
VBS/WSH/JS - [решено] Подключение нескольких сетевых дисков одним скриптом

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать

Добрый день.
В соседней теме нашел скрипт для подключения сетевого диска
Код: Выделить весь код
On Error Resume Next

Set objWshNetwork = CreateObject( "WScript.Network" )
Set objShell = CreateObject("Shell.Application")


MapDrive "X:", "\\files\files", "Базы"

Sub MapDrive(strDrive, strPath, strName)
   On Error Resume Next
   objWshNetwork.RemoveNetworkDrive strDrive, vbTrue, vbTrue
   objWshNetwork.MapNetworkDrive strDrive, strPath
   objShell.NameSpace(strDrive).Self.Name = strName
End Sub
скрипт работает, но хотелось бы чтобы он умел подключать сразу три или четыре сетевых дисков, можно ли такое организовать?

Отправлено: 16:47, 26-05-2011

 

Googler


Сообщения: 3665
Благодарности: 1563

Профиль | Отправить PM | Цитировать

Himick_egor, продублируйте строку "MapDrive "X:", ..." для других значений буквы диска, пути и имени
Это сообщение посчитали полезным следующие участники:

Отправлено: 16:54, 26-05-2011 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

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



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - [решено] Подключение нескольких сетевых дисков одним скриптом

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Подключение сетевых дисков dinamitbrein Сетевые технологии 6 05-07-2012 16:33
Любой язык - Подключение сетевых дисков YDen Скриптовые языки администрирования Windows 12 01-03-2011 16:53
Подключение сетевых дисков (маппинг) ss777 Microsoft Windows NT/2000/2003 1 25-08-2008 08:55
Подключение сетевых принтеров скриптом в домене babki Microsoft Windows NT/2000/2003 12 25-07-2008 12:13
подключение сетевых дисков у пользоватетей AD e v g e n Microsoft Windows NT/2000/2003 2 10-12-2007 11:21


« Предыдущая тема | Следующая тема »


 
Переход