jyswjjgdwtdtj

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
复制代码

没试

jyswjjgdwtdtj

回复 3# amio555


    那这么多干脆也别写脚本了
在windows文件管理器的文件夹右上角的搜索栏里输入个"."，会把所有文件夹和文件列举出来，直接手动复制来的最快
写脚本纯属把简单问题复杂化

jyswjjgdwtdtj

回复 6# amio555


    真的吗？十万个文件还不至于吧
那就开脚本吧