Método CopyFile

Copia uno o más archivos de una ubicación a otra.

Sintaxis

object.CopyFile (source, destination)

Argumentos

• Object: necesario. Cualquier variable de objeto que devuelve un objeto FileSystemObject.
• Source: necesario. La ruta y el nombre del archivo que se va a copiar. El nombre de archivo (pero no la ruta) puede contener caracteres comodín.
• Destination: necesario. Ruta de la carpeta de destino en la que se debe realizar la copia del archivo. El destino no puede incluir caracteres comodín.

En el siguiente ejemplo se muestra el uso del método CopyFile:

Ejemplo 1:

Function CopySingleFile(source, destination)
    Dim fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.CopyFile source, destination
End Function

'Usage
CopySingleFile "C:\Temp\test.txt", "C:\Temp\dest\"

'Note – If Source file doesn’t exist, an empty file will be created at 
destination

Ejemplo 2:

Function CopyMultipleFiles(source, destination)
    Dim fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.CopyFile source, destination
End Function

' Usage
CopyMultipleFiles "C:\Temp\*.txt", "C:\Temp\Destination\"