Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 19-06-12, 20:36
marpapa Ο χρήστης marpapa δεν είναι συνδεδεμένος
Όνομα: Μαρία
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 01-04-2011
Μηνύματα: 25
Προεπιλογή Ενημέρωση εγγραφών με VB

Καλησπέρα,

Θέλω να ενημερώσω το πεδίο field1 με τους πρώτους 20 χαρακτήρες του πεδίου field.

Το πεδίο field βρίσκεται στον πίνακα p1. Το πεδίο field1 βρίσκεται σε διαφορετικό πίνακα π.χ. p2.

Δηλαδή, θέλω να παίρνει τα στοιχεία που βρίσκονται στο field του πίνακα p1 και να ενημερώνει με νέα εγγραφή το πεδίο field1 που είναι σε άλλο πίνακα.

Σας παραθέτω τον κώδικα για να μου πείτε πως να το παραμετροποιήσω.


Κώδικας:
Private Sub Aioie?0_Click()
    With CurrentDb.OpenRecordset("p1", 2)
        .MoveFirst
        Do While Not .EOF
            .Edit

            !field1 = Left(!field, 20)

            .Update
            .MoveNext
        Loop
    End With
End Sub
Σας ευχαριστώ
Απάντηση με παράθεση