Access DAO --> ADO

[renew]

Vielleicht weiß ja jemand wie das geht.

Ich hab grad eine Möglichkeit gefunden, wie ich während des Programmes den SQL Syntax einer Abfrage in Access bearbeiten kann. Das funkt auch supa, nur ist das ganze noch in DAO.

Hab schon die MSDN durchforstet, obs was vergleichbares in ADO gibt, bin aber noch nicht fündig geworden.

Vielleicht weiß ja jemand, wie ich das nach ADO portieren kann.

Hier ist mal der VBA Code der mir das Ganze über DAO löst:

Dim db As Database
Dim qd As QueryDef

Set db = DBEngine(0).OpenDatabase("d:\test.mdb")
Set qd = db.QueryDefs("Abfrage")

MsgBox qd.SQL

qd.SQL = "SELECT * FROM addID"

qd.Close
db.Close