Visual Basic - PROBLEMAS DE RESPALDO DE BDD

Estoy realizando un sistema de información en Visual Basic 6.0 y lo estoy relacionando con una bdd hecha en Access 2000 a la que la tengo protegida con una contraseña y quiero respaldar la bdd desde el sistema pero no puedo por que se me presenta un error en el que me indica que no tengo permiso por parte de Access, solicito cualquier tipo de ayuda........

Sugerencia por que No copias la Base de Datos en otra Ruta y listo, claro cerrando la base de datos primero, esto lo hecho y me ha funcionado:
Private Sub cmdRespaldar_Click()
On Error GoTo Errores
If MsgBox("Desea Hacer el Respaldo ?", vbQuestion + vbDefaultButton1 + vbYesNo, Sistema) = vbYes Then
BDMAT.Close 'Cerramos la BD
Set BDMAT = Nothing
If Dir("C:\RespaldarBD", vbDirectory + vbHidden) = "" Then
MkDir "C:\RespaldarBD" 'Creamos la carpeta
SetAttr "C:\RespaldarBD", vbNormal
Else
ChDir "C:\RespaldarBD"
End If
Dim Origen, Destino
Origen = "C:\Mantenimiento\Materiales.mdb"
Destino = "C:\RespaldarBD\Materiales.mdb"
FileCopy Origen, Destino
Name "C:\RespaldarBD\Materiales.mdb" As "C:\RespaldarBD\CopiaMateriales.mdb"

MsgBox "Proceso Terminado Satisfactoriamente", vbInformation, Sistema
End If
ABD 'Abrimos de Nuevo nuestra Base de Datos
Unload Me
End Sub