Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   [ Φόρμες ] Εμφάνιση Συγκεκριμένων Εγγραφών στην Φόρμα. (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/755-emfanisi-sygkekrimenon-eggrafon-stin-forma.html)

kapetang 30-09-10 18:07

1 Συνημμένο(α)
Καλησπέρα στην παρέα
Ζήλεψα τον Άγγελο!!!
Έτσι στη βάση που επισυνάπτω έχουμε τη δυνατότητα να δούμε στη φόρμα όλους τους πελάτες, μόνο τους ενεργούς ή μόνο τους ανενεργούς.
Η δουλειά γίνεται με τον κώδικα.
Κώδικας:

Private Sub optFilter_Click()
    Me.Filter = Choose(optFilter.Value, "", "[Active]= -1", "[Active]=0")
    Me.FilterOn = True
End Sub

Φιλικά/Γιώργος

Dangel82 30-09-10 18:46

Νομίζω οτι το θέμα απλά ξεχυλώθηκε!!!

kapetang 30-09-10 19:02

Είναι μια άποψη που κρίνεται από όλους!!!

Meteora 30-09-10 19:28

Γιώργο Μπράβο !
Να σε ευχαριστήσω για την προσφορά και του κώδικα αλλά και για την 'Ομάδα επιλογών' με τα 'κουμπιά εναλλαγής'. Ήδη τοποθέτησα το ε κ π λ η κ τ ι κ ό υλικό στην βιβλιοθήκη μου...
Καλό σου βράδυ / Νίκος Δ.

kapetang 30-09-10 19:34

Φίλε Νίκο ευχαριστώ. Επίσης καλό βράδυ

Free_Ghost 02-10-10 06:33

Παράθεση:

Αρχική Δημοσίευση από kapetang (Μήνυμα 3836)
Καλησπέρα στην παρέα
Ζήλεψα τον Άγγελο!!!
Έτσι στη βάση που επισυνάπτω έχουμε τη δυνατότητα να δούμε στη φόρμα όλους τους πελάτες, μόνο τους ενεργούς ή μόνο τους ανενεργούς.
Η δουλειά γίνεται με τον κώδικα.
Κώδικας:

Private Sub optFilter_Click()
    Me.Filter = Choose(optFilter.Value, "", "[Active]= -1", "[Active]=0")
    Me.FilterOn = True
End Sub

Φιλικά/Γιώργος

Γιώργο νομίζω πώς το παράδειγμα σου παθαίνει ένα black out στην αρχή..
Δηλαδή με το που ξεκινώ την εφαρμογή (παράδειγμα) δείχνη 2 στο (ΟΛΟΙ)
Πατάω το (ΕΝΕΡΓΟΙ) πάλι 2 (ΑΝΕΝΕΡΓΟΙ) 3

Για να γίνω πιο σαφής πρέπει να πατήσουμε κάποιο άλλο πλήκτρο από το (ΟΛΟΙ)
και κατόπιν πάλι το (ΟΛΟΙ) ώστε να υπολογίση σωστα και τους 5, με την εκίνηση δεν τους υπολογίζει σαν (ΟΛΟΙ) αλλά μάλλον σαν ενεργούς αφου εμφανίζει 2..

kapetang 02-10-10 07:39

Καλημέρα στην παρέα

Χρήστο άνοιξα τη βάση όπως είναι στο φόρουμ και δεν παρουσίασε το πρόβλημα.
Αν εμφανίζεται σε κάποια δοκιμή δική σου μάλλον οφείλεται σε λανθασμένη προεπιλεγμένη τιμή της ομάδας επιλογών (optFilter).
Πιστεύω ότι θα λυθεί αν βάλεις προεπιλεγμένη τιμή 1 (προβολή σχεδίασης > ιδιότητες ομάδας επιλογών > δεδομένα > προεπιλεγμένη τιμή > 1).
Τα ξαναλέμε

Φιλικά/Γιώργος

Free_Ghost 02-10-10 19:55

Γιώργο δεν είναι θέμα επιλογής..

Οπως την κατεβάζω την ανοίγω και μου δείχνει τα άτομα κάτω 1 από 2 ενώ ειναι πατημένο το κουμπί (ΟΛΟΙ) και δεν έχω πειράξει τίποτα...
Εφόσον πατήσης οποιοδήποτε άλλο κουμπί και μετά ξαναπατήσεις το (ΟΛΟΙ) δείχνη 1 από 5..

Δεν ξέρω μήπως κάνω κάτι λάθος, αλλά δεν κάνω και τίποτα...

kapetang 02-10-10 21:22

Χρήστο άνοιξέ την χωρίς να την κατεβάσεις και πες μου πως δουλεύει.
Επίσης ανέβασε τη βάση όπως την αποθήκευσες στον υπολογιστή σου, μήπως βγει άκρη

Free_Ghost 03-10-10 06:21

1 Συνημμένο(α)
Αυτο το αρχείο κατεβάζω το τρέχω και κατευθειαν εμφανιζει 1/2 στο ολοι...


Η ώρα είναι 00:47.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2