Visual Basic - Sobre ADO y Access 2000

Hola, estoy haciendo un sistema con Access 2000 y Ado, el asunto es que la BD tiene contraseña, y cada vez que quiero abrir la la conexion me sale un mensaje que indica que la BD esta abierta en modo exclusivo por otro usuario, que debo hacer?
He probado colocando el Shared exclusive , pero nada

With vlo_Conexion
.Provider = "MICROSOFT.JET.OLEDB.4.0"
.Properties("Jet OLEDB:Database Password") = pvClave
.ConnectionString = "Data Source=" & pvBaseDatos & ";" & _
"User ID=" & pvUsuario
End With

De esta forma no he tenido problemas al compartir nada...