怎么设置保存对话框打开时的默认路径

如何设置保存对话框打开时的默认路径
问题有两个：
（1）如何设置保存对话框打开时的默认路径，如每次打开时，显示的是一个具体指定的目录，比如 f:\文件备份目录

（2）为什么我设置了这个保存对话框的 initdir="f:\文件备份目录"时，我的程序退出时会出现 “ ADODC1 找不到 f:\文件备份目录\数据库.mdb ” 的错误提示，数据库.mdb是我的程序数据库文件，是放在D盘的程序目录中的， 为什么会出现这个错误提示  

ADODC1 的属性设置中connectionstring的设置为：
Provider=Microsoft.Jet.OLEDB.4.0;
Data Source=数据库.mdb;

（3）为什么设置了initdir="f:\文件备份目录" 打开保存对话框时，显示的路径也不是 f:\文件备份目录？

------解决方案--------------------
使用 CommonDialog 控件选择文件后，当前路径会变为最后选择的路径。如果后续要使用应用程序相对路径，必须用 ChDir 语句返回应用程序路径。InitDir 属性的设置是立即生效的。你是否丢掉了前面的圆点？

With CommonDialog1
If Dir("F:\backup", vbDirectory) = "" Then MkDir "F:\backup"
.InitDir = "F:\backup"
.ShowOpen
End With

ChDir App.Path
------解决方案--------------------
你可以在赋值是使用Dir检查一下数据库文件是否存在，若不存在，那么就不赋值，这样就能避免错误发生。
------解决方案--------------------

探讨

引用:
使用 CommonDialog 控件选择文件后，当前路径会变为最后选择的路径。如果后续要使用应用程序相对路径，必须用 ChDir 语句返回应用程序路径。InitDir 属性的设置是立即生效的。你是否丢掉了前面的圆点？

With CommonDialog1
If Dir("F:\backup", vbDirectory) = "" Then MkDir "F:\ba……

------解决方案--------------------
嗨，直说吧：把你的 initdir="f:\文件备份目录" 改为 CommonDialog1.InitDir = "f:\文件备份目录"。

另外，在你的程序中，文件路径最好不使用相对路径。你可以：

ADODC1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库.mdb;"