VB复制整个文件夹

Const OverWriteFiles = True
Private Sub Form_Activate()
Set objFSO = CreateObject(“scripting.FileSystemObject”)
objFSO.CopyFolder “e:\a”, “e:\b”, OverWriteFiles
End Sub



One thought on “VB复制整个文件夹

发表评论

电子邮件地址不会被公开。 必填项已用*标注