[ Φόρμες ] Εύρεση Πρωτοκόλλου και μήνυμα "υπάρχει ήδη"

[Dafnh0106]

Καλησπερα στο forum

Θα ήθελα αν μπορεί να με βοηθήσει κάποιος στο εξής:

Εχω μία οθόνη με διαφορα πεδία με βασικό κλειδί τον αρθμό πρωτοκόλλου
επειδή οι χρήστες δεν κανουν εύρεση πρωτοκόλλου αν υπάρχει πρώτα με το κουμπί που τους εχω φτιαξει θα ήθελα αν γίνεται μόλις πληκτορλογούν τον αριθμό πρωτοκόλλου να τους βγάζει ένα μηνυμα "ΥΠΑΡΧΕΙ ΗΔΗ" ..... αν υπάρχει οντως.....αλλιως να συνεχισουν την εισαγωγή των στοιχείων......

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

Δάφνη Μ.

[ασχετος]

καλό μεσημέρι στο forum.

Δάφνη,

στο πεδίο που θέλεις, πήγαινε στο συμβάν BeforeUpdate χρησιμοποίησε την function DLookup(), αν δε τα καταφέρεις ανέβασε μια test database να βοηθήσουμε καλύτερα.

[Dafnh0106]

Καλημερα στο forum :)


Σχετικά με την προηγούμενη ερώτηση σκέφτηκα ότι θα ήταν καλύτερα να είχα μια φόρμα με την εύερση μόνο του πρωτοκόλλου με 2 επιλογές :

1. Εαν το βρέι να λεει "υπάρχει ήδη" και να φέρνει την καρτέλα με τα στοιχέια που έχουν σχέση με το πρωτόλλο

2. Εαν δεν το βρει να φέρνει την καρτέλα σε κατασταση εισαγωγής νεου ρεκορντ ....

Οπότε πρπει να φτιάξω μια ευρεση στο πεδίο πρωτοκολλο και να μου φερνει το ρεκορντ ενα ειναι ήδη περασμένο αλλιως να μου κανει add record .........

Eάν μπορει να με βοηθήσει καποιος σ αυτο θα ημουν υπόχρεη :)

Ευχαριστω πολυ Κωστα για την βοήθεια σου

Ευχαριστω εκ των προτερων για την βοηθεια σας σ αυτο το προβλημα μου :)

Δαφνη Μ.

[Tasos]

Καλημέρα!

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

Εάν το νούμερο που πληκτρολογείται υπάρχει ήδη, η εγγραφή θα εμφανιστεί στη φόρμα.

Αν δεν υπάρχει, θα δημιουργηθεί νέα εγγραφή με βάση το πληκτρολογημένο νούμερο.

Στο παράδειγμα αυτό χρησιμοποιείται το πεδίο "CustomerID" στη θέση του τον αριθμού πρωτοκόλλου του ζητούμενου σου και έχει τη μορφή "Αριθμός".

Θα χρειαστεί να τροποποιηθεί αν το βασικό κλειδί τον αρθμό πρωτοκόλλου είναι κείμενο.


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

Με εκτίμηση

Τάσος

[Dafnh0106]

Καλημερα σας :)

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

Ευχαριστω και παλι :)

με εκτιμηση

Δαφνη Μ.

[Dafnh0106]

Αρχική Δημοσίευση από ασχετος

καλό μεσημέρι στο forum.

Δάφνη,

στο πεδίο που θέλεις, πήγαινε στο συμβάν BeforeUpdate χρησιμοποίησε την function DLookup(), αν δε τα καταφέρεις ανέβασε μια test database να βοηθήσουμε καλύτερα.

Καλημερα στο forum :)

Κώστα στο πεδίο ΠΡΩΤΟΚΟΛΛΟ το οποιο ειναι κειμενο : 100/01/08/12

στο συμβαν before update προσπαθησα να χρησιμοποιήσω την function DLookup()

αλλα μου χτυπαει......

Private Sub ΠΡΩΤΟΚΟΛΛΟ_BeforeUpdate(Cancel As Integer)

