PDA

Vollständige Version anzeigen : Bericht Problem übernahme Datum


Christian-1981
02.05.2011, 14:15
Hallo Leute,
ich hab ein Problem.
Ich will per Formular ein Datum auswählen. Danach soll sich ein Bericht öffnen und das alles anzeigen was dem Datum entspricht.
Aber er zeigt mir alle Datums an.
Warum?

Anbei die Daten


Danke

Christian-1981
02.05.2011, 14:52
erledigt habs

Maxel
02.05.2011, 16:03
Hallo Christian,
erledigt habs
zumindest diejenigen, die sich die Mühe machten, sich dein Produkt anzusehen, würde evtl. deine Lösung interessieren...

Christian-1981
02.05.2011, 16:56
ich hab folgenden Programmcode genommen:
Dim strDatum As String
strDatum = Format(Me!DatumT, "\#yyyy\-mm\-dd\#")
DoCmd.OpenReport "rpt_Verwiegung", acViewPreview, , "Verwiegedatum = " & strDatum & " "


Der Fehler lag an dem Code.
Ich habe Den Open Report und Übergabe Datum in getrennten Befehlen gehabt.
Dieser Code geht.

Lanz Rudolf
02.05.2011, 20:31
Hallo
nur so nebenbei fals es Dich interesiert.
Das: "Verwiegedatum = " & strDatum & " "
könnte mann mit Bildcriteria lösen
Klick in meiner Fuss Zeile auf den Link hinter Meine Doc
öffne die PDF-Datei "Access Unterlagen"
auf Seite 73,74 und 278

Christian-1981
02.05.2011, 21:13
hmm ok das muss ich mir mal anschauen danke

Lanz Rudolf
03.05.2011, 07:06
Hallo
Habe hier ein kleines Muster:
ich Prüfe auch ob das Feld vom Formular (Me!DatumT wirklich ein Datum enthält !

Dim StrCrit As String
Dim StrBericht As String
StrBericht = "rpt_Verwiegung"
If IsDate(Me!DatumT) Then
StrCrit = BuildCriteria("Verwiegedatum", dbDate, "=" & Me!DatumT)
' Debug.Print StrCrit ' NUR für Test
DoCmd.OpenReport StrBericht, acViewPreview, , StrCrit
Else
MsgBox "das Eingabefeld ist kein gültiges Datum ! " & PDat
End If
das Resultat vom Debug.Print wenn Me!DatumT = "01.12.2010" ist
Verwiegedatum=#12/1/2010#