使用记录集持久性,可以将 Recordset 数据和元数据保存为文件。随后,使用持久文件来重新建立 Recordset 对象。持久文件可以保存在本地驱动器、网络服务器上或者作为 URL 保存在 Web 站点上。
另外,GetString 方法将 Recordset 对象转换成表单,在表单中列和行使用指定的字符分界。
详细资料
Microsoft OLE DB Persistence Provider 支持使用 Recordset 对象 Save 方法将 Recordset 对象保存在文件中。随后,使用 Recordset 对象的 Open、或 Connection 对象的 Execute 方法可恢复持久文件。
Recordset 对象被转换为能被保存在文件中的表单。Recordset 对象可以按所拥有的高级数据图表 (ADTG) 格式保存,或者按打开的可扩展标记语言 (XML) 格式保存。
挂起更改保存在持久文件中。因此,可以发布查询返回 Recordset 对象、编辑记录集、保存该记录集和挂起变化、以后恢复该记录集、然后使用保存的挂起变化更新数据源。
用法
保存记录集:
Dim rs as New ADODB.Recordset
rs.Save "c:\yourFile.adtg", adPersistADTG
使用 Recordset.Open 打开持久文件:
dim rs as New ADODB.Recordset rs.Open "c:\yourFile.adtg", "Provider=MSPersist",,,adCmdFile
可选地,如果 Recordset 没有活动的连接,则都可以接受所有的默认值和简单的代码:
dim rs as New ADODB.Recordset
rs.Open "c:\yourFile.adtg"
使用 Connection.Execute 打开持久文件:
dim conn as New ADODB.Connection dim rs as New ADODB.Recordset conn.Open "Provider=MSPersist" set rs = conn.execute("c:\yourFile.adtg")
使用 RDS.DataControl 打开持久文件:
在这种情况下,没有设置 Server 属性。
Dim dc as New RDS.DataControl dc.Connection = "Provider=MSPersist" dc.SQL = "c:\yourFile.adtg" dc.Refresh