...Por que no pruebas PRIMERO, poniendo los valores exactos...
En vez de: App.Path & "\Prueba\db1.mdb"
PRUEBA CON \\SERVER\...\Prueba\db1.mdb...etc etc
...O prueba tambien directamente con un archivo en tu mismo Computador...
FileCopy "c:\Mis Documentos\archivoprueba.txt", "c:\archivoprueba.txt"
...Fijate bien que el archivo ORIGEN realmente exista, a su vez que la carpeta DESTINO tambien exista, pon los nombres de los archivos con todo y EXTENSION (.txt, .mdb)... ESPERO TE SIRVAN ESTOS TIPS
...Saludos!