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

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

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

使用Recordset对象的属性来获取数据库字段的方法

时间:2017-10-07 00:00来源:未知 作者:admin 点击:
Recordset对象是基于连接数据库的数据表或通过Command对象执行结果获取的记录集。要通过ADO对象模型对数据库中的数据进行操作,经常需要使用该对象。本文介绍使用Recordset对象的属性来

Recordset对象是基于连接数据库的数据表或通过Command对象执行结果获取的记录集。要通过ADO对象模型对数据库中的数据进行操作,经常需要使用该对象。本文介绍使用Recordset对象的属性来获取数据库字段的方法。本文使用微软Access自带的“罗斯文2007”数据库文件,程序将开启其中的“运货商”数据表记录集,将返回记录集记录总数及有关字段。

1、新建Excel工作簿,打开Visual Basic编辑器,在工程资源管理器中插入一个模块,在模块的“代码”窗口中输入如下代码:

Sub RecordsetAttribute()

Dim conn As New ADODB.Connection

Dim rs As New ADODB.Recordset

conn.Provider="Microsoft.ACE.OLEDB.12.0" '设置提供者名称

conn.ConnectionString="data source="&_ThisWorkbook.Path&"\罗斯文2007.accdb" '设置连接字符串

conn.Mode=adModeReadWrite '设置数据库读写模式

conn.Open '打开数据库连接

rs.CursorLocation=adUseClient '设置游标引擎位置

rs.Open"运货商",conn,adOpenForwardOnly,adLockOptimistic '打开“运货商”数据表记录集

Debug.Print"记录总数:"&rs.RecordCount '输出记录集记录数

Do Until rs.EOF '遍历记录集所有记录

Debug.Print rs.AbsolutePosition&vbTab&rs.Fields("公司") '输出当前记录位置及“公司”字段

rs.MoveNext '移动到下一条记录

Loop

End Sub

2、按F5键运行该过程,此时可以在“立即窗口”中获取指定数据库中的字段记录,如图1所示。

使用Recordset对象的属性来获取数据库字段的方法

图1 获取字段记录

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