Εμφάνιση ενός μόνο μηνύματος
  #7  
Παλιά 08-07-20, 19:49
vraxnakisg Ο χρήστης vraxnakisg δεν είναι συνδεδεμένος
Super Moderator
Όνομα: ΓΙΩΡΓΟΣ
Έκδοση λογισμικού Office: Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 14-01-2014
Μηνύματα: 234
Προεπιλογή

Καλησπέρα Σάκη,

Στον ΠΡΟΠΟΝΗΣΕΙΣ τα πεδία που πρέπει να εισάγεις τιμές είναι το πεδίο [ΠΕΛΑΤΗΣ] και το πεδίο [ΣΥΜΦΩΝΙΑ]. Το πεδίο [ΑΥΞΩΝ] είναι ορισμένο στην βάση με τύπο δεδομένων «Αυτόματη Αρίθμηση» και το πεδίο [ΗΜΕΡΟΜΗΝΙΑ] είναι ορισμένο να παίρνει αυτόματα την ημερομηνία που δημιουργείτε η εκάστοτε εγγραφή.

Αν πρόσθεσες στο δικό σου αρχείο τον κώδικα που πρόσθεσα εγώ, παρατήρησε ότι δεν εκτελείται η ρουτίνα «Private Sub ΕΙΣΟΔΟΣ ΠΕΛΑΤΗ _Click».
Για το λόγο αυτό πρέπει να διαγράψεις το κουμπί ΕΙΣΟΔΟΣ ΠΕΛΑΤΗ από την φόρμα σου και να προσθέσεις ένα νέο κουμπί και στο συμβάν «Με το κλικ» να προσθέσεις τον κώδικα:

DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO [ΠΡΟΠΟΝΗΣΕΙΣ] ([ΠΕΛΑΤΗΣ],[ΣΥΜΦΩΝΙΑ]) VALUES ('" & Me.ΚΩΔ_ΠΕΛ & "','" & Me.ΣΥΜΦΩΝΙΑ & "')"
DoCmd.SetWarnings True

Ακόμα στο «Form_Load» της φόρμας «ΕΛΕΓΧΟΣ_ΔΙΑΘΕΣΙΜΟΤΗΤΑΣ» πρόσεξε γιατί έχεις μια εντολή «Me.ΕΙΣΟΔΟΣ_ΠΕΛΑΤΗ.Visible = True» θα πρέπει να την αλλάξει με το όνομα του νέου κουμπιού.

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

Ευχαριστώ.
__________________
Βραχνάκης Γιώργος
vrahnakisg@gmail.com
Απάντηση με παράθεση