Hi everyone,

I need to have an Access-AddIn which is able to read/write data into its own tables/queries by
programming. That means, I have to find out who I am:

sub WriteIntoMe()
        dim DB as database
        dim RS as recordset

        set db=Opendatabase(...whoAmI?...,false)        'here's my problem!
        set RS=db.openrecordset("ExistingQueryInAddin",dbopendynaset)

        rs.addnew
        rs.fields("MyField").value="This is new"
        rs.update
end sub

Obviously I can't use "CurrentDB()" or "DBEngine(0)(0)" as they represent the visible database and NOT
the addin database.

I know how to read the
"HKEY_LOCAL_MACHINE\Software\Microsoft\Office\8.0\Access\Menu-AddIns\MyOwnAddIn\Library" value with the
path of my Addin database. But that's a lot of undesired (API-)code and I can't believe there's no
"ThisDB()"-construction like WinWord's "ThisDocument"?! I tried several "...parent" ideas but with no
success either.

And BTW, how can I import tables/queries/forms from an Addin database into the currentdb by programming?

Thanks in advance, Lorenz

own tables/queries by

  Just use CodeDB to refer to the Addin mdb.  CurrentDB will give you a
reference to the mdb open in Access, as you already know.

 -- Dev

Hi Dev,

why can't they just give them the same names?? Thanks!

Lorenz

Well, I wouldn't be able to tell you why, but as a guess, maybe because each
has it's own purpose.  CodeDB is the only direct way of distinguishing
between multiple dbs "open" that you can reference, while CurrentDB always
refers to the db that is "visually" open in the UI.

  -- Dev

: Hi Dev,
:
: why can't they just give them the same names?? Thanks!
:
: Lorenz
:
: >   Just use CodeDB to refer to the Addin mdb.  CurrentDB will give you a
: > reference to the mdb open in Access, as you already know.
: >
: >  -- Dev