Εμφάνιση ενός μόνο μηνύματος
  #7  
Παλιά 24-02-11, 16:45
Το avatar του χρήστη Tasos
Tasos Ο χρήστης Tasos δεν είναι συνδεδεμένος
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.010
Προεπιλογή

Καλησπέρα κι από μένα!

Δείτε ένα παράδειγμα αναζήτησης σε φόρμα στο συνημμένο.


Η κύρια φόρμα παίρνει δεδομένα από ένα ερώτημα (QryCapCustomers) βασισμένο στον πίνακα tblCustomers:

Το ερώτημα QryCapCustomers περιέχει τα πεδία:
  • ID (Αναγνωριστικό του πίνακα)
  • AFM (Πεδίο του πίνακα)
  • Lastname (Πεδίο του πίνακα)
  • FirstName (Πεδίο του πίνακα)
  • City (Πεδίο του πίνακα)
  • TheName (Υπολογιζόμενο πεδίο που ενώνει τα προηγούμενα (εκτός το ID)
    και με τη βοήθεια της συνάρτησης VBA (ReplaceTones), τα μετατρέπει σε κεφαλαία χωρίς
    τόνους (επιτρέπει στην αναζήτηση να λειτουργήσει ακόμα και αν ο χρήστης δεν χρησιμοποιεί τόνους)
Η Υποφόρμα που περιέχει τις λεπτομέρειες, παίρνει τα δεδομένα από τον πίνακα tblCustomers
και συνδέεται με την κυρία φόρμα μέσω ID.

Τα αποτελέσματα αναζήτησης εμφανίζονται αυτόματα ενώ πληκτρολογούμε στο ανάλογο πεδίο.
Ή αναζήτηση επιστρέφει εγγραφές που το ID τους ισούται με το ID των εγγραφών του πεδίου TheName
όπου τμήμα του περιεχομένου τους ταιριάζει με το περιεχόμενο του πεδίου αναζήτησης.
Έτσι, από ένα πεδίο αναζήτησης μπορούμε να αναζητήσουμε ότιδήποτε περιέχεται στα πεδία:
AFM, Lastname, FirstNameκαι City.

Ελπίζω να σας φανεί χρήσιμο!

Φιλικά

Τάσος
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb accSearchForm.mdb (376,0 KB, 375 εμφανίσεις)
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών

Τελευταία επεξεργασία από το χρήστη Tasos : 02-03-11 στις 06:15. Αιτία: Τροποποίηση Ερωτήματος για βελτιωμένη σθμπεριφορά σε κενά πεδία
Απάντηση με παράθεση