Changing DNS & DATABASE in Query property

[ktang3227]

HI,

I want to transfer a list of query to a new database. So I need to change their DNS & DATABASE data in their connect string, especially for pass-though query. Can I do this using a module to just run the code and it will go through all the query's property automatically? Anybody has the code to do this? BTW I'm still using Access 97!!

thanks,

[JConsulting]

HI,

I want to transfer a list of query to a new database. So I need to change their DNS & DATABASE data in their connect string, especially for pass-though query. Can I do this using a module to just run the code and it will go through all the query's property automatically? Anybody has the code to do this? BTW I'm still using Access 97!!

thanks,

I have no idea how this will work in 97...I haven't used it in a while. But

If you are familiar with a query definition sequence, it's fairly easy.

Function resetDSN()
Dim qdf As dao.QueryDef
Set qdf = CurrentDb.QueryDefs("YourPassthroughQueryName")
qdf.Connect = "yourconnectionstringhere DSN= '" & YourDSNVariable & "' and more string as required"
set qdf = nothing
End Function
 

Hope this helps.
J