Database locked on server

M

Margaret Greczel

I'm trying to start Access DB on a network drive using VB code. The db does
not open but it is in a locked condition and I cannot do any compacting of db.
How do I unlock the db? This is the message I've received:

'You attempted to open a database that is already opened exclusively by user
'Admin' on machine 'XXX'. Try again when the databse is available."

Can someone assist me, please?

This is my VB code:

Option Explicit
Dim oAccess
Set oAccess = CreateObject("Access.Application")
oAccess.Visible = True
oAccess.OpenCurrentDatabase "e:\obip-nsit\Order_Details_files\Daily Due.mdb"

'oAccess.DoCmd.RunMacro "00A_Import_Data"

oAccess.Quit
Set oAccess = Nothing
 
Top