Determine if instance of access is open

[stricknyn]

Hi, all is there a way to determine if my access object is open? (meaning the database is open via my object) Here is my code:

Sub Main
 
    Dim acc As New Access.Application
    acc.OpenCurrentDatabase
 
'How do I determing if acc is open?  In the example above I
'know its open, but there are cases in my program when I don't know if its been opened or not.
End Sub

I was thinking there should be something similiar to the ADO connection object (cn.state) but it wasn't. And (if acc is Nothing) doesn't determine if its open.

Thanks,

Strick