Forum

Εκτέλεση 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 σε κάποια μεταβλητή;

Ευχαριστώ

Απάντηση από:dimis_dimis

Dim sqlstring ,frst,scnd
sqlstring="SELECT Sum(field) FROM Table1 WHERE a="&frst&" and d="&scnd&";"

Απάντηση από:dimis_dimis

http://www.w3schools.com/ado/default.asp

Απάντηση από:_tasos

Βασικά βρήκα αυτό που ήθελα και είναι η χρήση της DAO βιβλιοθήκης. Η απορία μου δεν ήταν πως γράφεται η SQL ερώτηση αλλά πως κάνω διαχείρηση το αποτέλεσμα, δηλ. το recordset.

Ευχαριστώ πάντως

Απάντηση από:dimis_dimis

Ισως θέλεις αυτό
http://forums.devarticles.com/microsoft-access-development-49/best-way-to-display-vba-query-results-11294.html

Απάντηση από:_tasos

Χρήσιμη η βοήθεια, ευχαριστώ!