Bericht mit Datumsprüfung
Karl Donaubauer
Gesendet: 27.02.12 07:10
Betreff: RE: Bericht mit Datumsprüfung



Elite Veteran

Beiträge: 704
500100100
Ort: Wien
Hallo, Andi!

Andi-München - 26.02.12
Ich habe einen Bericht in dem es ein Unterbericht(Formular) gibt in dem Gegenstände mit einem Ablaufdatum aufgeführt werden. Diese Gegenstandsliste wird durch eine Abfrage generiert!
Ich möchte dass wenn ein Ablaufdatum kleiner heute ist (also abgelaufen) der Bericht gestoppt wird wird und eine Meldung angezeigt wird.
Das mit der Meldung ist nicht das Problem aber das mit der Überprüfung des Datums kleiner Heute ?????
Muss ich das im Bericht, im Unterbericht(Formular) oder in der Abfrage machen und vor allem wie muss ich das machen.

Du solltest das vor dem Öffnen des Berichtes auf Basis der Abfrage machen. Ich gehe mal davon aus, dass du den Bericht z.B. mit einer Schaltfläche öffnest. Den Code dafür kannst du ca. so ändern:

If DCount("*", "DeineAbfrage", "Ablaufdatum < Date()" ) > 0 Then
MsgBox "Da ist was abgelaufen!"
Else
DoCmd.OpenReport "DeinBericht", acViewPreview
End If

-----
Servus
Karl
*********
Internationale Access-Konferenz: http://www.AccessDevCon.com
Access-Entwickler-Konferenz: http://www.donkarl.com/?aek
Top of the page Bottom of the page