=DLookUp("[ΠΡΩΤΟΚΟΛΛΟ]","main_tbl", "[ΠΡΩΤΟΚΟΛΛΟ] = " & forms!MAIN_TBL![ΠΡΩΤΟΚΟΛΛΟ])

End Sub

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

Ευχαριστω πολυ

με εκτιμηση


Δαφνη

[Tasos]

Καλημέρα!

Δάφνη, στο παράδειγμα υπάρχει ένας πίνακας με πρωτεύον κλειδί (ID) και με αυτόματη αρίθμηση.
Το πεδίο αυτό είναι και η πρώτη (κρυφή + δεσμευμένη) στήλη του σύνθετου πλαισίου.
Πάνω σε αυτό το πεδίο βασίζεται η αναζήτηση.
Αν ο πίνακας σου δεν έχει τέτοιο πεδίο αυτόματης αρίθμησης τότε φρόντισε:
η πρώτη στήλη του πλαισίου κειμένου να παίρνει δεδομένα απ΄ το πεδίο ID (ή όπως αυτό ονομάζεται)
και η δεύτερη στήλη να παίρνει δεδομένα από το πεδίο [ΑΡΙΘΜΟΣ ΠΡΩΤΟΚΟΛΛΟΥ].

Στην περίπτωση αυτή δεν θα χρειαστεί τροποποίηση στον κώδικα.

Διαφορετικά περίγραψε μας τη δομή του πίνακα σου για να σε βοηθήσουμε.

Με εκτίμηση

Τάσος

[Free_Ghost]

Δάφνη κοίτα το συνημμένο παράδειγμα.

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

Επίσης κοίτα τον πίνακά μου διότι από ότι κατάλαβα εσύ έχεις πρωτόκολλο ημερομηνία και ώρα μαζί που είναι λάθος..

[Dafnh0106]

[QUOTE=Free_Ghost;15088]Δάφνη κοίτα το συνημμένο παράδειγμα.

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

Επίσης κοίτα τον πίνακά μου διότι από ότι κατάλαβα εσύ έχεις πρωτόκολλο ημερομηνία και ώρα μαζί που είναι λάθος..[/QUOT

Καλησπερα στο forum

Χρήστο κατ αρχην σ ευχαριστω για το χρονο σου και τη βοηθεια σου.....

Να εξηγησω λίγο καλυτερα την φορμα μου και το σχεδιασμο της βασης μου.....


Εχω μια φορμα με υποφορμα, η κύρια εχει σαν πρωτευον κλειδι το ΠΡΩΤΟΚΟΛΛΟ που μου το δινουν ετοιμο το εχω κειμενο και ειναι αριθμος και ημερομηνια μαζι για να αποφυγω τα διπλοτυπα ... οταν το ειχα χωρια ειχα προβλημα με την υποφορμα διοτι το ΠΡΩΤΟΚΟΛΛΟ ειναι συνδεδεμενο με την υποφορμα και μου εφερνε τους εναγοντες απο προηγουμενο πρωτοκολλο .....

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


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

Σας ευχαριστω και παλι :)

με εκτιμηση

Δαφνη Μ.

[Dafnh0106]

Αρχική Δημοσίευση από Free_Ghost

Δάφνη κοίτα το συνημμένο παράδειγμα.

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

Επίσης κοίτα τον πίνακά μου διότι από ότι κατάλαβα εσύ έχεις πρωτόκολλο ημερομηνία και ώρα μαζί που είναι λάθος..

Καλησπερα στο FORUM

τωρα μολις εφτιαξα μια τεστ βαση που ειναι περιπου ιδια μ αυτη που εχω το προβλημα στο να μου λεει με καποιο τροπο οτι το πρωτοκολλο αυτο υπαρχει ήδη πριν περάσω και τα υπολοιπα στοιχεια.....
πινακες : main_tbl, enagontes
form : main_tbl

Σας ευχαριστω πολυ για τη βοηθεια σας

με εκτιμηση

Δαφνη Μ..