adodb查询到100条记录后，想将ni_num关键字下的所有记录赋给数组,该如何解决

adodb查询到100条记录后，想将ni_num关键字下的所有记录赋给数组
问题：
通过adodb查询到100条记录后，想将ni_num关键字下的所有记录赋给数组。
不知如何实现，求代码

VB code

Private Sub GetFgSn()On Error GoTo ErrmsgDim conn As New ADODB.ConnectionDim rs As New ADODB.Recordset     Set conn = New ADODB.ConnectionSet rs = CreateObject("adodb.recordset")    conn.ConnectionString = "Driver={SQL Server};server=server;database=SuiviTest;uid=test;pwd=test"conn.Open        rs.Open "SELECT * FROM dbo.detailMesure where pt_num = '253302739' order by mt_datedeb", conn, adOpenForwardOnly, adLockReadOnlyIf Not (rs.BOF And rs.EOF) Then Debug.Print 2222222Exit SubErrmsg:Debug.Print 1111111End Sub

[解决办法]
最基本的做法：
do while not rs.eof
a(i)=rs.fileds(0)
rs.movenext
loop
[解决办法]

探讨

引用:
VB code

使用 GetRows 方法可将记录从 Recordset 复制到二维数组中。第一个下标标识字段，第二个则标识记录号。当 GetRows 方法返回数据时数组变量将自动调整到正确大小。

如果不指定 Rows 参数的值，GetRows 方法将自动检索 Recordset 对象中的所有记录。如果请求的记录比可用记录多，则 GetRo……

查看更多 下一篇