把数据库的绝对路径改成App.Path & "\***.mdb" 就行了
app.path & "\你的数据库文件夹名\数据库.mdb"试试这个引用吧~
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=***.MDB“