TKSoft-Online

Willkommen, Gast
Benutzername: Passwort: Angemeldet bleiben:

Abfrage aus Formular verändern
(1 Leser) (1) Gast
Alles rund um MS-Access
  • Seite:
  • 1

THEMA: Abfrage aus Formular verändern

Abfrage aus Formular verändern 4 Monate, 1 Woche her #1078

  • einfacheasy
  • OFFLINE
  • Fresh Boarder
  • Beiträge: 7
  • Karma: 0
Hallo zusammen,
habe leider ein Problem bei dem ich einfach nicht weiterkomme.
Vieleicht kann mir jemand weiterhelfen. Für Hilfe wäre ich echt dankbar.

Nun zu meinem Problem.

Ich habe ein Endlosformular, dass über eine Abfrage die Daten erhält. (ODBC Tabellen-Verknüpfungen)
Das Formular dient dazu in einem Textfeld bestimmte Werte (KostenvoranschlagsNr)die in ein ungebundenes Tesxtfeld eingegeben und über einen Button "Suchen", gefunden und markiert werden. Über einen Button weitersuchen kann man in den weiteren Feldern weitersuchen. Da an diese Nummer mehrere Positionen gebunden sind, kann ich über einen Filter-Button anschließend alle Positionen die an die KVNr. gebunden sind filtern und somit anzeigen lassen. Funktioniert soweit einwandfrei.

Jetzt möchte, da es sich um einen Datensatzbestand von ca. 160000 Datensätzen handelt, diese gerne über das Eingabedatum des Kostenvoranschlags filtern. Bisher habe ich das über die Abfrage (Kriterium) mit ">Datum-3" geregelt.
Das heißt mir werden nur die Datensätze der letzten drei Tage des aktuellen Datums angezeigt.

Da ich aber manchmal weiter zurück muß, würde ich das ganze gerne über ein Eingabefeld im Formular steuern.

Gibt es eine Möglichkeit, bei der ich nach Eingabe in das Eingabefeld im Formular, sagen wir mal die Zahl 5, fünf Tage in der Abfrage zurücksetze und im Formular darstellen kann.

Ich hoffe ich hab mein Problem einigermaßen verständlich dargestellt.

Leider kann ich die DB in der aktuellen Form (ODBC Verknüpfungen) nicht hochladen.

Habe eine Hardcopy der zugrundeliegenden Abfrage und des Formulars hinzugefügt.

Ich hoffe mir kann trotzdem jemand weiterhelfen.

Gruß
Otmar
Abfrage.jpg


Form-Entwurf.jpg

Aw: Abfrage aus Formular verändern 4 Monate, 1 Woche her #1079

  • TommyK
  • OFFLINE
  • Administrator
  • Beiträge: 502
  • Karma: 4
Hallo Otmar,

es müsste so aussehen:

Den folgenden Code auf einen Button legen

 
Dim sSQL As String
Dim qdf As DAO.QueryDef
 
sSQL = "Select ...FROM...WHERE (((EingabeZeitpunkt)>Date()-" & Me.DeinEingabefeld & ")) ORDER BY...;"
 
Set qdf = CurrentDb.QueryDefs("ekv_Exp_Form...")
qdf.SQL = sSQL
Me.Requery
 


Wobei Du den SQL-String Deiner Abfrage einfügen musst.
Wichtig ist dann dieser Teil im String:
" & Me.DeinEingabefeld & "

Hier musst Du den Namen des Eingabefeldes setzen.
Und hier
Set qdf = CurrentDb.QueryDefs("ekv_Exp_Form...")

den Namen der Abfrage
Gruß TommyK

Aw: Abfrage aus Formular verändern 4 Monate, 1 Woche her #1080

  • einfacheasy
  • OFFLINE
  • Fresh Boarder
  • Beiträge: 7
  • Karma: 0
Hallo Tommy,
erstmal Besten Dank für die schnelle Hilfe.

Hab dein Code-Beispiel übernommen und angepasst.
Hoffe es passt so.(VBA-Code.jpg)

Leider aktualisiert sich nach Eingabe eines Wertes und Drücken des Buttons
mein Formular nicht.
Das heißt in die Abfrage schreibt er das Kriterium korrekt hinein, aktualisiert aber das Formular nicht.
Wenn ich in die Abfrage gehe und sie öffnen möchte kommt die Meldung "Undefinierte Funktion 'Datum' in Ausdruck"
(Meldung.jpg
Im Endlosformular erhalten alle eingefügten Steuerelemente aus der Abfrage ein grünes Dreieck mit dem Hinweis
"Dieses Steuerelement hat eine ungültige Steuerelementquelle".

In den Verweisen kann ich nichts Auffälliges entdecken.
(Verweise.JPG)

Hast du vielleicht noch einen Rat woran es liegen kann.

Sag schon mal Danke
Otmar
Anhang:

Aw: Abfrage aus Formular verändern 4 Monate, 1 Woche her #1081

  • TommyK
  • OFFLINE
  • Administrator
  • Beiträge: 502
  • Karma: 4
Hallo Otmar,

es darf nicht ">Datum()" lauten sondern ">Date()"
Gruß TommyK

Aw: Abfrage aus Formular verändern 4 Monate, 1 Woche her #1082

  • einfacheasy
  • OFFLINE
  • Fresh Boarder
  • Beiträge: 7
  • Karma: 0
Hallo TommyK,
jetzt hat es leider ein bischen gedauert bis ich wieder an der DB weiterbastel konnte.

Habe den Eitrag wie du gesagt hast geändert.
Meldung sowie die grünen Dreiecken sind weg. Abfrage wird auch korrekt ausgeführt.

Allerdings wird das Endlosformular mit den Daten aus der Abfrage nicht aktualisiert.
Das heißt im Formular sehe ich immer die selbe Anzahl an Datensätzen, obwohl die Abfrage
richtig ausgeführt wird.
Erst durch schließen und erneutem öffnen des Formulars werden die Datensätze aktualisiert.

Wenn du da noch eine Lösung hättest wär das Super. Möchte dich aber nicht die ganze Arbeit
machen lassen, schließlich ist Wochenende.
Werde selber mal sehen wie ich weiterkomme und gebe dir dann Bescheid.

Schönes Wochenende
Otmar


Hab jetzt noch Me.RecordSource = sSQL vor das me.Requery gesetzt

Weis zwar nicht ob das die optimale Lösung ist, aber es funktioniert.
Nochmals besten Dank

Stell dir gerne das fertige Formular als Beispiel zu Verfügung,
kann aber noch ein paar Tage dauern, wegen Datenabänderung.
Letzte Änderung: 4 Monate, 1 Woche her von einfacheasy. Begründung: Lösung gefunden
  • Seite:
  • 1
Moderatoren: TommyK
Ladezeit der Seite: 2.52 Sekunden

Login

Latest Comments

Latest Forum Posts

Mehr »

Download Statistik

41 Kategorien
187 Dateien
173377 Downloads

JoomlaWatch 1.2.11 - Joomla Monitor and Live Stats by Matej Koval