Salu2. El comando es el apropiado lo que hace pensar que alguno de los 2 path es incorrecto
FileCopy PathName, NewPathNameEjecuta el código hasta ese linea y mira cuales son las direcciones.
Yo hago las copias en un zip y te voy a dejar el cçodigo por si quieres usarlo. es un 
.bas.
El comando es:
ComprimeBase PathDeBase, PathYNombre 
PathDeBase = AppPath+NombreBase    'normalmente
Path.Y.Nombre = path y nombrede  archivo zip, 
sin extensiónAquí te dejo el .bas y las 2 
.dll necesarias
la 2 
.dll te hará falta meterlas en el system32 de todas tus aplicaciones. Tengo entendido que son gratuitas.
Espero no liarte mucho 

, este código lo cogí de alguna pag y lo modifiqué a mi gusto, así que toketealo un poco y veras que va de lujo. 
 
   
  