[ADREAS]

Καλημέρα σας όλους σας

Πρώτη ημέρα εγγραφής και πρώτη ερώτηση !!!!

Έφτιαξα έναν πίνακα στον οποίο μεταξύ των άλλων έχω τοποθετήσει και ημερομηνίες σε στυλ ΗΗ/ΜΜ/ΕΕΕΕ.

Έχω μία φόρμα στην οποία πληκτρολογώ δύο ημερομηνίες, έτσι ώστε να μου βρει όλες τις εγγραφές μεταξύ αυτών των δύο ημερομηνιών.
Το κουμπί αναζήτησης έχει τον παρακάτω κώδικα, αλλά προκύπτει το εξής
Ενώ στην αναζήτηση έχω πληκτρολογήσει ημερομηνίες με στυλ ΗΗ/ΜΜ/ΕΕΕΕ, η access αναζητά τις ημερομηνίες με μορφή ΜΜ/ΗΗ/ΕΕΕΕ.
Δεν βρίσκω λύση να το διορθώσω.
Πριν με κράξετε το έψαξα και στο φορουμ και στο γοογλη.
Ευχαριστώ εκ των προτέρων.


Private Sub searchdate_Click()

Call Search
End Sub
Sub Search()
Dim strCriteria, task As String

Me.Refresh
If IsNull(Me.searchdatefrom) Or IsNull(Me.searchdateto) Then
MsgBox "Παρακαλώ εισάγετε ημερομηνίες", vbInformation, "Απαιτείται εισαγωγή ημερομηνίας"
Me.searchdatefrom.SetFocus
Else
strCriteria = "([DATE_PRAXIS] >= #" & Me.searchdatefrom & "# And [DATE_PRAXIS] <=#" & Me.searchdateto & "#)"
task = "select * from tblIDPRAXIS where (" & strCriteria & ") order by [DATE_PRAXIS]"
DoCmd.ApplyFilter task


End If

End Sub