悠悠博客 关注Ajax技术与web开发

ADO 提供创建 Recordset 的便捷方法，即向 Recordset 的 Field 集合追加新的 Field 对象。随后，可以打开 Recordset 并在其中插入来自任意源（不必是数据库）的数据。还可以通过编程对数据进行操作。

新 Recordset 可以使用对任意 Recordset 有效的所有数据操作方法。使用 Recordset 将信息提供给可视控件，甚至还可用来更新实际数据源。

下列 Visual Basic 代码显示创建 Recordset 的便捷方法。

Sub CreateRS()
Dim rs As New ADODB.Recordset

rs.Fields.Append "Field1", adChar, 10
rs.Fields.Append "Field2", adInteger

rs.Open
rs.AddNew
rs("Field1") = "any string"
rs("Field2") = 9

Do While Not rs.EOF
Debug.Print rs("Field1") & " " & rs("Field2")
rs.MoveNext
Loop

rs.Close
Set rs = Nothing
End Sub