织梦CMS - 轻松建站从此开始!

Office下载激活密钥官网_Word Excel PPT PowerPoit 自学教程

当前位置: 主页 > Excel教程 > Excel2013教程 >

通过设置Connection对象属性连接Access数据库的方法

时间:2017-10-07 00:00来源:未知 作者:admin 点击:
在通过VBA程序访问Access数据库时,首先需要连接数据库。在VBA中,使用ADO对象模型可以连接到各种不同类型的数据库,这都是通过设置Connection对象的相应属性完成的。Connection对象表示

在通过VBA程序访问Access数据库时,首先需要连接数据库。在VBA中,使用ADO对象模型可以连接到各种不同类型的数据库,这都是通过设置Connection对象的相应属性完成的。Connection对象表示打开的连接到数据库的链接。无论对数据库进行何种操作,首先需要完成的都是生成该对象以连接到数据库。本文介绍通过设置Connection对象属性来连接Access数据库的方法。

1、新建Excel工作簿,打开Visual Basic编辑器,在工程资源管理器中添加一个模块,在“代码”窗口中输入程序代码,如图1所示。具体的程序代码如下所示:

Sub ConnectToAccess()

Dim conn As New ADODB.Connection

conn.Provider="Microsoft.Jet.OLEDB.4.0" '指定Connection对象提供者的名称

conn.ConnectionString="data source="&_ThisWorkbook.Path&"\dbSource.mdb" '指定Connection对象的连接字符串

conn.Mode=adModeReadWrite '指定数据库读写模式

conn.Open '打开到指定数据库的链接

Debug.Print conn.ConnectionString '输出连接字符串

Debug.Print conn.ConnectionTimeout '输出连接超时时间

Debug.Print conn.Mode '输出数据库读写模式

Debug.Print conn.Provider '输出提供者名称

Debug.Print conn.Version '输出ADO版本号

Debug.Print conn.State '输出连接当前开启状态

End Sub

通过设置Connection对象属性来连接Access数据库的方法

图1 插入模块并输入程序

2、按F5键运行"ConnectToAccess"过程,此时在“立即窗口”中将会获取程序运行结果,如图2所示。

通过设置Connection对象属性来连接Access数据库的方法

图2 “立即窗口”输出结果

提示

这里要注意的是,在"ConnectionToAccess"过程中指定ConnectionString属性时,只给出了data source相关内容,但是在输出该属性时,却获取了很多内容,其中就包含Provider属性的相关信息。

(责任编辑:admin)
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
表情:
用户名: 验证码:点击我更换图片