Copia uno o più file da una posizione all'altra.
Sintassi
object.CopyFile (source, destination)
Argomenti
FileSystemObject.Nell'esempio seguente viene illustrato l'uso del metodo CopyFile.
Esempio 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
Esempio 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\"