<div>
Thanks. &nbsp;Using a different procedure to close the databases seems to work.
</div>


Thanks.  Using a different procedure to close the databases seems to work.

<div>
<div class="content wysiwyg-content">
I am trying to close a database and delete the mdb file. &nbsp;However, when I do this it does not delete the file because the file is still locked. &nbsp;Using DAO, is there a way to check to see if the mdb is still locked and wait until it is ok to delete it or is there a better way to do this?<br />
<br />
If Not (Dbs Is Nothing) Then<br />
&nbsp; &nbsp; Dbs.Close<br />
&nbsp; &nbsp; Set Dbs = Nothing<br />
&nbsp; &nbsp; Data1.Database.Close<br />
&nbsp; &nbsp; Data2.Database.Close<br />
&nbsp; &nbsp; DoEvents<br />
End If<br />
sFileSpec = ProjectPath &amp;&nbsp;&quot;\&quot; &amp;&nbsp;ProjectName &amp;&nbsp;&quot;.mdb&quot;<br />
If Dir(sFileSpec) &lt;&gt;&nbsp;vbNullString Then Kill sFileSpec
</div>
</div>


I am trying to close a database and delete the mdb file.  However, when I do this it does not delete the file because the file is still locked.  Using DAO, is there a way to check to see if the mdb is still locked and wait until it is ok to delete it or is there a better way to do this?

If Not (Dbs Is Nothing) Then
    Dbs.Close
    Set Dbs = Nothing
    Data1.Database.Close
    Data2.Database.Close
    DoEvents
End If
sFileSpec = ProjectPath & "\" & ProjectName & ".mdb"
If Dir(sFileSpec) <> vbNullString Then Kill sFileSpec

Close mdb database and delete it

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.