Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > [ Ερωτήματα ] Εορτολόγιο πελατών

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #11  
Παλιά 05-09-17, 22:00
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Τελικά κατέληξα στα παρακάτω

Κώδικας:
SELECT Pelatologio.*, Eortes3imero.Κείμενο15 AS ΗΜΕΡΟΜΗΝΙΑ
FROM Pelatologio, Eortes3imero
WHERE (((InStr(" " & Replace(Replace(UCase([Eortes3imero]![ONOMASIA]),")",",)")," (",",( ")," " & [Pelatologio]![ONOMA] & ","))>0));
Κώδικας:
SELECT Pelatologio.*, EortesSimera.Κείμενο15 AS ΗΜΕΡΟΜΗΝΙΑ
FROM Pelatologio, EortesSimera
WHERE (((InStr(" " & Replace(Replace(UCase([EortesSimera]![ONOMASIA]),")",",)")," (",",( ")," " & [Pelatologio]![ONOMA] & ","))>0));
Όλη η φασαρία γίνεται για να συγκρίνονται ολόκληρα ονόματα.
Απάντηση με παράθεση
  #12  
Παλιά 05-09-17, 22:10
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-07-2014
Περιοχή: Πάτρα
Μηνύματα: 385
Προεπιλογή

Έκανα μια γρήγορη δοκιμη και διαπίστωσα ότι,
ο κώδικας λειτουργεί άψογα...

Θα κάνω κι άλλες δοκιμές και αν δω κάτι θα επανέλθω.

Σε κάθε περίπτωση είμαι ειλικρινά υποχρεος για τη βοήθειά σου...
Απάντηση με παράθεση
  #13  
Παλιά 05-09-17, 22:20
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Να είσαι καλά!
Απάντηση με παράθεση
  #14  
Παλιά 06-09-17, 08:22
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα

Δημήτρη με τα παραπάνω ερωτήματα, προσπάθησα:

1) Να μετατρέψω το κείμενο με τα ονόματα του πίνακα Eortologio σε κεφαλαία.

2) Να προσθέσω στην αρχή κάθε ονόματος ένα διάστημα και στο τέλος ένα κόμμα (,).

Αυτά χρειάζονται για να αναζητούμε ολόκληρα ονόματα.

Δυστυχώς παρατήρησα ότι με τη συνάρτηση Ucase(), το τελικό ς δε γίνονεται Σ.

Στην επισυναπτόμενη ΒΔ οι μετατροπές γίνονται στο ερώτημα qryEortologio το οποίο χρησιμοποιείται, στα υπόλοιπα ερωτήματα, αντί του πίνακα Eortologio.
Συνημμένα Αρχεία
Τύπος Αρχείου: zip Eortologio2.zip (116,2 KB, 38 εμφανίσεις)
Απάντηση με παράθεση
  #15  
Παλιά 06-09-17, 09:34
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-07-2014
Περιοχή: Πάτρα
Μηνύματα: 385
Προεπιλογή

Καλημέρα

Γιώργο, κάνω δοκιμές και θα επανέλθω το συντομότερο με τα αποτελέσματα...
Απάντηση με παράθεση
  #16  
Παλιά 07-09-17, 12:11
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-07-2014
Περιοχή: Πάτρα
Μηνύματα: 385
Προεπιλογή

Γειά σας

Γιώργο (Kapetang), αφού προσάρμοσα στη βάση μου την τελευταία πρότασή σου,
έκανα αρκετές δοκιμές και διαπίστωσα ότι ο κώδικας λειτουργεί άψογα...

Δε σού κρύβω ότι, με ενυπωσιάζει ιδιαίτερα ο νέος αυτόματος τρόπος που πλεον βρίσκω τους εορτάζοντες.
Κατά το παρελθόν, έβαζα στην αναζήτηση το όνομα προκειμένου να εντοπίσω τους εορτάζοντες κάθε φορά.

Και πάλι σε ευχαριστώ για τη βοήθειά σου...
Απάντηση με παράθεση
Απάντηση στο θέμα

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

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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[Γενικά] Εορτολόγιο ssoti Excel - Ερωτήσεις / Απαντήσεις 2 10-08-17 11:59
[ Πίνακες ] Κατηγοριοποίηση Πελατών argisl Access - Ερωτήσεις / Απαντήσεις 3 18-04-17 21:40
[Συναρτήσεις] Αναζήτηση Πωλητή και πελατών του. Eleniath Excel - Ερωτήσεις / Απαντήσεις 5 24-04-13 08:55
[ Φόρμες ] Διασύνδεση πελατών mgeorge Access - Ερωτήσεις / Απαντήσεις 11 03-03-13 18:48
Κίνηση πελατών nafnaki Access - Ερωτήσεις / Απαντήσεις 4 27-06-12 21:07


Η ώρα είναι 06:39.