Access 2000: Abfrage aktualisieren auf Knopdruck in Formular

[Glaurung]

Hallo
ich habe ein Formular mit ein paar Textfeldern und einem Button. Über die Textfelder gebe ich Suchparameter ein. Über den Button errechne ich aus den Parametern eine Where-Klausel und weise diese einer Select-Abfrage zu (CurrentDb.QueryDefs("Abfrage").sql = clause). Soweit funktioniert es. Schließlich will ich, dass diese Abfrage mit ihrer neuen Where-Klausel neu ausgeführt wird. Und genau daran hakt es.

Ich habe meine Abfrage in einem Unterformular in dem Formular, in dem auch die Textfelder und der Button stecken. Die Frage ist nun, wie ich der Abfrage mitteilen soll, dass sie noch einmal suchen soll. Me!ufo.Form.Requery funktioniert nicht.

Wahrscheinlich ist es ganz einfach, aber ich komme nicht drauf.

Die Alternativlösung mit einer Abfrage außerhalb des Formulars, die sich auf Knopfdruck öffnet, funktioniert zwar, allerdings öffnet sie sich genau auf meinem Formular, so dass ich meine Suchparameter nicht mehr sehe. Außerdem muss vor jedem Knopfdruck die Abfrage geschlossen werden, damit sie richtig geöffnet werden kann.

[database]

Hallo,

m.E. sprichst du das Unterformular nicht richtig an.

sieh mal hier rein:

http://www.donkarl.com?FAQ4.2
sowie den in der FAQ enthaltenen Link auf Dev Ashish

HTH

[DF6GL]

Hallo,

warum eigentlich so umständlich über die SQL-Eigenschaft einer gespeicherten Abfrage?

Wenn sich der Button ("btnSuchen") und die Textfelder in demjenigen Formular befinden, das auch die gefilterten Daten anzeigen soll , dann:

Sub btnSuchen_Click()
Dim clause as String
' clause = " Select * from tblTabelle where ID = 1"   ' hier den SQL-String wie gewünscht zusammensetzen
Me.Recordsource =clause    ' SQL-String der Form- Eigenschaft Recordsource zuweisen
End Sub


Mit der gespeicherten Abfrage halt:


Sub btbSuchen_Click()
Dim clause as String
' clause = " Select * from tblTabelle where ID = 1"   ' hier den SQL-String wie gewünscht zusammensetzen
CurrentDb.QueryDefs("Abfrage").sql = clause
Me.Recordsource ="Abfrage"     ' Abfrage(name) der Form- Eigenschaft Recordsource erneut (!) zuweisen
End Sub

[Glaurung]

Danke für die Vorschläge, ich werde es ausprobieren, wenn ich Zeit habe.