百分求助。

Question

datafilename = app.path & "\test.mdb"

Answer 1

if dir(app.path & "\test.mdb")="" then 
'这样子没有文件，就弹出对话框，或者给个选择框，选中文件后，保存设置。以后就读取设置好了。

Answer 2

datafilename = app.path & "\test.mdb"
datafilename = replace(datafilename,":\\",":\") '当文件存放在根目录下的处理.================================================================
我是一个兵，来自老百姓。