vbscript - 使用文件夹重定向时访问 'Application Data' 文件夹

Question

我们在工作中使用文件夹重定向，我正在尝试简化在用户登录到终端服务器时运行的脚本。

有没有办法，通过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\"

Answer 1

您可以使用环境变量

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