Dim fs ' 先声明一个变体型Set fs = CreateObject("Scripting.FileSystemObject") '创建文件系统对象fs fs.copyfile "D:\copyto.txt", "E:\" '使用该对象的copyfile方法将源文件复制到目标文件
