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/1670-diadoxiki-enimerosi.html)

stelianta 23-02-12 09:49

Διαδοχική Ενημέρωση
 
1 Συνημμένο(α)
Καλημέρα στο Φορουμ...

Χρειαζομαι για "μια ακομη φορά την βοήθειά σας...

Όπως φαίνεται και στην επισυναπτόμενη εικόνα, έχω δημιουργήσει μια φόρμα (frmMain) , η οποια περιεχει 2 υποφόρμες (subfrm1) , (subfrm2).

Το κοινο πεδίο των 3 φορμών είναι το ActionCode

Αυτο που χρειάζομαι ειναι οταν στην 1η υποφορμα αλλάζει κατι στο πεδιο txtName (προστιθεται ή αφαιρειτε καποιο ατομο) τοτε αυτοματα να αλλαζει και το πεδιο txtCount της 2ης υποφόρμας. Να σημειωσω οτι το "αποτελεσμα" της 2ης υποφορμας "ερχεται" απο ενα "Select count ()" ερωτημα.

Ουσιαστικά είναι το ανάποδο από αυτο που ο φίλος Γιωργος (Kapetang) με ειχε βοηθησει να κανω. (Φιλε Γιωργο δεν φταιω εγω. Ο χειριστης δεν ξερει τι θέλει)

Φαντάζομαι οτι στο συμβαν onchange του πεδίου txtname πρεπει να γραφτει λιγο vb για την διαδοχικη ενημερωση και των αλλων 2 φορμών...

Ευχαριστώ

Tasos 23-02-12 12:33

Καλησπέρα Στέλιο.

Βλέποντας την εικόνα που επισύναψες δεν καταλαβαίνω γιατί χρειάζεσαι ολόκληρη υποφόρμα
για να παρουσιάσεις το πλήθος των εγγραφών μιας άλλης υποφόρμας. :noexpression:

Στο υποσέλιδο της "SubFrm1" πρόσθεσε ένα πεδίο (ας πούμε "txtCount" ) και στην ιδιότητα
"Προέλευση στοιχείου ελέγχου" πληκτρολόγησε: =Count(*).
Έτσι θα έχεις πάντα το επίκαιρο σύνολο των εγγραφών που εμφανίζονται στην υποφόρμα.

Μπορείς να απεικονίσεις την τιμή του πεδίου αυτού και σε άλλο σημείο της κύριας φόρμας
αρκεί να το αποκρύψεις και σε ένα νέο πεδίο στην κύρια φόρμα να πληκτρολογήσεις την αναφορά του txtCount.

Για παράδειγμα: =[SubFrm1].[Form]![txtCount]

Καλή συνέχεια!

Τάσος

stelianta 23-02-12 12:38

Ο λόγος που χρησιμοποίησα Υποφορμα, ηταν πως επειδη οσο και αν προσπαθησα, δεν τα καταφερα να το κάνω απευθειας.

Φυσικά και προτιμω αυτο το οποιο μου υπέδειξες !!!

Για άλλη μια φορά ευχαριστώ.


Η ώρα είναι 20:11.

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


Search Engine Optimization by vBSEO 3.3.2