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