[总览]
最后一个技巧,我们演示了从DAO记录集中检索数据,并使用GetRows()方法将其放入二维数组的技术。 这周,我们将介绍相同的方法(GetRows()),但仅适用于ADO Recordset。 尽管这两种方法有相似之处,但是ADO方法提供了2种以上的可选参数,但有些复杂,当然,在创建Recordset时语法也有所不同。 此处将指出差异以及一些相似之处,如果您希望查看GetRows()的概述,请参考先前的技巧(#49)。
[ADO GETROWS()版本的语法]- 数组= Recordset.GetRows(行,开始,字段)
- 行-(可选)指示要检索的记录数,默认为所有记录。
- Start-(可选),字符串或变量,其结果为记录的书签,GetRows()操作应从该记录开始。
- 字段-(可选),表示单个字段名称,序数字段位置,字段名称数组或序数字段位置数组的变体。 GetRows()仅返回这些字段中的数据
Dim rstEmployees As ADODB.Recordset
Dim varEmployees As Variant
Dim intRowNum As Integer
Dim intColNum As Integer
'Make up of qryEmployees (5 Fields/9 Records) based on the
'sample Northwind.mdb Database
'[LastName] - Ascending
'[FirstName] - Ascending
'[Address]
'[City]
'[Region]
Set rstEmployees = New ADODB.Reco