深入了解資料錄集的保存
ADO Recordset 物件支援使用其 Save 方法,將 Recordset 物件的內容儲存在檔案中。 持續儲存檔案可能存在於本機磁碟機、伺服器或網站上的 URL。 稍後可以使用 Recordset 物件的 Open 方法或 Connection 物件的 Execute 方法還原檔案。
此外,GetString 方法會將 Recordset 物件轉換成表單,其中資料行和資料列會以您指定的字元分隔。
若要保存 Recordset,請先將其轉換成可儲存在檔案中的表單。 Recordset 物件可以儲存為專屬的 Advanced Data TableGram (ADTG) 格式,或開放可延伸標記語言 (XML) 格式。 下一節會顯示 ADTG 範例。 如需 XML 持續性的詳細資訊,請參閱以 XML 格式保存記錄。
在保存的檔案中儲存任何暫止的變更。 這樣做可讓您發出會傳回 Recordset 物件的查詢、編輯 Recordset、儲存它和暫止的變更、稍後還原 Recordset,然後使用儲存的暫止變更來更新資料來源。
如需持續儲存 Stream 物件的詳細資訊,請參閱資料流和持續性。
如需 Recordset 持續性的範例,請參閱 XML 記錄集持續性案例。
範例
儲存資料錄集:
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 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
另請參閱
GetString 方法 (ADO)
Microsoft OLE DB 持續性提供者 (ADO 服務提供者)
Recordset 物件 (ADO)
資料流和保存