Changing a query SQL programatically

[VBAguy22]

Hello,
I have a query, say [myQuery]. And I composed an SQL string myString.
Is there a function to change the sql code in myQuery to myString from whatever it is now programatically. I am aware of CurrentDb.CreateQueryDef(), but this function creates a new query, I just need to change the sql.

 

[Remou]

How about:

Dim qdf As DAO.QueryDef

Set qdf = CurrentDb.QueryDefs("myQuery")
qdf.SQL = "Select * from tblTable"

 

[snyperx3]

Try:

Dim dbs as DAO.Database
Dim qdf as DAO.QueryDef

Set dbs = CurrentDb()
Set qdf = dbs.QueryDefs("qryYourQuery")

qdf.SQL = "SELECT blah blah blah"

Make sure you have references to Microsoft DAO Object Library.

-Pete

 

[snyperx3]

Sorry remou. Posted 1 minute later...was still typing while you were posting. jinx



-Pete