Open Database Event in VBA

[Ganymede]

I want to create an event that runs when I start up my database. It's basically an append query.

I read here that I need to create a public function. But I tried that and no go.

Public Function DoSomething()DoCmd.SetWarnings (False)
DoCmd.OpenQuery "Append"
End Function

I did a search on these forums and couldn't find a solution. Any suggestion?

[madpiet]

don't you need to call if from a macro called "AutoExec"?

If you want to run an action query, don't do it that way. Instead...

CurrentDb.Execute "QueryName"

then you don't need the SetWarnings False and then True at all.

[CJ_London]

Your link provides the solution? What don’t you understand ?

[Micron]

I read here that I need to create a public function

Did you place that function in a standard module? As stated, use that version of Currentdb.Execute or Currentdb.Execute "sql statement in quotes"

[June7]

Options for calling procedure when database opens:

1. AutoExec macro calls VBA Function

2. Set a form to open automatically when db opens and code in Open event calls Function or Sub.


Note error in posting your code. Forum merges first two lines into one. No idea why this happens but it is a persistent bug. Can fix it by editing post to break line.

[Ganymede]

Sorry all. I should have read that article more closely. I was working late last night and missed important details. Marking thread as solved.