Microsoft Office Access 2007-Programmierung - Das Handbuch

BEISPIEL

BEISPIEL

HINWEIS

Obiges Beispiel auf andere Weise gelöst.

rs.Open "SELECT * FROM Personen WHERE Nachname LIKE '" & Text1.Text & "'"

Label1.Caption = rs.RecordCount

Ungebundene Recordsets

ADO-Recordsets sind nicht unbedingt an Datenbankobjekte oder SQL-Abfragen gebunden. So können Sie

zur Programmlaufzeit ein neues Recordset-Objekt anlegen, das keinerlei Bezug zu irgendwelchen Daten-

banken bzw. anderweitig gespeicherten (persistenten) Daten enthält. Damit steht Ihnen eine flexible Alter-

native zu den dynamischen Arrays aus benutzerdefinierten Datentypen zur Verfügung.

Ein ungebundenes ADO-Recordset-Objekt wird erzeugt:

Set rs = New Recordset

rs.Fields.Append "Name", adBSTR

rs.Fields.Append "Geburtsdatum", adDate

rs.Fields.Append "Telefon", adInteger

Jetzt kann das Recordset benutzt werden:

rs.Open

rs.AddNew

rs!Name = "Müller"

rs!Geburtsdatum = CDate("3.4.75")

rs!Telefon = 123456789

rs.Update

Den kompletten Code finden Sie im Praxisbeispiel »ADO-XML-Streams nachbearbeiten« des Kapitels 12.

Recordsets abspeichern

Ein absolutes ADO-Novum ist die Möglichkeit, die Werte eines Recordsets direkt in einer Datei abzulegen.

Dazu braucht es sich nicht unbedingt um ungebundene Recordsets zu handeln, auch jedes »normale« (d.h.

an eine Datenbank gebundene) Recordset-Objekt kann auf diese Weise in eine separate persistente Form

überführt werden.

Die Syntax:

rs.Save FileName, [PersistFormat]

Die Argumente:

■ FileName

... ist der Dateipfad, wohin das Recordset gespeichert wird.

■ PersistFormat

... ist das Datenformat, in welchem das Recordset gespeichert wird (Default ist adPersistADTG).

385

Weitere Operationen mit Recordsets