Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 02-06-09, 13:38
Meteora
Guest
 
Μηνύματα: n/a
Προεπιλογή Update σε πεδίο πίνακα

Καλημέρα σας
...Απο ένα σύνθετο πλαίσιο αποδίδω τιμή σε μεταβλητή matima = combo11.Column(1) π.χ matima = "ΦΥΣΙΚΗ", matima = "ΜΑΘΗΜΑΤΙΚΑ",...
Οι λέξεις ΦΥΣΙΚΗ, ΜΑΘΗΜΑΤΙΚΑ,... αποτελούν πεδία ενός πίνακα με το όνομα "ΒΑΘΜΟΙ".
Σε μια θέση της εφαρμογής γράφω:

..........
Dim dbsContacts As Database
Dim rstTypes As DAO.Recordset

Set dbsContacts = CurrentDb
Set rstTypes = dbsContacts.OpenRecordset("ΒΑΘΜΟΙ")

If Not rstTypes.EOF Then rstTypes.MoveFirst

Do While Not rstTypes.EOF
rstTypes.Edit
rstTypes!matima = rstTypes!matima * 0.2
rstTypes.Update
rstTypes.MoveNext
Loop

Σκοπός μου -όπως φαίνεται- να αλλάξω το περιεχόμενο του παραμετρικού πεδίου matima σε όλες τις εγγραφές και να περάσω απο 100βάθμια βαθμολογική κλίμακα σε 20βάθμια, πολλαπλασιάζοντας με το 0,2.
Έκανα χρήση διάφορες 'φατσούλες' για την μορφή της προβληματικής εντολής, αλλά συνήθως παίρνω το μήνυμα 'Error 3265 Το στοιχείο δεν βρέθηκε σε αυτή τη συλλογή".
Ευχαριστώ εκ των προτέρων για τον χρόνο σας
Με εκτίμηση
O meteora
Απάντηση με παράθεση