Εκτέλεση SQL ερώτησης με VBA σε Ms Access
Από {_tasos}
Καλημέρα,
Θέλω να εκτελέσω μια ερώτηση SQL μέσα σε μια φόρμα της Ms Access. Η ερώτηση δεν είναι ίδια κάθε φορά αλλά ο χρήστης πρέπει να ορίζει τις τιμές στα πεδία στο WHERE μέρος της SQL.
Παράδειγμα:
Έχω τον πίνακα Table1(Id, a, b, c, d, field) Το πεδίο field είναι ακέραιος. Η ερώτηση που θέλω να κάνω είναι της μορφής:
SELECT Sum(field)
FROM Table1
WHERE ....
Ο χρήστης ορίζει τιμή για κάποια, όχι όλα πάντα, από τα πεδία a, b, c, d και αν υποθέσουμε πως δίνει για το a τη τιμή 23 και για το d τη τιμή 43 η ερώτηση μου θα είναι η εξής:
SELECT Sum(field)
FROM Table1
WHERE a=23 AND d=43
Πως μπορώ με VBA να εκτελέσω την ερώτηση αυτή, που την έχω ως string σε κάποια μεταβλητή;
Ευχαριστώ
-
Βασικά βρήκα αυτό που ήθελα και είναι η χρήση της DAO βιβλιοθήκης. Η απορία μου δεν ήταν πως γράφεται η SQL ερώτηση αλλά πως κάνω διαχείρηση το αποτέλεσμα, δηλ. το recordset.
Ευχαριστώ πάντως
-
Χρήσιμη η βοήθεια, ευχαριστώ!
Dim sqlstring ,frst,scnd
sqlstring="SELECT Sum(field) FROM Table1 WHERE a="&frst&" and d="&scnd&";"