Access: Abfrage prüfen

[Sanic]

Hallo,
ich habe ein Visual Basic Script, was eine Abfrage mit einer Schleife aufruft ...
Nun möchte ich prüfen, ob bei DoCmd.OpenQuery überhaupt ein Ergebnis in der Abfrage vorhanden ist ( also Rows > 0 ).

Wie kann ich das in eine IF Abfrage packen ?
In PHP gibt es dafür ja mysql_num_rows ....
Gibt es etwas vergleichbares hier ?

Danke im vorraus!

 

[Sanic]

Habs mal anders gelöst!

Set rs2 = db.OpenRecordset("SELECT Count([lieferer]) AS Anzahl FROM abf_lief_num;", dbOpenDynaset)
    rs2.MoveFirst
    If rs2![Anzahl] > 0 Then
        'Es sind Daten vorhanden, Abfrage durchführen
        DoCmd.OpenQuery "abf_final"
    Else
        MsgBox ("Keine Daten vorhanden")
    End If

Erst denken, dann posten