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

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 14-07-10, 11:22
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα στην παρέα

Προκειμένου να δοκιμαστούν τα προγράμματα που δημιούργησε η παρέα, σε πραγματικές συνθήκες, χρησιμοποίησα ένα πίνακα 1693 διαφορετικών ονομάτων.
Οι συχνότητες (πιθανότητες) των ονομάτων είναι τυχαίες και έχουν άθροισμα 1 (100%).
1. Το RandomNamesMarios2.mdb είναι το πρόγραμμα που δημιούργησε ο Μάριος. Λειτουργεί κανονικά, αλλά είναι αργό.
2. Το RandomNamesMarios3.mdb (επισυνάπτεται) είναι το πρόγραμμα του Μάριου, όπως τροποποιήθηκε από το Γιάννη. Έχει βελτιωθεί στην ταχύτητα και λειτουργεί κανονικά.
3. Το NameFrequency.mdb (δεν επισυνάπτεται) είναι το πρόγραμμα του Γιάννη. Είναι ταχύτατο αλλά σε πραγματικές συνθήκες εμφανίζει λάθος χρόνου εκτέλεσης. Επίσης και με τον πίνακα των περιορισμένων ονομάτων αν ζητήσουμε μικρό δείγμα, πχ 12 εγγραφών θα δημιουργήσει δείγμα των 17 εγγραφών.
Στα παραπάνω προγράμματα οι αλγόριθμοι είναι πρωτότυποι, ευφυείς και λογικοί, αλλά δημιουργούν και κάποιες υπόνοιες για την ορθότητά τους.
4. Στο RandomNamesGorge.mdb (επισυνάπτεται) , προκειμένου να γίνει σύγκριση με τα προηγούμενα, χρησιμοποιώ μια κλασική μέθοδο δειγματοληψίας. Δημιουργείται μια κληρωτίδα ονομάτων, στην οποία η αναλογία κάθε ονόματος (πλήθος εμφάνισης προς συνολικό πλήθος) ισούται με την πιθανότητα του ονόματος και ακολούθως λαμβάνεται τυχαία το δείγμα.
Χρησιμοποιεί μια τροποποίηση του περιβάλλοντος χρήστη και του μαγικού (σφαιράτου) κώδικα του Γιάννη.
Φαίνεται να λειτουργεί καλά, αλλά χρειάζεται να δοκιμαστεί.
Συμπέρασμα: Στο ζόρικο πρόβλημα που έβαλε ο Γιώργος (mistirios); έγινε σημαντική δουλειά, αλλά, κατά τη γνώμη μου, δεν παρουσιάστηκε ακόμα η άριστη λύση.
Φιλικά/Γιώργος
Συνημμένα Αρχεία
Τύπος Αρχείου: zip RandomNamesMarios3.zip (61,2 KB, 9 εμφανίσεις)
Τύπος Αρχείου: zip NameFrequencyGeorge.zip (417,2 KB, 8 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 03-09-10, 19:09
Όνομα: ηλιας
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-09-2010
Μηνύματα: 11
Προεπιλογή

καλησπέρα
πως μπορω να έχω σε μια φορμα όλες τις εγγραφές σε μια σελίδα και πατώντας πάνω σε μια εγγραφή να ανοιγει η φόρμα σ' αυτη;
πχ σε προβολή φυλλου δεδομένων βλέπω όλες τις επαφες μου, πως μπορώ κλικαροντας σε μια απο αυτες να μπαινω στη φορμα οπου συμπληρώνω τα στοιχεία της
Απάντηση με παράθεση
  #3  
Παλιά 03-09-10, 23:09
Όνομα: Μυστήριος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 22-10-2009
Περιοχή: Αθήνα
Μηνύματα: 23
Προεπιλογή

Απαντώντας γενικά αν στην ιδιότητα <onclick> ή <double-click> του id (του πεδίου κλειδιού) των εγγραφών αντιστοιχήσεις μία μακροεντολή ή κώδικα που να ανοίγει την φόρμα με το id της εγγραφής που κάνεις κλικ τότε έχεις αυτό που θες. Αν δουλεύεις με Access 2007 ή νεώτερη υπάρχει υλοποιημένο στα templates που μπορείς να βρες στο office online.
Απάντηση με παράθεση
  #4  
Παλιά 06-09-10, 09:25
Όνομα: ηλιας
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-09-2010
Μηνύματα: 11
Προεπιλογή

EΧΩ ΑCESS 2003
Στην προβολη φύλλου δεδομένων δεν μπορώ να έχω προσβαση στις ιδιότητες του πεδίου
Any help
Απάντηση με παράθεση
  #5  
Παλιά 06-09-10, 11:17
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα σε όλους
Αν πατήσεις το συνδυασμό πλήκτρων: alt+enter θα εμφανιστεί το φύλλο ιδιοτήτων.
Ίσως σε βοηθήσει.
Γιώργος
Απάντηση με παράθεση
  #6  
Παλιά 06-09-10, 11:34
Όνομα: ηλιας
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-09-2010
Μηνύματα: 11
Προεπιλογή

Mπορει καποιος να μου συντάξει κωδικα για να ανοιγει η φόρμα στο συγκεκεριμένο id. Ευχαριστω
Απάντηση με παράθεση
  #7  
Παλιά 06-09-10, 11:48
Όνομα: ηλιας
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-09-2010
Μηνύματα: 11
Προεπιλογή

σασ στελνω ενα δειγμα και το τι θελω να κανω

θελω σε μια φορμα να φαόνονται όλα τα επιθετα και πατώντας πανω στο επιθετο να μου ανοιγει η φόρμα στο αντιστοιχω id
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb βδ2.mdb (136,0 KB, 5 εμφανίσεις)
Απάντηση με παράθεση
  #8  
Παλιά 06-09-10, 12:48
Όνομα: Μυστήριος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Αγγλική
 
Εγγραφή: 22-10-2009
Περιοχή: Αθήνα
Μηνύματα: 23
Προεπιλογή

Σε μία πρόχειρη αλλά λειτουργική υλοποίηση αυτού που θέλεις να κάνεις έφτιαξα μία φόρμα βασισμένη στον Πίνακα 1 με τα πρόσωπα που προβάλλει τις εγγραφές σε μορφή φύλλου δεδομένων (datasheet) με ονομασία frm_ProsopaSeProvoliListas.
Μετά έφτιαξα μία μακροεντολή που να ανοίγει την φόρμα Πίνακας 2 με τα στοιχεία του προσώπου με συγκεκριμένο id.
Τη μακροεντολή αυτή την αντιστοίχησα στο event double-click του id της φόρμας σε προβολή datasheet και όχι στο επώνυμο γιατί μπορεί πολλά πρόσωπα να έχουν το ίδιο επώνυμο.
Έτσι κάνοντας διπλό-κλικ στο id ανοίγει η φόρμα Πίνακας 2.
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb openbyid.mdb (128,0 KB, 13 εμφανίσεις)
Απάντηση με παράθεση
  #9  
Παλιά 06-09-10, 14:12
Το avatar του χρήστη editolis
Super Moderator
Όνομα: Τολης
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 02-01-2010
Περιοχή: ATHENS-GREECE
Μηνύματα: 180
Προεπιλογή

Ενας απλος κωδικας στο Onclick ενος κουμπιου σου ειναι ο εξης:

(Η Access θα σου εμφανισει ενα κουμπι σε καθε εγγραφη σου στην συνεχομενη σου φορμα)

Οπου frm1 η φορμα σου που θα ανοιγει.

================================================== =====================
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frm1"
stLinkCriteria = "[id]=" & Me![id]
DoCmd.OpenForm stDocName, , , stLinkCriteria

================================================== =====================

Μεσα απο αυτη την διαδικασια μπορεις να κανεις το
double click στο ονομα, μπορεις να κανεις "κρυφο" το κουμπι κλπ.

Καλη συνεχεια....
Απάντηση με παράθεση
  #10  
Παλιά 06-09-10, 14:23
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Χαιρετώ την παρέα
Να και μια άλλη εκδοχή διαχείρισης με combobox!
Έχετε την καλημέρα μου/ Νικος Δ.
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb βδ2.mdb (260,0 KB, 5 εμφανίσεις)
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[Συναρτήσεις] πως βρίσκουμε από συγκεκριμένο πίνακα αριθμό ή γράμμα που απουσιάζει geronik Excel - Ερωτήσεις / Απαντήσεις 11 01-12-14 20:36
[ Ασφάλεια] Κλείδωμα μετά από συγκεκριμένο αριθμό χρήσεων parara Access - Ερωτήσεις / Απαντήσεις 0 31-12-12 13:06
[Γενικά] Εμφάνιση δεδομένων των στηλών που περιέχουν συγκεκριμένο αριθμό στην τελευταία γραμμή Lefteris Excel - Ερωτήσεις / Απαντήσεις 20 23-10-12 18:44
[ Πίνακες ] Διόρθωση εγγραφών σε συγκεκριμένο πεδίο marpapa Access - Ερωτήσεις / Απαντήσεις 10 15-05-12 20:58


Η ώρα είναι 13:09.