Φίλτράρισμα εγγραφών Φόρμας Μέσω Πολλών ComboBox

[Χρήστος]

(Στην 11 γραμμή απ' το τέλος όπου Complet-->Complete)
Δουλεύει άψογα, σ' ευχαριστώ πάρα πολύ.

[nasos23]

Αρχική Δημοσίευση από Χρήστος

(Στην 11 γραμμή απ' το τέλος όπου Complet-->Complete)
Δουλεύει άψογα, σ' ευχαριστώ πάρα πολύ.

Νά είσαι καλά
Τα προβλήματα ήταν τα εξής:
Στο κουμπί ανοίγματος της Έκθεσης.

Private Sub cmdOpenRPT_Click()
DoFilter True
End Sub

Για ComboBox Ημερομηνία από και Ημερομηνία εώς

'StrSQL = StrSQL & strAnd & "[OrderDate] Between #" & Format(Me.DateFrom, "yyyy-m-d") & "# OR #" & Format(Me.DateΤο, "yyyy-m-d") & "#"

Το πρόβλημα ήταν η απόστροφος μπροστά απ' 'StrSQL και έτσι το θεωρούσε σαν κείμενο
και το OR αντί του AND.
Το σωστό είναι:

StrSQL = StrSQL & strAnd & "[OrderDate] Between #" & Format(Me.DateFrom, "yyyy-m-d") & "# AND #" & Format(Me.DateTo, "yyyy-m-d") & "#"

[nodirem]

Καλησπέρα παιδιά, προσπαθώ να φτιάξω μία ΒΔ για μιά βιβλιοθήκη, ψάχνοντας στο forum για διάφορα μικροπροβλήματα είδα αυτό που έκανε ο Χρήστος και προσπαθώ να το αντιγράψω παρακάτω ανεβάζω τι έχω κάνει μέχρι τώρα είναι η "Φρμ_Βιβλία" . Μπορείτε να με βοηθήσετε με τη συνέχεια;