Question

VB复制文件代码

就是在刚打开这个文件初始化时让他自动复制此文件夹下的一个文件到一个地方？这个复制代码谁会？？

Answer 1

FileCopy

Dim SourceFile, DestinationFile
SourceFile = "SRCFILE" ' 指定源文件名。
DestinationFile = "DESTFILE" ' 指定目的文件名。
FileCopy SourceFile, DestinationFile ' 将源文件的内容复制到目的文件中。

注意:如果想要对一个已打开的文件使用 FileCopy 语句，则会产生错误。

Answer 2

filecopy "c:\1.txt" "d:\2.txt"
这样用。

Answer 3

Private Sub Command2_Click() '复制文件
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFolder "C:\WEXAM", "D:\w"
end sub