How to open mdb in background?

[deko]

Is there a more efficient way to open an mdb to do stuff with it
programmatically? I'm using the below code to open another database and
inventory the form properties. I've got to open and close the database a
lot and I'm wondering if there's a better way to do it - and avoid all the
screen flashing.

Dim acc As Access.Application
Set acc = CreateObject("Access.Application")
Application.Echo False
acc.OpenCurrentDatabase varPath
acc.Visible = False
acc.DoCmd.OpenForm strName, View:=acDesign, WindowMode:=acHidden
Set frm = acc.Forms(strName)
[get form properties]
Application.Echo True
Thanks!

[Tom van Stiphout]

On Fri, 16 Jan 2004 03:29:01 GMT, "deko" <dj****@hotmail.com> wrote:

Keep it open, and send multiple commands to it.
-Tom.

Is there a more efficient way to open an mdb to do stuff with it
programmatically? I'm using the below code to open another database and
inventory the form properties. I've got to open and close the database a
lot and I'm wondering if there's a better way to do it - and avoid all the
screen flashing.

Dim acc As Access.Application
Set acc = CreateObject("Access.Application")
Application.Echo False
acc.OpenCurrentDatabase varPath
acc.Visible = False
acc.DoCmd.OpenForm strName, View:=acDesign, WindowMode:=acHidden
Set frm = acc.Forms(strName)
[get form properties]
Application.Echo True
Thanks!

[deko]

10-4

that would make sense...
"Tom van Stiphout" <to*****@no.spam.cox.net> wrote in message
news:ks********************************@4ax.com...

On Fri, 16 Jan 2004 03:29:01 GMT, "deko" <dj****@hotmail.com> wrote:

Keep it open, and send multiple commands to it.
-Tom.

Is there a more efficient way to open an mdb to do stuff with it
programmatically? I'm using the below code to open another database and
inventory the form properties. I've got to open and close the database a
lot and I'm wondering if there's a better way to do it - and avoid all thescreen flashing.

Dim acc As Access.Application
Set acc = CreateObject("Access.Application")
Application.Echo False
acc.OpenCurrentDatabase varPath
acc.Visible = False
acc.DoCmd.OpenForm strName, View:=acDesign, WindowMode:=acHidden
Set frm = acc.Forms(strName)
[get form properties]
Application.Echo True
Thanks!