dim db as new adodb.connection
dim connstr as string
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\My Files\我的系统开发\物流数据及生产用数据提取\物流数据库.mdb;Persist Security Info=False"
db.open connstr
然后就进行相应的处理就可以了。。。
另外:
F:\My Files\我的系统开发\物流数据及生产用数据提取\物流数据库.mdb 为你的数据库存放的位置。