CopyFile 方法

将一个或多个文件从一个位置复制到另一个位置。

语法

object.CopyFile (source, destination)

参数

• Object：必需。返回 FileSystemObject 对象的任何对象变量。
• Source：必需。要复制的文件的路径和名称。文件名可以包含通配符（但路径不可以）。
• Destination：必需。必须在其中复制文件的目标文件夹的路径。Destination 不能包含通配符。

以下示例说明了 CopyFile 方法的用法：

示例 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

示例 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\"