Forum

Αναζήτηση στο ms-office.gr

Πάμε!
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > [ Ερωτήματα ] Πρόβλημα στην αναζήτηση μεταξύ ημερομηνιών

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 08-09-16, 11:38
Όνομα: ΑΝΔΡΕΑΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 08-09-2016
Μηνύματα: 6
Προεπιλογή Πρόβλημα στην αναζήτηση μεταξύ ημερομηνιών

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

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

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

Έχω μία φόρμα στην οποία πληκτρολογώ δύο ημερομηνίες, έτσι ώστε να μου βρει όλες τις εγγραφές μεταξύ αυτών των δύο ημερομηνιών.
Το κουμπί αναζήτησης έχει τον παρακάτω κώδικα, αλλά προκύπτει το εξής
Ενώ στην αναζήτηση έχω πληκτρολογήσει ημερομηνίες με στυλ ΗΗ/ΜΜ/ΕΕΕΕ, η 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
Απάντηση με παράθεση
  #2  
Παλιά 08-09-16, 13:28
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.085
Προεπιλογή

Καλησπέρα

Οι ημερομηνίες απαιτούν-εν γένει- ευαίσθητες διαχειρίσεις. Χρησιμοποιώ τη συνάρτηση DateSerial(2016,3,7) για να δηλώσω 7-Μαρτίου-2016 ή γενικά την DateSerial(Year(πεδίο), Month(πεδίο) , Day(πεδίο)), όταν αντλώ δεδομένα από πεδίο ημερομηνίας... Την συνάρτηση DateSerial καταλαβαίνουν όλοι οι υπολογιστές.

Ελπίζω να λύσεις το πρόβλημά σου. Σε άλλη περίπτωση ανέβασε κάτι σε "σμίκρυνση" για να βοηθηθείς.

Με εκτίμηση / Νίκος

Καλώς μας ήλθες Ανδρέα.
Απάντηση με παράθεση
  #3  
Παλιά 09-09-16, 11:10
Όνομα: ΑΝΔΡΕΑΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 08-09-2016
Μηνύματα: 6
Προεπιλογή

Ευχαριστώ πολύ για την βοήθεια.

Τελικά, επειδή δεν τα κατάφερα με τον κώδικα, έφτιαξα ένα ερώτημα και δουλεύει κανονικά με αυτό.
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
ΑΘΡΟΙΣΜΑ ΑΞΙΩΝ ΜΕΤΑΞΥ ΔΥΟ ΗΜΕΡΟΜΗΝΙΩΝ smasak Access - Ερωτήσεις / Απαντήσεις 1 25-10-16 09:13
[Γενικά] Πρόβλημα στην αναζήτηση xristos Excel - Ερωτήσεις / Απαντήσεις 0 22-04-15 21:34
Συνθήκη επιλογής δεδομένων μεταξύ δύο ημερομηνιών smasak Access - Ερωτήσεις / Απαντήσεις 4 12-03-15 10:30
NETWORKDAYS - Υπολογισμός διαφοράς μεταξύ δύο ημερομηνιών Tasos Ημερομηνία & ώρα 0 11-10-11 13:34
Αφαίρεση μεταξύ ημερομηνιών Jim Access - Ερωτήσεις / Απαντήσεις 12 28-09-10 09:32


Η ώρα είναι 12:59.