" 是否继续？
rc = MsgBox("点击“确定”恢复标准的位置条配置", 1, APP_TITLE)
If rc <> 1 Then
WScript.Quit
End If
" 删除PoliciesComDlg32下的所有注册键，启用标准的位置条配置
Set shell = CreateObject("WScript.Shell")
On Error Resume Next
shell.RegDelete(REG_PLACESBAR)
" 完成...
MsgBox "已经恢复默认的位置条配置", , APP_TITL
四、Office的位置条
前面的注册表修改只影响那些使用Win2K/XP公用对话框代码库的程序，Office使用的对话框来自一个经过定制的代码库 。因此，修改Win2K/XP“打开”对话框的位置条不会对Word和Excel的位置条产生任何影响 。
但是，Office 2000也提供了定制其位置条的办法，相关的注册键是HKEY_CURRENT_USERSoftwareMicrosoftOffice9.0CommonOpen FindPlaces；对于Office XP，注册键路径是HKEY_CURRENT_USERSoftwareMicrosoftOffice10.0CommonOpen FindPlacesUserDefinedPlaces 。
不过，如果你只是想要定制位置条，可以不通过该注册键 。Microsoft提供了一个方便的修改位置条的工具，你可以把它安装到Office 2000软件的“工具”菜单 。这个工具可以从http://support.microsoft.com/support/kb/articles/q260/1/90.asp下载，下载包带有该插件的完整VB源代码和如何使用该工具的说明 。
下载places.exe文件之后，双击解开压缩包 。然后，点击Win2K/XP的“开始/运行”菜单，输入“regsvr32 <路径>places.dll”，并确认注册places.dll 。此时如果你打开了Office 2000的程序，请先关闭它再打开 。这时，Office软件的“工具”菜单上会出现一个“Set Places”菜单项，你可以用它来设置位置条上的各个位置 。与Win2K的标准对话框不同，Office 2000软件的位置条支持小图标 。使用小图标时，位置条上的文件夹数量不再有最多5个的限制 。无论在哪一个Office 2000软件中修改位置条，改动结果将对所有Office 2000软件有效 。
【深入改造Win2000“位置条”】位置条是一种很不错的工具，但只有当它列出的位置恰好是你常用的文件夹时，它的优势才能充分发挥出来 。有了本文的知识，现在你也应该能够随心所欲地定制Win2K/XP和Office的位置条了 。
推荐阅读
- 在Win2000下“复活”老网卡
- 加快Win2000浏览网上邻居的速度
- 轻松设置让Win2000达到最佳性能
- 服务器/WIN2000不能启动的几种解决方案
- 揭秘Win2000中“隐形”的武器
- Win2000/XP的秘密辅助功能
- Win2000/XP任务管理器能个性化
- Win2000安全更新可能导致数据损坏
- 找到适合Win2000的系统配置程序
- 教程/win2000 输入法学习之一：了解字符集