Weitere Informationen zur Beibehaltung von Recordsets

Artikel
05/30/2023

Das ADO-Recordset-Objekt unterstützt das Abspeichern des Inhalts eines Recordset-Objekts in einer Datei mit Hilfe seiner Save-Methode. Die beständig gespeicherte Datei kann auf einem lokalen Laufwerk, einem Server oder als URL auf einer Website vorhanden sein. Die Datei kann später entweder mit der Methode Open des Recordset-Objekts oder mit der Methode Executedes Connection-Objekts wiederhergestellt werden.

Darüber hinaus konvertiert die GetString-Methode ein Recordset-Objekt in ein Formular, in dem die Spalten und Zeilen mit Zeichen getrennt werden, die Sie angeben.

Um ein Recordset beizubehalten, beginnen Sie mit der Konvertierung in ein Formular, das in einer Datei gespeichert werden kann. Recordset-Objekte können im geschützten Advanced Data TableGram (ADTG)-Format oder im offenen Extensible Markup Language (XML)-Format gespeichert werden. ADTG-Beispiele werden im nächsten Abschnitt angezeigt. Weitere Informationen zur XML-Persistenz finden Sie unter Persistieren von Datensätzen im XML-Format.

Speichern Sie alle ausstehenden Änderungen in der persistierten Datei. So können Sie eine Abfrage erstellen, die ein Recordset-Objekt zurückgibt, das Recordset bearbeiten, es und die ausstehenden Änderungen speichern, später das Recordset wiederherstellen und dann die Datenquelle mit den gespeicherten ausstehenden Änderungen aktualisieren.

Informationen zur dauerhaften Speicherung von Stream-Objekten finden Sie unter Streams und Persistenz.

Ein Beispiel für die Recordset-Persistenz finden Sie im Szenario für die XML-Recordset-Persistenz.

Beispiel

Speichern eines Recordsets:

Dim rs as New ADODB.Recordset  
rs.Save "c:\yourFile.adtg", adPersistADTG

Öffnen Sie eine persistierte Datei mit Recordset.Open:

Dim rs as New ADODB.Recordset  
rs.Open "c:\yourFile.adtg", "Provider=MSPersist",,,adCmdFile

Optional, wenn das Recordset keine aktive Verbindung hat, können Sie alle Standardeinstellungen und Code wie folgt akzeptieren:

Dim rs as New ADODB.Recordset  
rs.Open "c:\yourFile.adtg"

Öffnen Sie eine persistierte 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 Sie eine persistierte Datei mit RDS.DataControl:

In diesem Fall ist die Eigenschaft Server nicht gesetzt.

Dim dc as New RDS.DataControl  
dc.Connection = "Provider=MSPersist"  
dc.SQL = "c:\yourFile.adtg"  
dc.Refresh