09-04-09, 21:58
|
|
Διάβασμα τιμής απο πεδίο του 1ου Record ενός πίνακα - DAO
Καλησπέρα σε όλα τα παιδιά του Forum
Ας ξεκινήσω...
Βρίσκομαι σε μια φόρμα που 'πατά' πάνω στα στοιχεία (πεδία) του πίνακα(Ι). Επιβάλλεται όμως να πάρω την τιμή απο το πεδίο [ID3] που
ανήκει σε κάποιο άλλο πίνακα(ΙΙ) και μάλιστα απο το 1ο Record. Οι δυο πίνακες δεν ειναι ούτε μπορεί να γίνουν συνδεδεμένοι!
Έγραψα λοιπόν τον παρακάτω κώδικα :
----------------------------------------------------
Dim dbsBASI As Database
Dim rstREC As DAO.Recordset
Dim timi As Integer
Set dbsBASI = CurrentDb
Set rstREC = dbsBASI.OpenRecordset("ΠΙΝΑΚΑΣΙΙ")
rstREC.MoveFirst
timi = rstREC!ID3
-----------------------------------------------------
Ο κώδικας δουλεύει!
Το ζητούμενο ειναι αν θέλει κάποιες πρόσθετες εντολές που αφορούν επι παραδείγματι το καθάρισμα
μνήμης (Δεν ξέρω πως αλλά κάτι σχετικό είδα),...
Φυσικά κάθε άλλη πρόταση καλοδεχούμενη.
Νάχετε ένα καλό βράδυ
O meteora
|