[ Φόρμες ] Άνοιγμα πολλών Φορμών, ταυτόχρονα.

[dimitrisp]

Γεια σας

Στη δειγματική Βάση που ανέβασα, υπάρχουν τρεις πίνακες με τις αντίστοιχες φόρμες τους
(frm1, frm2, frm3) καθώς και μια κύρια φόρμα (FRM).

Στην κύρια φόρμα έχω προσθέσει ένα κουμπί εντολής (Εντολή0) προκειμένου να εμφανίζονται ταυτόχρονα
όλες οι φόρμες (frm1, frm2, frm3), εφόσον υπάρχει σε κάθε μια απο αυτές έστω και μια εγγραφή.
Το πρόβλημα είναι ότι, όταν κάνω κλικ στο κουμπί εντολής (Εντολή0) και αν έστω και μια απο τις φόρμες
δεν έχει καμιά εγγραφή, μου βγάζει το μήνυμα: " error '2501' "...

Όταν βάζω κουμπί εντολής ξεχωριστά για κάθε φόρμα όλα λειτουργούν ομαλά!

Θα ήθελα, λοιπόν, να σας ρωτήσω :
α. Πώς θα μπορούσαμε με το κλικ στο κουμπί εντολής (Εντολή0), να ανοίγουν μόνον οι φόρμες που
εμπεριέχουν δεδομένα (εγγραφές) και
β. Να εμφανίζεται ένα (συγκεντωτικό) μήνυμα το οποίο να γράφει ότι, πχ. οι φόρμες frm1 και frm3
δεν έχουν δεδομένα.



Σας ευχαριστώ εκ των προτέρων

[kapetang]

Καλησπέρα

Δημήτρη, δες μια πρόταση στο συνημμένο.

Σημειώνω ότι είναι λάθος να κρίνουμε από την ημερομηνία, αν ένας πίνακας είναι κενός.

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

[dimitrisp]

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

Ο Κώδικας που συνέταξες είναι λειτουργικότατος, με την προυπόθεση, όμως, να μην υπάρχει στους
πίνακες καμιά εγγραφή (κενός εγγραφών).

Ωστόσο, και με το δεδομένο ότι, ενδεχομένως, να μη διατύπωσα το αρχικό ερώτημά μου με
σαφήνεια, θα ήθελα να παρατηρήσω τα ακόλουθα:

Πράγματι, έχεις δίκιο ότι, είναι λάθος να κρίνουμε από την ημερομηνία, αν ένας πίνακας είναι κενός.
Όμως, σύμφωνα με το αρχικό ερώτημά μου, με ενδιαφέρει να μην ανοίγουν οι φόρμες των οποίων τα
πεδία τους δεν έχουν δεδομένα και όχι οι πίνακες.

Δηλαδή, για παράδειγμα, μπορεί ο πίνακας tbl1 να έχει πληθώρα εγγραφών αλλά η φόρμα frm1
(με προέλευση εγγραφών ερώτημα qry1 απο τον tbl1) να μην εμφανίζει καμιά εγγραφή λόγω κριτηρίων κλπ.
Σε αυτή την περίπτωση, με την εντολή [Άνοιγμα φορμών] η frm1, παρά το γεγονός οτι δεν υπάρχουν
δεδομένα στα πεδία της, ανοίγει κανονικά (ενώ δε θα έπρεπε να ανοίγει).

Το ίδιο ισχύει και αν σβήσουμε τα δεδομένα των πεδίων (όχι το ID) ενός πίνακα.

Κατόπιν τούτων, το ζητούμενο διαμορφώνεται ως ακολούθως:
Δύναται να διορθωθεί (συμπληρωθεί) ο Κώδικας έτσι ώστε με την με την εντολή [Άνοιγμα φορμών]
να μην ανοίγουν οι φόρμες οι οποίες δεν εμφανίζουν σε κανένα πεδίο τους δεδομένα?

[kapetang]

Καλησπέρα

Δημήτρη θα πρέπει να τροποποιήσεις την παρακάτω γραμμή κώδικα:

tblNames = Array("tbl1", "tbl2", "tbl3").

Στη θέση των tbl1, tbl2 και tbl3 θα πρέπει βάλεις τις πραγματικές προελεύσεις των φορμών.

Αφού η Frm1 έχει προέλευση το ερώτημα qry1, θα πρέπει να αλλάξεις το tbl1 σε qry1.

[dimitrisp]

Γεια σας

Γιώργο, κ α τ α π λ η κ τ ι κ ά !!!

Θερμές ευχαριστίες για την υποδειγματική επίλυση του ζητούμενου.

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