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

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 04-10-11, 09:54
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 02-10-2011
Μηνύματα: 77
Προεπιλογή Διευκρύνιση

Ευχαριστώ για την απάντηση. Θα προχωρήσω πρώτα στο θέμα του κλειδώματος της τροποποίησης σχεδιασμού. Θα ήθελα για αυτή τη λύση που μου προτείνεις περισσότερες λεπτομέρειες. Για να είμαι πιο συγκεκριμένος, η εφαρμογή περιέχει πίνακες που μέσα από τις αντίστοιχες φόρμες να μπορεί ο απλός χρήστης να προσθέτει ή να αλλάζει εγγραφές. Θα ήθελα να μην μπορεί να αλλάζει ή και να βλέπει αν γίνεται το σχεδιασμό πινάκων, φορμών, μακροεντολών και εκθέσεων. Απλά να χειρίζεται τις εγγραφές του μέσα από τις φόρμες.
Ευχαριστώ και πάλι
Δημήτρης

Σημ. Δεν γνωρίζω τη διαδικασία που σπάει το πρόγραμμα σε 2.
Απάντηση με παράθεση
  #2  
Παλιά 04-10-11, 12:24
Όνομα: Αλέξανδρος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 22-01-2010
Περιοχή: ΑΡΤΑ
Μηνύματα: 521
Προεπιλογή

Δημήτρη Καλησπέρα

Πρέπει να κάνεις την βάση σου ΜDE.Tότε δεν μπορούν οι (κακόβουλοι) να σου πειράξουν τον κώδικα.Μπορούν όμως να βλέπουν τους πίνακες.
1.Πρώτα πάς Εργαλεία-Εκκίνηση-Φόρμα εμφάνισης.
Βάζεις με ποιά φόρμα θέλεις να ανοίγεις την εφαρμογή και αποτσεκάρεις όλες τις επιλογές ώστε να μην εμφανίζεται το παράθυρο με τους πίνακες και τις φόρμες με το άνοιγμα της βάσης.
2.Για να κάνεις την βάση MDE πας Εργαλεία-Βοηθήματα για βάσεις δεδομένων-Δημιουργία αρχείου MDE.
Αλλά κατα το άνοιγμα της βάσης αν θέλει κάποιος μπορεί πατώντας το Shift να σου ανοίξει το παράθυρο να δεί τους πίνακες.Για να μήν βλέπει τους πίνακες είχε βάλει κάποιος απο τα παιδιά ένα παράδειγμα αλλά δεν θυμάμαι.Είχε σχέση με τον διαχειριστή και το χρήστη.
Πιστεύω να βοηθήθηκες

Φιλικά/Αλέξανδρος
Απάντηση με παράθεση
  #3  
Παλιά 04-10-11, 12:25
Το avatar του χρήστη Tasos
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.035
Προεπιλογή

Καλησπέρα σε όλους!

Δημήτρη, νομίζω ότι ο παρακάτω σύνδεσμος θα σε βοηθήσει:

http://www.ms-office.gr/forum/access...oma-basis.html

Επίσης ρίξε μια ματιά και σ αυτόν το σύνδεσμο:
http://www.ms-office.gr/forum/access...do-xristi.html

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

Φιλικά

Τάσος
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση
  #4  
Παλιά 04-10-11, 12:51
Όνομα: Αλέξανδρος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 22-01-2010
Περιοχή: ΑΡΤΑ
Μηνύματα: 521
Προεπιλογή

Δημήτρη

Βρήκα ένα παράδειγμα απο παλιά βάση που είχα κάνει.Αυτο βέβαια απο το φορούμ το είχα δεί και το προσάρμοσα σε κάποια βάση.Θέλω να αναφέρω οτι δεν είναι κάτι δικό μου.Πιστεύω να σε καλύπτει.Ο κωδικός είναι alex και για το admin και για το χρήστη.Θα δείς πως γίνεται όταν το ανοίξεις.Ετσι με το ΜDE θα κλειδώνεις όλα τα άλλα (Φόρμες εκθέσεις κλπ) και με την εφαρμογή αυτή τους πίνακες

Φιλικά/Αλέξανδρος
Συνημμένα Αρχεία
Τύπος Αρχείου: zip 04_10_2011.zip (165,5 KB, 66 εμφανίσεις)
Απάντηση με παράθεση
  #5  
Παλιά 04-10-11, 17:20
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 02-10-2011
Μηνύματα: 77
Προεπιλογή Άνοιγμα συννημένου

Σε ποια έκδοση είναι το παράδειγμα που μου έστειλες; Έχω 2003 και μετατροπέα για 2007 αλλά δεν ανοίγει μετά την αποσυμπίεση.
Και αφού το ανέφερα - δεν είναι σχετικό με το αρχικό μου ερώτημα, αλλά θα εκτιμούσα πάρα πολύ την άποψή σας - έχω κάτι να κερδίσω από την access 2007 ή 2010 σε σχέση με την 2003; Στο υπόλοιπο office έχω δει αλλαγές αλλά στην access τι προτείνετε;
Απάντηση με παράθεση
  #6  
Παλιά 04-10-11, 20:04
Όνομα: Αλέξανδρος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 22-01-2010
Περιοχή: ΑΡΤΑ
Μηνύματα: 521
Προεπιλογή

Δημήτρη

Το παράδειγμα είναι σε 2002 έκδοση.Λογικά θα έπρεπε να το βλέπεις με 2003.Το ξαναστέλνω μήπως δεν το φόρτωσε καλά.Το αρχικό σου ερώτημα ήταν να κάνεις Demo εφαρμογή αν κατάλαβα καλά
.Η απόκρυψη πινάκων παίζει ρολο για την εφαρμογή που θέλεις που σίγουρα θα υπάρχει κάποιος πίνακας που θα περιέχει κάποια τρέχουσα ημερομηνία.(Μιλάω με απλό κώδικα που να κλειδώνει για κάποιο χρονικό διαστημα)και όχι Μοdule.
Εάν ο χρήστης δει την ημερομηνία αυτή τότε την σβήνει και το Demo ξεκινά πάλι απο την αρχή.
Υπάρχουν βέβαια και κάποια προγραμματάκια στο δυαδίκτιο που σπάνε κωδικούς απο access οπότε πάλι δεν είσαι σίγουρος.
Εγώ νομίζω εάν θέλεις για κάτι σοβαρό να απευθυνθείς σε κάποιο ειδικό να σου κάνει αποκρυπτογράφηση των πινάκων ή να σου φτιάξει μια συνάρτηση Μodule που να καλει την συνάρτηση και να υπάρχει ο πίνακας με την τρέχουσα ημερομηνία μόνο γιατι πρέπει κάπου να περάσει η τρέχουσα ημερομηνία και να κλειδώνει μέσα απο τα register tou Pc.Οπότε και να σου πειράξουν τον πίνακα με την ημερομηνία δεν θα υπάρχει πρόβλημα.Τώρα για τα δεδομένα των πινάκων πιστεύω κάποια σοβαρή εφαρμογή κρατάει backup κάθε ημέρα και δεν υπάρχει προβλημα στο να ανακτήσεις τα δεδομένα.
Πιστεύω να βοηθήθηκες με ενημέρωση πιο πολύ

Φιλικά/Αλέξανδρος
Συνημμένα Αρχεία
Τύπος Αρχείου: zip 04_10_2011.zip (86,9 KB, 62 εμφανίσεις)
Απάντηση με παράθεση
  #7  
Παλιά 04-10-11, 23:48
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Καλημέρα

Δεν είναι ανάγκη να έχεις την ημερομηνία-όριο σε πίνακα. Την ενσωματώνεις στον κώδικα και δεν υπάρχει περίπτωση σε *.mde να την δει κάποιος.
παράδειγμα αν γράψεις:

If Date > DateSerial(2012, 3, 12) Then
<κώδικας απόρριψης διαχείρισης της εφαρμογής>
End If

Αποκλείεται κάποιος να σε αλλάξει το όριο (12 Μαρτίου 2012). ΜΟΝΟ αν αλλάξει ημερομηνία στον υπολογιστή του μπορεί να συνεχίσει την εφαρμογή...

Με εκτίμηση

Νίκος Δ.

Τελευταία επεξεργασία από το χρήστη Meteora : 05-10-11 στις 14:10. Αιτία: Συμπλήρωση...
Απάντηση με παράθεση
  #8  
Παλιά 05-10-11, 07:36
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 02-10-2011
Μηνύματα: 77
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από Meteora Εμφάνιση μηνυμάτων
Καλημέρα

Δεν είναι ανάγκη να έχεις την ημερομηνία-όριο σε πίνακα. Την ενσωματώνεις στον κώδικα και δεν υπάρχει περίπτωση σε *.mde να την δει κάποιος.
παράδειγμα αν γράψεις:

If Date > DateSerial(2011, 3, 12) Then
<κώδικας απόρριψης διαχείρισης της εφαρμογής>
End If

Αποκλείεται κάποιος να σε αλλάξει το όριο (12 Μαρτίου 2011). ΜΟΝΟ αν αλλάξει ημερομηνία στον υπολογιστή του μπορεί να συνεχίσει την εφαρμογή...

Με εκτίμηση

Νίκος Δ.
Αυτό ψάχνω ακριβώς. Ένα μεγάλο χρονικό διάστημα για demo. Δεν υπάρχει περίπτωση να σπάσει κάποιος τον κώδικα - εννοώ σε αυτούς που απευθύνομαι. Απλά θέλω να τους δώσω ένα κίνητρο να επικοινωνούν μαζί μου κάθε χρόνο, ώστε να ανανεώνουν το χρονικό διάστημα. Δεν ξέρω πως να γράψω τον "κώδικα απόρριψης διαχείρισης της εφαρμογής" με ένα κατατοπιστικό μήνυμα στο χρήστη. Έχω μια κεντρική φόρμα menu στην οποία σκέφτομαι να βάλω ενημερωτικό μήνυμα όταν πλησιάζει η λήξη (πχ 30 μέρες ακόμα) και όταν λήξει να κλείνει η εφαρμογή.
Καλημέρα και ευχαριστώ πολύ για το ενδιαφέρον
Απάντηση με παράθεση
  #9  
Παλιά 05-10-11, 08:20
Όνομα: Αλέξανδρος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 22-01-2010
Περιοχή: ΑΡΤΑ
Μηνύματα: 521
Προεπιλογή

Καλημέρα

Εχεις δίκιο Νίκο για το τρόπο που περιγράφεις .Ισως εγώ δεν έκανα καλή διατύπωση.Πρίν συνταχθεί ο κώδικας για την απόρριψη διαχείρισης της εφαρμογής χρειάζεται και να ελέγχει και την ημερομηνία του υπολογιστή και αυτο μπορεί να γίνει με (DLookup(FieldFRunDate, TblName)) που να ελέγχει τον πίνακα ΠΧ.tblTrial με πεδια TrialActive ,FrstDate,CurDate,DaysTrial όπου
Dim DtFrstDate As Date, CurrDate As Date
CurrDate = Date
Ολα αυτά σε Module. Με το άνοιγμα της εφαρμογής να φορτώνει την τρέχουσα ημερομηνία με αποτέλεσμα εάν αλλάξει κάποιος την ημερομηνία του υπολογιστή μεγαλυτερη > ή < μικρότερη τότε έρχεται σε λειτουργία ο κώδικας και σταματάει η εφαρμογή.Στην περίπτωση αυτή εννοώ ότι εάν κάποιος δεί τον πίνακα και τον αλλάξει επανέρχεται η εφαρμογή.
Η περίπτωση που αναφέρθηκα στο προηγούμενο μήνυμα με αποκρυπτογράφηση των πινάκων και μια συνάρτηση Μodule που να καλει την συνάρτηση και να υπάρχει ο πίνακας με την τρέχουσα ημερομηνία μόνο γιατι πρέπει κάπου να περάσει η τρέχουσα ημερομηνία και να κλειδώνει μέσα απο τα register tou Pc.Οπότε και να σου πειράξουν τον πίνακα με την ημερομηνία δεν θα υπάρχει πρόβλημα.Επίσης εάν γυρίσει η ημερομηνία του υπολογιστή εμπρός ή πίσω τότε πάλι να μπλοκάρει την εφαρμογή.

Φιλικά
Αλέξανδρος
Απάντηση με παράθεση
  #10  
Παλιά 05-10-11, 09:03
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 02-10-2011
Μηνύματα: 77
Προεπιλογή Υλοποίηση λύσης

Συγνώμη που γίνομαι κουραστικός, κατάλαβα τον τρόπο που προτείνεις να κλειδώσει η ημερομηνία, αλλά δυστυχώς δεν έχω γνώσεις να φτιάξω module. Πως θα μπορούσες να με βοηθήσεις; Αρκεί ένα παράδειγμα με την κεντρική μου φόρμα; Αν γίνεται έτσι, σε παρακαλώ κάνε μου ένα παράδειγμα με μια άδεια φόρμα με όνομα menu και πιστεύω θα καταφέρω να τα μεταφέρω στο πρόγραμμά μου.
Ευχαριστώ και πάλι
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Ασφάλεια] Κλείδωμα μετά από συγκεκριμένο αριθμό χρήσεων parara Access - Ερωτήσεις / Απαντήσεις 0 31-12-12 13:06
[ Ασφάλεια] Κλείδωμα βάσης με τον αριθμό του επεξεργαστή Γιωργος Μπεστ Access - Ερωτήσεις / Απαντήσεις 3 27-12-12 20:42
[ Ασφάλεια] Απορία σε κλείδωμα βάσης δεδομένων Γιωργος Μπεστ Access - Ερωτήσεις / Απαντήσεις 3 03-05-12 06:45
Κλείδωμα βάσης SOELLICHA Access - Ερωτήσεις / Απαντήσεις 2 12-12-11 09:59
Κλείδωμα Βάσης δεδομένων Ms-Office-Development Team Access samples - Χρήσιμα αρχεία & παραδείγματα 0 08-08-10 14:42


Η ώρα είναι 12:59.