Como hacer una copia de la base de datos, desde un botón
Tengo definida esta rutina, pero al ejecutar me da un error que dice "error de compilación, no se ha definido el tipo definido por el usuario"
Sub Comando6_Click()
Dim fso As Scripting.FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")
rutaOrigen = "D:\GAVTECH 2018\sistemas\repartos\"
rutadestino = "D:\GAVTECH 2018\sistemas\repartos\respaldos\"
Set fso = New FileSystemObject ' aqui creo la instancia
'Copio el directorio entero incluyendo sus archivos
fso.CopyFolder rutaOrigen, rutadestino
'finalmente Elimino el objeto
Set fso = Nothing
MsgBox "Archivos movidos correctamente", vbInformation, "OK"
End Sub
Respuesta de Abraham Valencia
1
1 respuesta más de otro experto
Respuesta de Programar Excel
1