Hello all, I am having a small problem in which I hope that
someone can help me with. I have a Access database that is
password protected and I need to open this database with
the following:

Dim oAccess As Access.Application
Set oAccess = CreateObject("Access.Application.8")
oAccess.Visible = False

oAccess.OpenCurrentDatabase "C:\db1.mdb"

oAccess.Quit acQuitSaveAll
Set oAccess = Nothing

Every time that I try to open the db1.mdb the enter
password screen comes up. How do I make is so that the
enter password screen does not come up?

All and any help is appreciated.
Thank you.