VBA ADO连接ACCESS数据库

qiushi219 · 发表于 2019-10-8 21:39

本帖最后由 qiushi219 于 2019-10-8 21:43 编辑

With MyConn
'       .Provider = "microsoft.ace.oledb.12.0;Jet OLEDB:Database Password:='';" '旧版密码
      .Provider = "microsoft.ace.oledb.12.0;Jet OLEDB:New Database Password='';" '新版密码
      .Open MyPath
End With

--------------------------
ADO引用的是6.0；操作系统64位win10；OFFice版本2010。
偶然获得，经测试可用。

qiushi219 · 发表于 2019-10-8 21:42

ADO引用的是6.0；操作系统64位win10；OFFice版本2010。
偶然获得，经测试可用。

用心修炼 · 发表于 2019-10-9 08:38

占座打卡学习

SaverTZ · 发表于 2019-11-18 10:35

楼主，我有发一个求助贴，你能帮我看看怎么解决吗?

yiye6900345 · 发表于 2020-3-24 15:57

收藏备用！！！！！！！！！

john7297 · 发表于 2020-6-26 04:10

感谢楼主的分享！

模拟后有两个问题出现：
1）在直接引用楼主的代码后，
------出现“找不到可安装的 ISAM ”
“ cnn.Open strcnn '打开数据库链接” （运行停留在这一句代码。）
2）尝试改为如下后，
“ cnn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & mydata, UsreID = BB, Password = CC, -1“
-----出现“运行错误‘2147217843（80040e4d）':
无法启动应用程序。工作信息文件丢失，或是已被其它用户以独占方式打开。“
可能是因为数据库操作工作群组文件的原因？
（如果有工作群组文件，cnn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & mydata, UsreID = BB, Password = CC, -1，是在这里修改吗？）

希望楼主再次指导与分享！

11918106 · 发表于 2021-8-19 16:35

收藏，留个记号。

lxlaner · 发表于 2021-9-1 21:27

收藏备用先+1

一条狗 · 发表于 2022-10-24 08:49

留个记号++++++++

xuzong · 发表于 2022-10-24 09:12

单机版会用，联机版的怎样做？假设数据库在192.168.0.46 ， D 盘上，应该怎样操作？

		自动登录	找回密码
密码			免费注册

[分享] VBA ADO连接ACCESS数据库