πρόβλημα με εντολή if

Συζητήσεις για την τοπική βάση δεδομένων Access της Microsoft

Συντονιστές: Super-Moderators, WebDev Moderators

Απάντηση
Άβαταρ μέλους
marios1984
Δημοσιεύσεις: 51
Εγγραφή: 18 Μαρ 2009 11:59
Επικοινωνία:

πρόβλημα με εντολή if

Δημοσίευση από marios1984 » 26 Ιουν 2009 13:43

καλημερά σας...αντιμετωπιζω ενα μικρο προβληματακι

εχω ενα πινακα με αιτηματα που εχει αριθμο αιτηματος και ποσο αιτηματος
και μια δευτερευουσα φορμα με τα τιμολογια με αριθμο τιμολογιου και ποσο τιμολογιου.
στο υποσελιδο της υποφορμας υπαρχει ενα πλαισιο κειμενο που μου αθροιζει τα τιμολογια για καθενα αιτημα...( ενα αιτημα μπορει να πληρωθει με ενα τιμολογια¨ή και με περισοτερα )

τωρα θελω στην φορμα την κεντρικη να υπαρχει ενα πλαισιο κειμενου το οποιο να μου λεει αν το αθροισμα των τιμολογιων ξεπερνα το ποσο του αιτηματος...
στο before update χρησιμο΄ποιω τον εξης κωδικο

IF ([ΠΟΣΟ ΕΓΚΡΙΣΗΣ] < [Δευτερεύουσα φόρμα SYNOPTIKA tim].Form![ATHROISMA__tim])THEN[APOTELESMA]="ΞΕΠΕΡΝΑ ΤΟ ΟΡΙΟ"
ELSE[APOTELESMA]="ΔΕΝ ΞΕΠΕΡΝΑ ΤΟ ΟΡΙΟ"
END IF

οπου athroisma_tim το πλαισιο κειμενου που μου αθροιζει τα ποσα των τιμολογιων
και apotelesma το πλαισιο κειμενου που θελω να μου εμφανιζει το μηνυμα

το θεμα ομως ειναι οτι δεν μου εμφανιζει τιποτα τι κανω λαθος??
ευχαριστω εκ των προτερων για την βοηθεια

sarafis
Δημοσιεύσεις: 20
Εγγραφή: 08 Μάιος 2008 15:50

πρόβλημα με εντολή if

Δημοσίευση από sarafis » 27 Ιουν 2009 11:12

Αν κατάλαβα καλά το ερωτημά σου θα σε καλύψει πιστεύω το παράδειγμα που επισυνάπτω. Το ερώτημα το βάζεις στον κώδικα vba και το αντιστοιχίζεις να ενεργοποιείται με κάποιο συμβάν (στο συγκεκριμένο παράδειγμα με την αλλαγή εγγραφής) Μπορείς να προσθέσεις και άλλα στον κώδικα (πχ να σου κάνει κόκκινο το φόντο όταν το σύνολο των τιμολογίων υπερβαίνει το ποσό της έγκρισης κλπ)
Συνημμένα
aithma.zip
(42.36 KiB) Μεταφορτώθηκε 307 φορές

Άβαταρ μέλους
marios1984
Δημοσιεύσεις: 51
Εγγραφή: 18 Μαρ 2009 11:59
Επικοινωνία:

πρόβλημα με εντολή if

Δημοσίευση από marios1984 » 30 Ιουν 2009 10:30

Καλημερα ...συγγνωμη που αργησα να απαντησω αλλα λογοι υγειας με κρατησανε στο σπιτι...ευχαριστω πολυ για την βοηθεια ηταν ακριβως αυτο που ηθελα...ημουνα κοντα στην πηγη αλλα δεν επινα...ευχαριστω και παλι

Απάντηση

Επιστροφή στο “MS Access”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες