Ορισμός Προεπιλεγμένης Τιμής

[Χρήστος]

Καλησπέρα, ζητώ την βοήθειά σας στο εξής:
Στη βάση Δείγμα και στη Φόρμα frmPososta, θέλω με το πάτημα του κουμπιού να ορίζεται η τρέχουσα τιμή του PosostoID ως Προεπιλεγμένη τιμή για τις εγγραφές του Πίνακα tblPosa και μάλιστα το κουμπί που πατήθηκε να "φαίνεται" πατημένο(με κάποια μορφοποίηση ίσως!).

[Meteora]

Καλησπέρα στη κοινότητα

Private Sub cmdDefaultValue_Click()
    CurrentDb.TableDefs("tblPosa").Fields("posostoId").DefaultValue = Me.Pososto
End Sub

Ισχύει μόνο για πεδία αριθμητικά (χωρίς εμφάνιση ποσοστού) και μορφής πλαίσια κειμένου.


Νίκος Δ.

[Meteora]

Καλημέρα στην κοινότητα

Ανεβάζω διορθωμένο το μικρό τμήμα της εφαρμογής που ανέβασε το μέλος Χρήστος, για να δείξω -πρακτικά- τις διορθώσεις.

Να είμαστε όλοι καλά ...όσο γίνεται.

Με εκτίμηση
Νίκος Δ.

Υστερολόγιο: Αγαπητέ μας Χρήστο, μη ανοίγεις δεύτερο διάλογο για το ίδιο θέμα και με τον ίδιο τίτλο! Τα θέματα έχουν χαρακτηριστικούς τίτλους αφού κάποιοι φίλοι (μέλη και επισκέπτες) πρέπει να βρίσκουν με σχετική ευκολία ό,τι ψάχνουν.

[Χρήστος]

Έχεις δίκιο.
Σχετικά με την λύση που προτείνεις, με ποιόν τρόπο παρακάμπτεται το προειδοποιητικό μήνυμα; (το οποίο προυποθέτει να πατήσεις ΝΑΙ!!) Είναι προτιμότερο να ενσωματωθεί στον κώδικα παρά να απενεργοποιηθεί απ' τις επιλογές της Access προφανώς.

[Meteora]

Ποιό μήνυμα ; Το μόνο μήνυμα που έχω είναι όταν ο πίνακας είναι ανοιχτός. Από την εμπειρία μου, δεν γράφεις με VBA σε ανοιχτό πίνακα!

[Χρήστος]

Νίκο, δεν μπορώ να αξιοποιήσω την απάντησή σου γιατί προς το παρόν δεν την καταλαβαίνω.
Εγώ πάντος αναφέρομαι στο μήνυμα που σχετίζεται με την εφαρμογή της ενημέρωσης κάνοντας το ΤΙΚ -αυτό που λέει οτι πρόκειται να ενημερώσετε μια γραμμές-μήνυμα που εμφανίζεται όταν ο πίνακας θα είναι κλειστός πράγματι.

[Meteora]

Χρήστο, ξεκίνησε την ρουτίνα ενημέρωσης με :

 DoCmd.SetWarnings False

Ακολουθεί το σώμα των εντολών και κλείσε με την

 DoCmd.SetWarnings True

Αυτές οι εντολές απενεργοποιούν τα μηνύματα update, insert, Delete,...

Καλό μας βράδυ

Με εκτίμηση

Νίκος Δ.