vb动态建立Access,新建库名已存在时的问题，路过的高人指点下
数据已存在表格中，当按“存储”按键时将表格里的数据导入Access保存
Form1.Dialog1.InitDir = App.Path
Form1.Dialog1.Filter = "*.mdb "
Form1.Dialog1.ShowSave
Filename = Form1.Dialog1.Filename
'打开保存路径
pstr = "Provider=Microsoft.Jet.OLEDB.4.0; " '
pstr = pstr & "Data Source= " & Filename + ".mdb "
cat.Create pstr '创建数据库
....
若pstr所值的库已经存在，Creat就会报错
我怎么才能判断库已存在？若存在则提示是否覆盖？
[解决办法]
dir函数会用吗？不会的话看看msdn
