Bevor wir unfreiwillig Schaden anrichten, werden wir zuerst nur Daten lesen. Zum Suchen und Schreiben wird sich nur wenig ändern, aber wenn es schiefgeht, sind wenigstens die Datensätze noch in Ordnung.
Beginnen wir mit der grundsätzlichen Herangehensweise an das Auslesen von Datensätzen. Sie müssen immer irgendeine Datenquelle öffnen, die entweder eine Tabelle oder eine Abfrage ist.
Erstellen Sie eine neue Prozedur LiesHotel mit dem folgenden Code:
Sub LiesHotel() Dim rcsHotel As Recordset Set rcsHotel = CurrentDb.OpenRecordset("tblHotels") MsgBox rcsHotel.RecordCount & " Datensätze" End Sub
Eine Objektvariable rcsHotel mit dem speziellen Datentyp Recordset dient als Zwischenspeicherung für die geöffneten Daten.
No credit card required