Доступ к папке Application Data при использовании перенаправления папок

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

Есть ли способ через SpecialFolders получить доступ к папке Application Data?

Я спрашиваю, потому что, если нам нужно переместить местоположение перенаправления папок (из-за ограничений хранилища), я бы предпочел не проходить сценарии и вручную изменять вещи.

Set objShell = WScript.CreateObject("WScript.Shell")

desktop_location = objShell.SpecialFolders.Item("Desktop")
quick_launch_location = "\\videss\TSUsers\" & user_name & "\Application Data\Microsoft  \Internet Explorer\Quick Launch\"

vbscript special-folders
person David Gard    schedule 13.09.2013    source источник

Ответы (1)


arrow_upward
14
arrow_downward

Вы можете использовать переменную среды

Set objShell = CreateObject( "WScript.Shell" )
appDataLocation=objShell.ExpandEnvironmentStrings("%APPDATA%")
quick_launch_location = appDataLocation & "\Microsoft\Internet Explorer\Quick Launch\"
person ServerGuy    schedule 13.09.2013