Crear copia de base de datos

Para realizar la copia de una base, puedes hacerlo así:
Dim txtArch As String, fs As Object
txtArch = "C:\TuArchivoACopiar.mdb"
Set fs = CreateObject("Scripting.FileSystemObject")
fs.copyfile txtArch, "C:\Tu Carpeta\TuNuevaCopia.mdb", True

Hola, gracias por contestar, no soy muy bueno en esto, hice lo siguiente, cree un botón de comando en la vista diseño de un formulario, le borré su procedimiento de evento y le copié las instrucciones que me diste, me da un error de compilación " no se ha definido etiqueta" private sub comando26_click()
on error goto err comando26-click()
Borre la segunda linea y pasa, pero me dice que no encuentra el archivo a copiar, para lo cual, puse en archivo a copiar el nombre de mi base y en la ultima linea puse una carpeta de respaldo que tengo y un nuevo nombre de archivo para hacer la copia y me da ese error, ¿por favor me lo explicas como para un niño? Ja así lo puedo hacer, muchas gracias.