Opening a query in another database 1

[merlynsdad]

I do way more VBA in Excel than Access, but this time I need to open a query in another db from my db. I'm basically using the same code to run the other db that the other db uses, with a modified Set db=OpenDatabase("path"). However, I'm having trouble with the password on the other db. The code in the other db to run the password is

DoCmd.OpenQuery "Logon_q"
DoCmd.Close acQuery, "Logon_q"

This gives a "can't find the object 'Login_q' error in my db. How do I open and close this query from my db?

If the square peg won't fit in the round hole, sand off the corners.

 

[MajP]

Put a public procedure in you external database

public sub openLogonq()
docmd.openquery "Logon_q"
end sub

public sub closeLogonq()
docmd.close acquery, "Logon_q"
end sub

Go to references in the database window and add the external database as a reference

from the maindatabase you can now call these procedures and open forms, queries, etc, in the external database as if they are in your database.

when calling from the main database you may have to use the project name of the external database.

theprojectname.openLogonq

 

[dhookom]

Why even open and close the query unless it is an action query? To execute the query, you can use:

db.Execute "Logon_q", dbFailOnError

Duane
Hook'D on Access
MS Access MVP

 

[merlynsdad]

Thanks, dhookom. Since I can't modify the external db, your one liner works perfectly.

If the square peg won't fit in the round hole, sand off the corners.