[решено] Переименование монтированного диска в RDP сесии

[michman2008]

Здравствуйте уважаемые профессионалы!
Через батник смонтировал рабочий стол в виде виртуального диска, через изменение параматра в свойствах файла RDP изменил параметр который дает возможность смонтировать данный диск в терминальную сессию.
После монтирования он отображается как R на MyComputer.
Вопрос: Как его можно переименовать на имя Рабочий стол?
В моем компьютере локально он у меня отображается с именем Рабочий стол.
Возможно ли это?
На данный момент это пока единственный вариант как можно замапить рабочий стол в терминальную сессию без копирования на какой либо сетевой ресурс.
Теперь хочется дать имя нормальное диску замапиному.
Подскажите что можно сделать?

[michman2008]

Проблема решилась скриптом который сделал диск сетевым и дал корректное имя.

option explicit
dim mdrive, oshell, fso
Dim objNetwork, strRemoteShare
set fso=createobject("Scripting.FileSystemObject")
Set objNetwork = WScript.CreateObject("WScript.Network")
strRemoteShare = "\\tsclient\R"
objNetwork.MapNetworkDrive "R:", strRemoteShare, False
if fso.driveexists("R:") then
mdrive = "R:\"
Set oShell = CreateObject("Shell.Application")
oShell.Namespace(mdrive).Self.Name = "Рабочий стол"
end if