Eror 3705 la operacionno esta permitida si el objeto esta abierto...

[agos_00_15]

Hola a todos! tengo un problema, a hora de ejecutar el programa me salta el error que la operacion no esta permitida si el objeto esta abierto.

Soy nueva en todo esto y necesito de su ayuda.
En la linea q me salta error es:

Public Sub conexion()
With a
.CursorLocation = adUseClient
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\Ago\Desktop\SISTEMAINTERNET2003.md b;Persist Security Info=False"
End With