set ws = wscript.CreateObject("Wscript.Shell")

'打开windows文件夹

ws.run "%systemroot%explorer.exe /e, %systemroot%"

'打开我的文档

ws.run "%systemroot%explorer.exe"

'打开我的电脑

ws.run "%systemroot%explorer.exe /e,"

'定位到notepad.exe所在目录，并选择notepad.exe

ws.run "%systemroot%explorer.exe /select, %systemroot%notepad.exe"

Windows 资源管理器的启动参数

Windows 资源管理器开关对创建根文件夹很有用：

Explorer [/e,][/root,<对象>,] [[<文件夹>]| [/select, <子对象>]]

/e 使用资源管理器视图（作用域和结果窗格视图）。默认 情况为“打开”视图（仅结果窗格视图）。

/root<对象> 指定在“一般”名称空间内用作资源管理器根目录的对

象。默认情况下为 Desktop 文件夹。

/select 打开父文件夹，选择指定的对象。

<子对象> “Windows 资源管理器”打开的文件夹或文件。如果使用 /select 选项，将突出显示子对象。 如果没有使用 /select 选项，则在“资源管理器”中打开 文件夹或文件。默认情况下为 root<对象>。

例如： Explorer /e, /root, Reports

在 Reports 下打开资源管理器窗口。

Explorer /select, C:WindowsCalc.exe

在 C:Windows 目录下打开文件夹（或激活已打开的文件 夹），并选择 Calc.exe。

Explorer /e, /root, SourceInternalDesignUsersDavidArchive从 Archive 文件夹中打开一文件夹，这是创建一个复杂的、 远程存档文件夹的好办法。然后将指向此文件夹的链接 （SourceInternalDesignUsersDavidArchive） 放入“SendTo”文件夹中，以便快速定位文档。

在VB里调用Explorer

更简单啦，用Shell函数，如果觉得不爽，再用WinExec API函数，调用上面的命令行就可以了。

例如

Call Shell("Explorer /select, C:WindowsCalc.exe",VBNormalFocus)

将在 C:Windows 目录下打开文件夹（或激活已打开的文件 夹），并选择 Calc.exe。