使用文件夹重定向时访问“应用程序数据”文件夹

时间:2013-09-13 08:45:37

标签: vbscript special-folders

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

是否可以通过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\"

1 个答案:

答案 0 :(得分:13)

您可以使用环境变量

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