Weitere Informationen zur Recordset-Speicherung
Gilt für: Access 2013, Office 2013
The ADO Recordset object supports storing a Recordset object's contents in a file using its Save method. Die persistent gespeicherte Datei kann auf einem lokalen Laufwerk, einem Netzwerkserver oder als URL auf einer Website vorhanden sein. Later, the file can be restored with either the Recordset object's Open method or the Connection object's Execute method.
Außerdem wird durch die GetString-Methode ein Recordset -Objekt in ein Formular konvertiert, dessen Spalten und Zeilen durch die von Ihnen angegebenen Zeichen getrennt sind.
Beginnen Sie, ein Recordset permanent zu machen, indem Sie es in ein Formular konvertieren, das in einer Datei gespeichert werden kann. Recordset-Objekte können im proprietären ADTG-Format (Advanced Data TableGram) oder im offenen XML-Format (Extensible Markup Language) gespeichert werden. ADTG-Beispiele werden weiter unten gezeigt. Weitere Informationen zur XML-Permanenz finden Sie unter Speichern von Datensätzen im XML-Format.
Speichern Sie alle ausstehenden Änderungen in der persistenten Datei. Dadurch können Sie eine Abfrage ausgeben, die ein Recordset-Objekt zurückgibt, das Recordset-Objekt bearbeitet, es und die ausstehenden Änderungen speichert, später das Recordset wiederherstellen und dann die Datenquelle mit den gespeicherten ausstehenden Änderungen aktualisiert.
Weitere Informationen zum permanenten Speichern von Stream -Objekten finden Sie unter Datenströme und Permanenz in Kapitel 10.
Ein Beispiel für die Recordset-Permanenz finden Sie unter Speicherszenario für XML-Recordset.
Beispiel
Speichern eines Recordsets:
Dim rs as New ADODB.Recordset
rs.Save "c:\yourFile.adtg", adPersistADTG
Öffnen einer permanenten Datei mit "Recordset.Open":
Dim rs as New ADODB.Recordset
rs.Open "c:\yourFile.adtg", "Provider='MSPersist'",,,adCmdFile
Wenn das Recordset nicht über eine aktive Verbindung verfügt, können Sie optional alle Standardeinstellungen akzeptieren und einfach folgenden Code schreiben:
Dim rs as New ADODB.Recordset
rs.Open "c:\yourFile.adtg"
Öffnen einer permanenten Datei mit "Connection.Execute":
Dim conn as New ADODB.Connection
Dim rs as ADODB.Recordset
conn.Open "Provider='MSPersist'"
Set rs = conn.execute("c:\yourFile.adtg")
Öffnen einer permanenten Datei mit "RDS.DataControl":
In diesem Fall ist die Server -Eigenschaft nicht festgelegt.
Dim dc as New RDS.DataControl
dc.Connection = "Provider='MSPersist'"
dc.SQL = "c:\yourFile.adtg"
dc.Refresh