How can I check database is opened?

[fishworld2006]

Before I use "DataConnect.Open("Data Source = " & AppPath & "\cisa.sl3")" , How can I check whether database is opened or not?

[Erel]

It could only be opened if you already opened it. So you can use a global variable to save its state:

Sub Globals
 DBOpened = false
End Sub
...
If DBOpened = false then
  DataConnect.Open(...)
  DBOpened = true
End If

[fishworld2006]

TKS, Erel .

I've soluted as the same code yr puted. Tk y very much.