Table nach Datum Filtern

[jensenwb]

Ich möchte meine Datenbank so Filtern das ich einem bestimmten Datumsbereich angebe und mir dann alle Datensätze ausgezeigt werden die ein bestimmter Empfaenger in dieser Zeit bekommen hat.

Mein Datumsfeld ist vom Typ DATE.

Wenn ich es so Probiere bekomme ich folgende Fehlermeldung:

"Arithmetische Filterausdrücke werden nicht unterstützt."

Delphi-Quellcode:

var Von, Bis : string;
begin
  Von := DateToStr(DateTimePicker1.Date);
  Bis := DateToStr(DateTimePicker2.Date);
  Table1.Filter := 'Empfaenger = ' + QuotedStr(trim(DBCombobox1.text)) + 'AND' +
                   'Datum = ' + QuotedStr(Von) + 'AND' +
                   'Datum = ' + QuotedStr(Bis);
  Table1.Filtered := true;
end;

[Ines]

Hallo,

probier's doch mal indem Du in Deiner Abfrage Klammern verwendest,
etwa so:

Delphi-Quellcode:

 Table1.Filter := 'Empfaenger = ' + QuotedStr(trim(DBCombobox1.text)) + 'AND' + 
                   '((Datum = ' + QuotedStr(Von) + ') AND ' + 
                   '(Datum = ' + QuotedStr(Bis) + '))';

Deine Abfrage liefert nur dann ein Ergebnis, wenn "Datum = von und Datum = bis".
Du könntest die Abfrage mit Datum >= von und Datum < bis eingrenzen.

Gruß
Ines

[jensenwb]

Danke für die schnelle Antwort.

Es Funktioniert.

[alzaimar]

Zitat von Ines:

Delphi-Quellcode:

 Table1.Filter := 'Empfaenger = ' + QuotedStr(trim(DBCombobox1.text)) + 'AND' + 
                   '((Datum = ' + QuotedStr(Von) + ') AND ' + 
                   '(Datum = ' + QuotedStr(Bis) + '))';

Das soll funktionieren? ... Datum = '1.1.2006' AND Datum = '1.2.2006' Das ist doch niemals wahr?

Verwende lieber a) <= und >= oder b) doch besser 'BETWEEN' (falls Paradox das kann), also so:

Delphi-Quellcode:

 Table1.Filter := 'Empfaenger = ' + QuotedStr(trim(DBCombobox1.text)) + 'AND' + 
                   '(Datum BETWEEN ' + QuotedStr(Von) + ' AND ' + QuotedStr(Bis) + ')';

oder

Delphi-Quellcode:

Table1.Filter := 'Empfaenger = ' + QuotedStr(trim(DBCombobox1.text)) + 'AND' +
                   '((Datum >= ' + QuotedStr(Von) + ') AND ' +
                   '(Datum <= ' + QuotedStr(Bis) + '))';

[Ines]

@alzaimar

Zitat von alzaimar:

Das soll funktionieren? ... Datum = '1.1.2006' AND Datum = '1.2.2006' Das ist doch niemals wahr?

Du hast scheinbar meine Antwort nicht ganz gelesen.

Auf den Fehler in der Abfrage habe ich auch hingewiesen!

Grüße
Ines

[alzaimar]

Zitat von Ines:

Du hast scheinbar meine Antwort nicht ganz gelesen.
Auf den Fehler in der Abfrage habe ich auch hingewiesen!

Grüße
Ines

Da muss auf meinem Bildschirm ein Klecks gewesen sein. Ehrlich.