¿Alguien puede decirme cómo copiar un archivo de una carpeta a otra usando vbscripting? Lo he intentado a continuación a partir de la información proporcionada en Internet.

dim filesys

set filesys=CreateObject("Scripting.FileSystemObject")

If filesys.FileExists("c:\sourcefolder\anyfile.txt") Then

filesys.CopyFile "c:\sourcefolder\anyfile.txt", "c:\destfolder\"

Cuando ejecuto este, obtengo que el permiso es denegado.