Error 76 ruta de acceso
Publicado: Vie Feb 27, 2015 6:49 pm
Hola,
He creado un botón que me creará una copia de mi base de datos, la ruta es correcta, pero me da error 76, como si no encontrará el fichero o la ruta fuera errónea el código que he puesto es el siguiente:
Private Sub Comando80_Click()
Dim txtArch As String, fs As Object
txtArch = "C:\Usuarios\usuario\Mis Documentos\BD Gestion empleados\2015\gestion empleados 2015.accdb"
Set fs = CreateObject("Scripting.FileSystemObject")
fs.copyfile txtArch, "C:\Usuarios\usuario\Mis Documentos\BD Gestion empleados\copia seguridad\gestion empleados 2015.accdb", True
End Sub
Podrías indicarme dónde esta el error, o bien otro código que me realice la función.
Gracias
He creado un botón que me creará una copia de mi base de datos, la ruta es correcta, pero me da error 76, como si no encontrará el fichero o la ruta fuera errónea el código que he puesto es el siguiente:
Private Sub Comando80_Click()
Dim txtArch As String, fs As Object
txtArch = "C:\Usuarios\usuario\Mis Documentos\BD Gestion empleados\2015\gestion empleados 2015.accdb"
Set fs = CreateObject("Scripting.FileSystemObject")
fs.copyfile txtArch, "C:\Usuarios\usuario\Mis Documentos\BD Gestion empleados\copia seguridad\gestion empleados 2015.accdb", True
End Sub
Podrías indicarme dónde esta el error, o bien otro código que me realice la función.
Gracias