Kopiert eine oder mehrere Dateien von einem Speicherort in einen anderen.
Syntax
object.CopyFile (source, destination)
Argumente
FileSystemObject-Objekt zurückgibt.Das folgende Beispiel veranschaulicht die Verwendung der CopyFile-Methode:
Beispiel 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
Beispiel 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\"