查看: 4364|回复: 6
64位WIN7环境下使用ADO连接ACCESS数据库
阅读权限10
在线时间 小时
本帖已被收录到知识树中，索引项：
先介绍下背景，老板比较会省钱，我也比较懒，所以有些工作不想手工做，老板也不给上软件（就算上，有些也比较琐碎，不是度身定制软件还不定合用），只好没有条件创造条件。我所能做的也就是充分利用EXCEL以及VBA所带来的便利，当然过程中也没少在EXCEL HOME上潜水（大部分都是现学现卖，用啥学啥，都是泪啊……）。
咱是讲团队的人，所以有比较强烈的团队合作的需求，随之而来的就是团队间需解决数据共享和数据交换的问题，光用EXCEL共享已经不能满足要求，就从坛子上学会了用EXCEL做前端，用ACCESS作为数据库，并布置在局域网上，来实现某些数据的共享和交换。
切入正题，我可能属于比较老套和落后的，一直用32位的系统，最近才把电脑的系统换成了64位的WIN7，OFFICE也顺便换成了64位的2013，问题就来了,原来用的好好的文件提示“运行时错误‘3706’未找到提供程序。改程序可能为正确安装。“。分析，上网查……等等，发现时ADO的问题，貌似说是ADO是32位下的组件，在64位下无法运行（不知道到底是不是这个原因，就当他是吧）。于是开始不死心尝试引用不同的ADO版本，从2.8试到了6.1，都不行……
我当时的心情…………我真想问候微软他##，既然不能用，你为啥在64位的OFFICE上引用里还能看到ADO呢？这不是肯爹吗！
一开始，网上看到的解决方法基本都是 放弃64位的OFFICE………………我没有尝试，因为我记得以前我同事64位XP+32位的OFFICE2007运行不起来的情况（以前没有意识到是这个问题，现在想来才觉得是同样的问题），而且网上看到VB啥的貌似也有这个问题。所以我个人武断的判断这不是换个OFFICE就能解决的，应该还是环境--64位WIN7的问题。
放弃64位系统，我想过，不过不甘心浪费内存，而且以后换新机器怎么办，现在可基本都是64位的系统。总不见得老板让换新电脑我拒绝的吧，或者说那个8G内存的机器跑32位的系统（会被笑话的）。
秉着存在就有道理的精神，继续在网上挖……
两篇博文，让我看到了希望
这里，我先要感谢那两位博主yandong_8212和张三丰,虽然我完全不认识他们，他们也不知道我，不过这次正儿八经帮了我一把
他们两位给出的解决方法基本是类似的，都是使用AccessDatabaseEngine（Microsoft Access Database Engine 2010 Redistributable ）
两位博主的博文，一位是需要先删除OFFICE然后再安装那个ENGINE，使用方法，大侠可能觉得太简单，就么说，就转了微软官网介绍（一开始我也没认真看，哎……），苦了菜鸟我。
还有一位博主，是先安装ENGINE，然后修改连接串（他没要删OFFICE，所以我先按他的方法试的）
64位机器用
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=文件路径;HDR=YES;
32位机器用
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=文件路径;HDR=YES
估计是我资质有限，或者是什么地方设置发生了错误，如是修改后报错。
不愿放弃，再回过头去看微软官网关于这个ENGINE的说明，安装介绍里有如下一段
To use this download:If you are the user of an application, consult your application documentation for details on how to use the appropriate driver.If you are an application developer using OLEDB, set the Provider argument of the ConnectionString property to “Microsoft.ACE.OLEDB.12.0”
If you are connecting to Microsoft Office Excel data, add the appropriate Extended Properties of the OLEDB connection string based on the Excel file type:
File Type (extension)& && && && && && && && && && && && && && && &Extended Properties
---------------------------------------------------------------------------------------------
Excel 97-2003 Workbook (.xls)& && && && && && && && && && && & &Excel 8.0&
Workbook (.xlsx)& && && && && && && && && &&&&Excel 12.0 Xml&
Macro-enabled workbook (.xlsm)& && &&Excel 12.0 Macro&
Non-XML binary workbook (.xlsb)& && &&Excel 12.0&If you are an application developer using ODBC to connect to Microsoft Office Access data, set the Connection String to “Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=path to mdb/accdb file”If you are an application developer using ODBC to connect to Microsoft Office Excel data, set the Connection String to “Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ=path to xls/xlsx/xlsm/xlsb file”
既然高大上的微软都这么说了，那我也就试试看，居然就成了,我链接部分的代码如下：
Set cnn = New ADODB.Connection
& & cnn.Open &Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=\\192.168.1.140\d_peizhi\peizhi.mdb&
Set RST = New ADODB.Recordset
Sql = &select * from peizhiNO1 order by ID&
& & RST.Open Sql, cnn, adOpenKeyset, adLockOptimistic
& & peizhi.Range(&A2&).CopyFromRecordset RST
& & RST.Close
那个开心啊，菜鸟我，终于为换新电脑做好了充分的准备。
就我那点东西，难道以后还要分32位和64位两个版本？显然那不符合我偷懒的个性，于是我想让他们兼容。
我能想出来的方法就两个：
从头再来，去找能兼容32位和64位的连接方法。&&（啥，从头再来，能找到么，算了放弃吧）用代码判断当前系统是32位还是64位然后选择相应的代码执行。（好吧，这个貌似容易一点，我选这个）
网上看到的判断系统64位的方法基本上都要声明API啥的，看了头晕，贴上去能用，还用用，结果贴了几个代码都用不起来（资质有限啊），果断放弃，还是走我的野路子吧。
网上看到使用Application.OperatingSystem可以查到系统的版本，具体显示的格式大概如下（我机器上的版本）
Windows (64-bit) NT 6.01
在32位的win7和XP上我也试了下，显示的格式也是这样，只不过括号里是32-bit和最后的版本号不一样。
既然这样，我就用InStr函数来判断Application.OperatingSystem返回的值里面是否包含字符”64-bit“，如果不包含就认为是32位的，如果包含，就认为是64位的。定义了一个公共变量（为了方便其他位置调用），用来传递不同的链接代码，给一段我的代码（业余选手，多多指正）。
Public db_address As String, db_name As String, name01 As String, name02 As String, name03 As String, name04 As String, name05 As String, name06 As String, name11 As String, name12 As String, name13 As String, name14 As String, name15 As String, name16 As String, htnf As String
Public nv As String, nvn As String, nvl As String, oandn As String, myv As String
Public ct As String
Public Sub L_PEIZHI()
'---------------------------------------------------------------- 判断系统是否为64位
re = InStr(1, Application.OperatingSystem, &64-bit&, vbTextCompare)
If re = 0 Then
& & ct = &provider=Microsoft.jet.OLEDB.4.0;data source=&
& & ct = &Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=&
'----------------------------------------------------------------- 载入基本配置
Set cnn = New ADODB.Connection
& & cnn.Open ct & &\\192.168.2.110\d_peizhi\peizhi.mdb&
Set rst = New ADODB.Recordset
Sql = &select * from peizhiNO1 order by ID&
& & rst.Open Sql, cnn, adOpenKeyset, adLockOptimistic
& & peizhi.Range(&A2&).CopyFromRecordset rst
db_address = peizhi.Cells(2, 3)
db_name = peizhi.Cells(3, 3)
name01 = peizhi.Cells(4, 3)
name02 = peizhi.Cells(5, 3)
name03 = peizhi.Cells(6, 3)
name04 = peizhi.Cells(7, 3)
name05 = peizhi.Cells(8, 3)
name06 = peizhi.Cells(9, 3)
name11 = peizhi.Cells(10, 3)
name12 = peizhi.Cells(11, 3)
name13 = peizhi.Cells(12, 3)
name14 = peizhi.Cells(13, 3)
name15 = peizhi.Cells(14, 3)
name16 = peizhi.Cells(15, 3)
htnf = peizhi.Cells(16, 3)
nv = peizhi.Cells(17, 3)
nvn = peizhi.Cells(18, 3)
nvl = peizhi.Cells(19, 3)
oandn = peizhi.Cells(20, 3)
myv = guanyu.Cells(1, 2)
因为自己被64位这个问题折腾了一天，所以决定写出来，供需要的人参考。
PS:第一次发这样的帖子…………
附上64位AccessDatabaseEngine在百度云的下载地址，想该比微软速度要快点的吧
补充内容 ( 13:28):
后来发现Provider=Microsoft.ACE.OLEDB.12.0;Data Source=文件路径;HDR=YES; 可以用的，看来是我原来写的时候有没注意到的细节
阅读权限100
在线时间 小时
1. 下载运行 AccessDatabaseEngine_x64.exe
2. 改变连接字符串:
Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=mdb.uid=pwd=
阅读权限100
在线时间 小时
本帖最后由 liucqa 于
15:54 编辑
阅读权限10
在线时间 小时
刚换的64位WIN7和EXCLE，感谢！
阅读权限20
在线时间 小时
谢谢了，我是64WIN8.1OFFICE2013
阅读权限70
在线时间 小时
每次回帖、谢谢！辛苦了。
阅读权限20
在线时间 小时
& & & & & & & &
顶，虽然看不懂.....
玩命加载中，请稍候
玩命加载中，请稍候
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！
本站特聘法律顾问：徐怀玉律师 李志群律师
Powered by跪求与win7兼容的Access2003中文版，32位，不要验证码、、计算机考试快到了、、、请发到邮箱@qq.
内容为广告/垃圾，我要举报！
特聘专家具有协助内容审核的特权
举报后内容将不能在前台展示
错乱举报会导致该权利被剥夺
选择举报原因&
一定要能运行的啊，谢谢啦！！！我下载的都不兼容，可是考试必须用2003，很纠结啊，帮帮我吧！
已有1条答案
ACCESS通用版、ACCESS2007、ACCESS2003下载，均为中文版，可永久使用其中ACCESS通用版能支持全部WIN7（32及64位）、XP、WIN2K:/question/.html安全无毒，安装完成即可永久使用
选择举报原因&
快速简答--编辑问题发送微博@ZOL问答堂
office2003是中文企业版的好，还是专业版的好，对普通用户而言。
跪求Microsoft Office 2003简体中文完整专业版下载地址和序列号
office2003免费专业版下载
office2003简体中文上海政府专业版如何安装
找Microsoft Office Word 2003 中文版注册码
没找到想要的答案？那就登录提问吧急需！microsoft office Access下载地址或安装包！或发到我邮箱
急需！microsoft office Access下载地址或安装包！或发到我邮箱
不区分大小写匿名
ed2k://|file|cn_access__dvd_515000.iso||AE0AD978BD155EF906A4F0|/
相关知识等待您来回答
微软专区领域专家办公软件相关分类
常用装机软件
软件标签：
软件授权：官方版
更新时间： 22:51:17
软件类型：国产软件
软件大小：768 MB
软件语言：简体中文　
应用平台：XP/Vista/Win7/win8/
Microsoft&Office2013是微软的新一代Office办公软件，全面采用Metro界面。Microsoft&Office&2013官方下载(Office2013专业增强版)包括Word、PowerPoint、Excel、Outlook、OneNote、Access、&Publisher和Lync。要试用Office2013专业增强版，您必须先从电脑上卸载现有Office版本。注意的是Office2013将不再支持XP和Vista操作系统！Microsoft&Office2013官方中文版特别强调在平板上使用的便利性，无论是用手指、鼠标、触控笔还是键盘，都能简单地操作。微软官方已经提供Office2013专业增强版的下载，为了让更多用户体验到Office2013，微软在TechNet官网上提供了专业增强版的完整功能免费评估版，用户可以免费下载试用60天。Microsoft&office2013官方下载免费完整版免费下载地址：/zh-cn/evalcenter/jj192782.aspx&只需注册登录微软账户，就可以下载并安装全功能Office&2013专业增强版，试用期为60天。Microsoft&Office2013官方中文版一些主要新功能的列表：触控、笔控&-&支持滑动文件、两指缩放等大家习以为常的触控操作，也支持手写自动转换文字。新的&Windows&8&App&-&内含&OneNote&和&Lync&两个专为&Windows&8&设计的&AppWindows&RT&版&-&Word、Excel、PowerPoint、OneNote&四个软件都有&RT&版。Skype&-&内置&Skype&的功能，方便合作。编辑&PDF&文件（Word）演说者画面（PowerPoint）软件特别提醒：本页面的office2013官方下载是中文版32位下载地址：由于版权原因，本页面软件下载包已下架处理，下载地址替换为wps&office2013！
软件下载　　　
点击以下链接下载office2013官方下载免费完整版(office2013中文版32位)　　
相关资源　　　
?上一软件：
?下一软件：
　华彩软件站的所有软件都经过严格安装检测,如发现有病毒木马或不能下载,请()反馈。
　推荐使用[]等专业工具下载本站软件,可获取最高速的下载速度。
　请尽量使用[]或[]等解压缩工具,这样能确保您下载的软件运行正常。
　若下载的软件压缩包有加密,密码将是
　华彩软件站中所包含的破解版及注册码均搜集自互联网,如果上述行为侵犯到您的权益,敬请通知。
　感谢您对本站的支持,欢迎您加入华彩软件站用户QQ群进行交流！您的位置：
→ access2000下载(access2000绿色版)
access2000下载(access2000绿色版)
access2000下载(access2000绿色版)介绍
2000是office比较早期的一个组件了，虽然现在用的人可能不是很多了，但是仍然还是有一定的需求，可能这部份人都是电脑配置可能低一点，或是老电脑重新利用吧，不管你如何用，也很多人为了应对考式，中国的教育在这里就可以看出来了，老掉牙的东西还在这里学，还得考，在这里给您提供的是一个access2000绿色版，无需安装只需要要解压，然后运行一下绿化即可了。作为Office2000的重要成员之一，Microsoft Access2000数据库是目前市场上的一种非常优秀的数据库管理系统和窗口数据库。它具有新界面、新VBA功能、更加智能化的Office助手、多语言支持以及强大的Web发布能力。在Access2000中文版中，格式和原有的文件格式具有同等的地位，用户编辑创建的HTM L文件可以完整地保留原有格式。这个增强的Web发布能力使Access2000具有利用Web作为上载、管理和编辑文档的能力。access2000注意事项如果计算机已有Office(word，excel，就没有Access)，可用微软官方专用的卸载工具把原来的Office卸载了。再重新安装你需要的版本。在安装的同时，自定义选择你需要的软件（word，excel，access，ppt）access2000绿色版使用方法1、下载并解压本站为您提供压缩包2、运行绿化.bat批处理文件3、双击主程序即可为您运行access2000access2000特点1、2000格式的好啊，兼容性强，所有版本的都可以打开该数据库；否则保存为2003.mdb或者2007.accdb格式的，在别的及其上可能会打不开2、好像access没有执行sql的工具，但你用其他语言连接的话，可以执行sql，update 表名 set 字段名=值 【条件】3、access2000默认安装时，是没有密码的。本身access2000没有多级用户权限的。只有MS SQL才有管理员帐号和密码，默认系统管理员帐号是SAaccess2000序列号1：DT3FT-BFH4M-GYYH8-PG9C3-8K2FJ&2：GC6J3-GTQ62-FP876-94FBR-D3DX8&3：J2MV9-JYYQ6-JM44K-QMYTH-8RB2W&4：MP4F9-W6C8V-HTCCT-T7MR-Y7K3Y
其它相关版本
access2000下载(access2000绿色版)相关的软件
(12)下载排行榜
办公软件一般包含文字处理表格制作幻灯片制作图形图像处理简单数据库处理等方面的软件，目前最常用的办公软件就是微软的软件了，不过正版的需要付费才能使用，为此本站给大家整理了一些电脑常用的办公软件，都是免费
9.1.0.4866 官方最新版
SP3 五合一龙卷风精简版(全部图片为证)
1.0.0.0508 官方最新版
三合一简体中文版
14.0 免注册中文绿色精简版
8.1.0.3477 单文件精简版
(49)下载排行榜
是我信常见的一个组件，主要是功能是建立小型的数据库，所有的计算机考试都会涉及到,查询语句在基本上都可以使用，适用于做一些小型网站的数据库，特别是早期的网站基本上都是采用数据库。里面只要你把需要的文件导入
2.0 绿色中文版
1.34 绿色版
广西出入境检验检疫局(全分局通用) 网友 客人 发表于:
下载后执行目录下的安装.bat就可以了,如果提示注册表无法导入,点确定就可以了,没关系,就装好了。
43.6M / 去广告版
5.0M / FinalData
480KB/中文/ 2.5
52KB/中文/ 6.6
10.0M/中文/ 8.3
本类软件排行
2.3M/中文/ 6.2
38.7M/中文/ 7.6
125KB/中文/ 1.6
2.0M/中文/ 4.2
3.1M/多国语言[中文]/ .7
150KB/英文/ 1.8
1004KB/英文/ 3.8
16.6M/中文/ 3.3
104.1M/中文/ 10.0
4.8M/中文/ 6.0
东坡下载 & 分享互联网 Copyright(c)
All Right Reserved 网站备案/许可证号 鄂ICP备号-1}