Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > Αυτόματη διαγραφή εγγραφών Πίνακα

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 09-04-15, 00:31
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-07-2014
Περιοχή: Πάτρα
Μηνύματα: 385
Προεπιλογή Αυτόματη διαγραφή εγγραφών Πίνακα

Χρόνια πολλά και καλό Πάσχα σε όλους
Θα ήθελα τη βοήθειά σας στο ακόλουθο θέμα:
Στο παρακάτω συνημμένο, με τη φόρμα "frmNew" καταχωρώ διάφορες εγγραφές, οι οποίες εμφανίζονται στη Φόρμα "FrmP".
Θέλω να πετύχω, το εξής:
'Οταν καταχωρείται μια εγγραφή στην οποία τα στοιχεία των πεδίων είναι όλα τα ίδια (ακριβώς) με οποιαδήποτε άλλη προγενέστερη εγγραφή (συμπεριλαμβανομένης και της ημερομηνίας), εκτός του πεδίου "POSO" το οποίο να είναι, σε σχέση με την οποιαδήποτε
άλλη εγγραφή, αριθμός με την ίδια απόλυτη τιμή αλλά με διαφορετικό πρόσημο (αντίθετος αριθμός), τότε να διαγράφονται αυτόματα και οι δύο εγγραφές
από τον υφιστάμενο Πίνακα.
Στο συνημμένο καταδεικνύεται με σαφήνεια το ζητούμενο.


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

Με εκτίμηση
Δημήτρης
Συνημμένα Αρχεία
Τύπος Αρχείου: zip frmDelete.zip (26,0 KB, 7 εμφανίσεις)

Τελευταία επεξεργασία από το χρήστη dimitrisp : 09-04-15 στις 00:48.
Απάντηση με παράθεση
  #2  
Παλιά 09-04-15, 01:27
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Καλημέρα
Μια λύση... Θέλει δοκιμές κυρίως στη ημερομηνία...

Με εκτίμηση / Νίκος
Συνημμένα Αρχεία
Τύπος Αρχείου: zip frmDelete .zip (26,2 KB, 16 εμφανίσεις)
Απάντηση με παράθεση
  #3  
Παλιά 09-04-15, 21:06
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Και μια πρόταση με τη βοήθεια ερωτήματος διαγραφής.

Το ερώτημα συγκρίνει κάθε εγγραφή του πίνακα [tbIP] με τις υπόλοιπες και αν σ’ αυτές υπάρχει κάποια που έχει ίδια τιμή στα πεδία [A], [B], [C] και [DAYP] και αντίθετη τιμή στο πεδίο [POSO] τη διαγράφει.

Για παράδειγμα αν ο πίνακας [tbID] έχει τις εγγραφές:

1, ΜΗΛΑ, ΑΧΛΑΔΙΑ, ΠΟΡΤΟΚΑΛΙΑ, 8/4/2015, 100
2, ΜΗΛΑ, ΑΧΛΑΔΙΑ, ΠΟΡΤΟΚΑΛΙΑ, 8/4/2015, -100
3, ΜΗΛΑ, ΑΧΛΑΔΙΑ, ΠΟΡΤΟΚΑΛΙΑ, 8/4/2015, 100

Το ερώτημα θα διαγράψει:

1) Την πρώτη επειδή στις υπόλοιπες υπάρχει κάποια (συγκεκριμένα η 2) που ικανοποιεί τα κριτήρια.

2) Τη δεύτερη επειδή στις υπόλοιπες υπάρχει κάποια (συγκεκριμένα η 1 και η 3) που ικανοποιεί τα κριτήρια.

3) Την τρίτη επειδή στις υπόλοιπες υπάρχει κάποια (συγκεκριμένα η 2) που ικανοποιεί τα κριτήρια.

Έχει γραφτεί κώδικας στη φόρμα [frmNew], ώστε το ερώτημα να εκτελείται κάθε φορά που αποθηκεύεται μία εγγραφή στον πίνακα νέα ή τροποποιημένη.

Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb frmDelete.mdb (568,0 KB, 27 εμφανίσεις)
Απάντηση με παράθεση
  #4  
Παλιά 10-04-15, 00:50
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-07-2014
Περιοχή: Πάτρα
Μηνύματα: 385
Προεπιλογή

Γιώργο, kapetang, παραδίδεις μαθήματα !!!
Νίκο, Μeteora παραδίδεις μαθήματα !!!
Θερμές ευχαριστίες και στους δυό σας. Είμαι ειλικρινά υπόχρεος.
Τελικώς, θα χρησιμοποιήσω τη λύση του Γιώργου δεδομένου ότι, ύστερα από αρκετές δοκιμές διαπίστωσα πως είναι πιο σταθερή, αξιόπιστη και, το σημαντικότερο, δεν υφίσταται κανένας κίνδυνος για να γίνουν λάθος διαγραφές, σε αντίθεση με τη λύση του Νίκου η οποία είναι μεν έξυπνη και απλή, αλλα έχει κάποιες αδυναμίες και χρειάζεται περαιτέρω τροποποιήσεις προκειμένου να λειτουργήσει στη δική μου (τουλάχιστον) εφαρμογή. Άλλωστε, θεωρώ ότι,οποιαδήποτε λύση που βασίζεται σε ερώτημα στην access είναι πιό σταθερή και λειτουργική.

Ευχομαι ολοψύχως καλή Ανάσταση και καλό Πάσχα

Φιλικά/Δημήτρης
Απάντηση με παράθεση
Απάντηση στο θέμα


Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Πίνακες ] Διαγραφή εγγραφών πίνακα υπό όρους dimitrisp Access - Ερωτήσεις / Απαντήσεις 5 12-11-16 14:58
Αυτόματη διαγραφή βάσης γιώργοςΚ Access - Ερωτήσεις / Απαντήσεις 2 25-09-14 00:24
Αυτόματη διαγραφή kirillos Access - Ερωτήσεις / Απαντήσεις 2 17-08-12 10:50
Πρόβλημα ενημέρωσης πινάκων και διαγραφή ανενεργών εγγραφών πίνακος alex Access - Ερωτήσεις / Απαντήσεις 14 09-12-10 11:05
Πρόβλημα ενημέρωσης πίνακων και διαγραφή ανενεργών εγγράφων πίνακος alex Access - Ερωτήσεις / Απαντήσεις 0 06-12-10 11:49


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