本帖最后由 jyswjjgdwtdtj 于 2023-3-13 20:44 编辑
vbs可否?
不知道好不好用- set fso=createobject("scripting.filesystemobject")
- set folderfrom=fso.getfolder("C:\fromfolder")
- folderto="D:\tofolder"
- filetree folderfrom
- sub filetree(fdobject)
- set files=fdobject.files
- set folders=fdobject.subfolders
- for each file in files
- if not fso.fileexists(folderto&"\"&file.name) then
- fso.copyfile(file.path,folderto&"\"&file.name,false)
- end if
- next
- for each folder in folders
- call filetree(folder)
- next
- end sub
复制代码 没试 |