How do you close this code : Set db = OpenDatabase(App.Path & "\MonitorMe.mdb", True,

[alvin777]

Thank you for your time. I get a

Run time error: '70'
Permission Denied

when I try to save the whole database at run time. Can anyone help me close these:

vb codes:

Private Sub Load_()

datC.DatabaseName = (App.Path & "\MonitorMe.mdb")

End sub

' and/or this one...

Public Sub '--- This is in a module (mod.bas)

Set db = OpenDatabase(App.Path & "\MonitorMe.mdb", True, False, "MS ACCESS;PWD=" & YourPassWord)

End sub



God bless,
Alvin
Philippines

[riteshtandon]

please clarify your problem.

[honeybee]

Make sure the MDB is not open in Access, i.e. you have not opened it by double-clicking on it.

Then make sure it's not read-only. Or it's being used by another application.

Finally make sure you have the database cleanup code in place, i.e. closing the Database connection at the end of your app and so on.

.

[alvin777]

Thanks for the reply. The database is not runnned by Access or any application and is not read only but can be edit. Can you give a possible code to close them (the one with the databasename line and the one with the Set db = )


God bless,
Alvin