Datenfilter eingabe

Deutschsprachiges Forum
1

Hallo
Ich bin ein Anfänger mit ListLabel und habe probleme mit der Filterung von Daten
Diese Daten liegen in einer Access DB.
Eine Tabelle im Designer ist vorhanden. Leider werdem mir in der Vorschau nun alle Datensätze angezeigt (ca. 3000 )
Ich benötige dazu natürlich einen Filter.
Es soll nach 2 kriterien gefiltert werden

Der Name der Tabelle ist “Daten”
nach Monat: eine Spalte in der DB ist Monat (Zahl von 1 bis 12)
nach Jahr: eine Spalte in der DB is Jahr (Jahreszahl z.b. “2010”

Die Eingabe soll aus dem Monthcalendar der sich auf “Form1” befindet erfolgen.
das heisst bei click auf dem Kalender sollen Jahr und Monat ausgelesen werden
Es wäre einfach einen Filterstring einzugeben, aber die Syntax beo LL ist mir noch unbekannt.
Wie müsste diese Filtereingabe Lauten ??
Für einen Denkanstoss wäre ich sehr dankbar

2

Habe mie etwas anderes einfallen lassen abe funktionieren tuts auch nicht.
Ich habe 1 textbox mit einem Datum Format “01.01.2020”

Nun benötige ich einen Filterstring der aus der Textbox das Jahr und den Monat ausliest. danach soll nun gefiltert werden.

Die Tabelle heisst “Daten” und die Textbox “TBX_datum”
leider gibt es immer eine Fehlermeldung
Kann da jemand helfen.??

Year((Daten.Datum)=("TBX_datum.text"), False) and Month((Daten.Datum)=("TBX_datum.text"), false))

3

Am besten mal einen Screenshot der Fehlermeldung hier einstellen. Ich kann mir vorstellen, dass die Datentypen nicht zueinander passen, eventuell reicht es schon, Year((Daten.Datum)=Year(Date(“TBX_datum.text”)) usw. zu verwenden.

4

Datenfilter bearbeiten
Datenfilter bearbeiten659×605 31.2 KB

5

Year((Daten.Datum)=Year(Date(“TBX_datum.text”))

Hier war eine Klammer zuviel.
es kommt nun keine Fehlermeldung mehr.
der Ausdruck kann verwendet werden. Geschwindigkeit ist optimal.

So steht es da.
aber gefiltert wird nicht ???

6

Probier mal

Year(Daten.Datum)=Year(Date(TBX_datum.text))

7

grafik
grafik535×559 82.5 KB

8

nein diese Formel stimmt nicht
So kann es nicht interpretiert werden.
Habe nochmals alles kontrolliert
In der DB ist alles Typisiert.
Die Textbox ebenfalls, Datum wird ToShortDateString
angezeigt. Es steht also tatsächlich ein Datum in der Box

In der DB stehen auch noch 2 andere Spalten für die Filterung zu verfügung.
Eine Spalte mit “Jahr” als String deklariert
Eine Spatle mit “Monat” ebenfalls als string
(Warum, das weiss nur der Verfasser(Programmierer)
Was wäre da für eine Funktion nötig ???

9

Ich glaube das ist dann eine Frage für die Entwickler der Anwendung. Der Fehler sagt schlicht, dass es das Feld im Datenmodell so nicht gibt. Das hinzuzufügen wäre weiter kein Problem, muss aber eben in der Anwendung gemacht werden.

10

vielen Dank für die nützlichen Ratschläge.
Ich werde mal versuchen die Filterung anderweitig herzustellen.
Gruß
Alfred

11

Ich vermute, das Problem ist, dass der Designer mit TBX_datum nichts anfangen kann. Das ist ja wohl nur in der Form bekannt.

Wie wäre es mit LL:Variables:Add(“TBX_datum_text”, TBX_datum.txt) vor den Aufruf Design() bzw. Print().

12

Das klappt leider auch nicht.
Habe jede Menge an zusatzdaten. Ich benutze die Textboxen als vorlage für eine Rechnung. Wie man auf dem screenshot sehen kann soll als überschrift bei meinen Ausgaben das Jahr und der Monat stehen. Das klappt natürlich.
genau diese 2 felder sollten auch als Filter dienen. Das wiederum klappt nicht.
Auf der Hauptform filtere ich die Daten wie folgt.

DatenBindingSource.Filter = String.Format("Jahr= '{0}' and Monat= '{1}'", Kalender.SelectedDate.Year, Kalender.SelectedDate.Month)
        DatenBindingSource.Sort = "Datum asc"
Das klappt wunderbar. Mir werden die Daten sortiert und gefiltert im Datagridview angezeigt.
Ich muss wohl eine neue Datatable erstellen und versuchen die in ListLabel einzubinden

grafik
grafik1526×1152 101 KB