VBA: Recordset aus Abfrage generieren

Computer: Software & Programmierung Programmierung allgemein
1

Hi, Computerfreaks!

Ich ärgere mich gerade mit einer Datenbank herum, bei der es nötig ist, Datensätze in eine andere Reihenfolge zu bringen. Dazu habe ich ein künstliches Sortierkriterium eingefügt (Integerzahl). in der Tauschprozedur soll ein Recordset angelegt werden, das auf eine Abfrage zugreift, in der die sortierten Datensätze enthalten sind.

Mit den folgenden Zeilen bekomme ich allerdings immer nur die Meldung datensaetze = nothing. a_userin ist der Name der Abfrage, auf die das Recordset zugreifen soll.

Set aktuelle_db = CurrentDb

Set datensaetze = aktuelle_db.OpenRecordset(„a_userin“, dbOpenDynaset)

Gruß

Peter

2

Versuch doch mal so:

Dim rs as Recordset
Dim SQL as String

SQL = „Select * from Tabelle order By Sortierkriterium“
set RS = Aktuelle_db.openrecordset(SQL)

)

Gruss
MArtin

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Versuch doch mal so:

Dim rs as Recordset
Dim SQL as String

SQL = „Select * from Tabelle order By
Sortierkriterium“
set RS = Aktuelle_db.openrecordset(SQL)

)

Gruss
MArtin

Hallo Martin!

Das führt leider zum selben Fehler. mein Problem ist, daß die Abfrage als Auswahlkriterium einen Parameter aus einem Formular überprüft. Beim Anlegen des recordsets scheint der Zugriff auf diesen Parameter nicht möglich zu sein. Nur habe ich auch keine Ahnung, wie dieser Parameter nochmal gesondert übergeben werden kann.

Gruß

Tomcat