如何保存没有数据库实体的记录集？

Question

以下代码可以创建无数据库实体的记录集：
Dim adoRecordset As New ADODB.Recordset
Dim i As Integer
For i = 0 To 2 '为Recordset三个字段,即为DataGrid 添加三列      adoRecordset.Fields.Append "第" & i & "列", adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
Next i
adoRecordset.Open
For i = 0 To 3
    adoRecordset.AddNew '加四条记录,即为DataGrid 添加四空行
Next i
=============================================================
我的问题是：如果我现在想把 adoRecordset 保存数据库表中，有什么快点的方法吗？而不用打开另一个有数据库实体的表，然后逐行赋值。

Answer 1

用 sql语句要比一条一条赋快

Answer 2

再无其它办法了  
操作数据库无非就这么几种方法  sql语句   ado    dao

Answer 3

我觉得这种用法是比较有用的，比如，我可以先查询一些数据用DataGrid显示给用户看（甚至用户还可以先进行删改），如果用户感兴趣，只要按“保存”按钮就可以进行保存。