visual-basic-6.0成功连接access2010方法.doc

(完整版)visual basic 6.0成功连接access2010方法
在用vb连接access数据库时，出现了这样的错误：

这是你的数据库格式不被 程序识别。vb默认的一般是。，mdb  access数据库格式!这时我们看一下我们要连接的
是.accdb 格式的.
看一下代码,我们以前使用的是：
Provider=Microsoft.jet.oledb。4。0
当数据库格式发生变化时，连接语法格式就变了：Microsoft office 12。0 access database engine oledb provider 这时连
接字符创立已经有的，我们把它填上以后就成如下错误了。

为什么呢？原因是，。accdb 数据格式不适用jet 引擎连接了。而是:provider=microsoft.ace.oledb.12.0
这样一改就可以连接上了。

 o7版以前的access数据库的格式都是.mdb 的，而vb6。0 本身带的数据库格式也是。mdb的，所以大家也都习惯了连
接.mdb格式的access数据库，但是07版以后的数据库格式就成了 。accdb 的了，在连接的过程中可就要做一下改变
了。
总结一下：通常连接数据库我们可以使用下面两种连接方法：
添加引用，使用代码连接.
解决如下：
一、引用连接
添加引用，使用代码连接。工程—-引用—-microsoft  activeX data objects  2。5 library
代码窗口中加入:
Dim objcn As NewConnection
    Dim objrs As New Recordset
    Dim strsql As String
     objcn.ConnectionString =”provider=microsoft。ace.oledb.12。0；" & "data source="＆ App。Path & "\3。accdb"         （3为数据库的名字)
    objcn。Open

    strsql = ”select 密码 from 3 where账号=’” ＆ username ＆ "'"                    (账号表中的字段，username为自定义的变量）
     Set objrs.ActiveConnection = objcn
     objrs.Open (strsql）

二、控件连接：
1，工程——部件—-添加 microsoft ado data  control  6。0   控件。

2、属性设置：
点击生成按钮，打开连接字符串,选中,microsoft office 12。0 access database engine ole db provider 

3、设置连接路径。

然后在连接选项看中填入你的数据库路径,数据源文件要加上后缀名 。accdb，不加后缀名，有时会测试连接不成功.测试连接，如果连接成功,则说明数据库跟你的vb程序绑定了。

4、设置纪录源:

就这样你的2007以上的access 数据库就可以连接vb程序了.

这一切的大前提就是你会用officeaccess建立数据库，且是正确的数据库哦！