Visual Basic - VERIFICAR SI LA BD ESTA ABIERTA

Hola
Como le puedo hacer para verificar si mi bd esta abierta o no, osea si se encuentra cerrada que abra la bd y si esta cerrada la bd que la abra.En sintaxis como sería?
Espero me puedan ayudar porfavor.
Gracias

Hola, si estubieras usando DataEnvaroment la sintaxi seria algo asi si ya esta abierta y la quieres cerrar

if DataEnvaroment.rsCommand.State = adStateOpen then
DataEnvaroment.rsCommand.Close
end if

asi en biserbersa, espero que te sirva Chao... Victor Pizzella.