Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   Ορισμός Προεπιλεγμένης Τιμής (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/1640-orismos-proepilegmenis-timis.html)

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

Meteora 16-02-12 14:40
Καλησπέρα στη κοινότητα

Κώδικας:
Private Sub cmdDefaultValue_Click()
    CurrentDb.TableDefs("tblPosa").Fields("posostoId").DefaultValue = Me.Pososto
End Sub
Ισχύει μόνο για πεδία αριθμητικά (χωρίς εμφάνιση ποσοστού) και μορφής πλαίσια κειμένου.


Νίκος Δ.

Meteora 19-02-12 08:50
1 Συνημμένο(α)
Καλημέρα στην κοινότητα

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

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

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

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

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

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

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

Meteora 19-02-12 19:36
Χρήστο, ξεκίνησε την ρουτίνα ενημέρωσης με :
Κώδικας:
DoCmd.SetWarnings False
Ακολουθεί το σώμα των εντολών και κλείσε με την
Κώδικας:
DoCmd.SetWarnings True
Αυτές οι εντολές απενεργοποιούν τα μηνύματα update, insert, Delete,...

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

Με εκτίμηση

Νίκος Δ.


Η ώρα είναι 21:36.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2