Forum - Εμφάνιση ενός μόνο μηνύματος

#2 03-06-09, 09:10

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

Αγαπητέ φίλε, η γνώμη μου είναι να χρησιμοποιήσεις τη μέθοδο .RunSQL ως εξής:

Κώδικας:

DoCmd.SetWarnings False    'Optional

   	       DoCmd.RunSQL "UPDATE Bathmoi SET Bathmoi.matima = Bathmoi.Matima*0.2;" 'Προαιρετικό

' ή με κριτήριο: DoCmd.RunSQL "UPDATE Bathmoi SET Bathmoi.matima = Bathmoi.Matima*0.2 WHERE (((Bathmoi.xPedio)=""Mathitis 1""));" ' 

' ή  από φόρμα: DoCmd.RunSQL "UPDATE Bathmoi SET Bathmoi.matima = Bathmoi.Matima*0.2 WHERE (((Bathmoi.xPedio)='" & Me.Combo1 & "'));" 

DoCmd.SetWarnings True

Δεν έχεις λόγους να ορίζεις μεταβλητές όταν δεν χρειάζεται να τις καλέσεις περισσότερες φορές.
Πχ.:

Κώδικας:

With CurrentDb.OpenRecordset("Bathmoi", 2)
        .MoveFirst
        Do While Not .EOF
            .Edit
            ![matima] = ![matima] * 0.2
            .Update
            .MoveNext
        Loop
    End With

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

Θέμα: Update σε πεδίο πίνακα