Vbscript VSB在用户配置文件中查找PST文件

Vbscript VSB在用户配置文件中查找PST文件,vbscript,Vbscript,我是VBS新手,正在尝试编写脚本(首先)在用户配置文件中查找PST文件。在Outlook 2007中,这些文件的默认位置是%userprofile%\AppData\Local\Microsoft\Outlook,但在Outlook 2010中是%userprofile%\Documents\Outlook文件 目前,我已经用下面的代码进行了测试,出于测试目的,我使用了一个文件夹C:\Data和Outlook 2007的路径。两者都包含PST文件 strComputer = "." Set ob

我是VBS新手,正在尝试编写脚本(首先)在用户配置文件中查找PST文件。在Outlook 2007中,这些文件的默认位置是%userprofile%\AppData\Local\Microsoft\Outlook,但在Outlook 2010中是%userprofile%\Documents\Outlook文件

目前,我已经用下面的代码进行了测试,出于测试目的,我使用了一个文件夹C:\Data和Outlook 2007的路径。两者都包含PST文件

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set wshShell = WScript.CreateObject( "WScript.Shell" )
strUserName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )

Set colFiles = objWMIService.ExecQuery _
    ("Select * from CIM_DataFile Where Extension = 'pst' AND (Path = '\\Data\\' OR Path = '\\" & strUserName &"\\AppData\\Local\\Microsoft\\Outlook')")  
问题是,它成功地从数据文件夹中读取数据,但从用户配置文件中却没有。 有趣的是,如果我声明驱动器='C:'而不是查询中的两个路径,它将返回来自Data和%userprofile%\AppData\Local\Microsoft\Outlook的所有pst文件。但是浏览所有C驱动器并不是最好的解决方案,因为它会白白消耗宝贵的资源

有没有办法让它访问这两个文件夹

谢谢,前进!
Iulian

如果有人觉得它有用,我已经更正了我的查询语法,如下所示,它现在可以工作了

("Select * from CIM_DataFile Where Extension = 'pst' AND (Path = '\\Data\\' OR Path = '\\Users\\"& strUserName &"\\AppData\\Local\\Microsoft\\Outlook\\')")