[问题求助] VBS批处理怎样复制文件夹（含子目录）并跳过已存在的重复文件？

zwbposer

我现在在D盘有个文件夹A，里面有文件，并且还有多级子目录，整个文件夹（含多层）经常更新，会有新文件，我就需要经常将更新的文件复制到E盘的B文件夹，而不复制已有的文件，并且文件目录结构跟A一样，比如说D:\A\word\xuexi\readme.txt，复制过去就是E:\B\word\xuexi\readme.txt,当复制新文件时跳过已有文件，只复制新文件，我在论坛搜索中找到下面这个VBS的命令代码，但不能复制子目录下的新文件，请大家帮帮我修改一下

On Error Resume Next
sFolder = "D:\A"
tFolder = "E:\B"

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set colSFile = objFSO.GetFolder(sFolder).Files
Set colSSubFolder = objFSO.GetFolder(sFolder).SubFolders

For Each File in colSFile
    File.Copy tFolder, False
Next

For Each Folder in colSSubFolder
    Folder.Copy tFolder, False
Ne

[ 本帖最后由 zwbposer 于 2011-2-14 11:48 编辑 ]

zwbposer

额，我完全新手，听不懂，可以提供完全代码嘛，我好对比

zwbposer

额，我完全新手，听不懂，可以提供完全代码嘛，我好对比

zwbposer

很感谢啊，但是你写的这个不能更新新文件啊，当我的目标文件夹下（包括下面的多级子目录）有新文件时，在运行你写的VBS时，就不会把新文件复制过去，而且你写的VBS只是把文件复制过去，我的目的是把整个文件夹都复制，包括它的文件结构目录，请指教

zwbposer

之前写的不是很清楚，你那个完成提示很好啊，怎么用的呢

zwbposer

我想用vbs啊，bat的已经有了

zwbposer

哈哈，非常感谢，用VBS主要是隐蔽些，不用弹黑框框

zwbposer

感谢大家的热心帮助，哈哈