Переименование сетевых дисков

[Sigma]

Добрый день! Возникла необходимость переименовывать сетевые диски, которые подключаются из .bat файла при старте винды, домен на 2003 сервере. Гуглил, но нашёл решение только для win2000, на 2003 же оно похоже не работает, выкладываю сюда в надежде что это поможет ответить на вопрос.

Там было предложено в .bat файл вписать эту строку

Код: Выделить всё

   cscript.exe Drv_Ren.vbs //B "z:\" "Name"  

вот файл drv_ren.vbs

Код: Выделить всё

 set Args = Wscript.Arguments  
mDrive = Args.item(0)  
Set oShell = CreateObject("Shell.Application")  
oShell.NameSpace(mDrive).Self.Name = Args.item(1)  

[Хостинг HostFood.ru]

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

[Sigma]

Снимаю вопрос сделал так

.bat

Код: Выделить всё

wscript.exe \\server\rename.vbs

rename.vbs

Код: Выделить всё

Set oShell = CreateObject("Shell.Application")
oShell.NameSpace("X:\").Self.Name = "name1
oShell.NameSpace("Y:\").Self.Name = "name2"