Εκτέλεση SQL ερώτησης με VBA σε Ms Access

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

Ευχαριστώ

  1. 3/11/2006

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

  1. 3/11/2006

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

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

  1. 7/11/2006

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




   Πίσω στην προηγούμενη σελίδα