How do you show (list) References?

[FancyPrairie]

I have 2 databases. One of the databases (lib.mda) is my library database, which is referenced in my other database (my.mdb). I can programmatically list the references in my.mdb. But can't figure out how to list the references in lib.mda.

For example, from my.mdb, I want to call a procedure in lib.mda that will list the references in lib.mda. If I insert the following function in lib.mda, it lists the References in my.mdb. I want it to list the references in lib.mda.

Function ModuleInLib()

Dim ref as Reference

For each ref in References
debug.print ref.name
Next

End Function


Any ideas?

 

[TrojanRabbit]

This might work, but it may not with mda:
Dim appb As New Access.Application
appb.OpenCurrentDatabase &quot;<reference db>&quot;
For Each ref In appb.References
debug.print ref.name
Next ref
appb.CloseCurrentDatabase

Something to try. Worked for me with an mdb; I don't have an mda.

 

[FancyPrairie]

Thanks!! That worked like I wanted it to. I had used that technique in my wizards, but it didn't cross my mind for this problem. Thanks again.