ahzz0028 发表于 2009-6-19 11:54:16

我要复制一个目录里，一些扩展名排除在外的怎么办

本帖最后由 ahzz0028 于 2009-6-20 23:11 编辑

我要复制一个目录里，一些扩展名排除在外的怎么办

lynfr8 发表于 2009-6-19 13:00:57

可以利用数组达到这样的效果
Local $Files = ['.au3', '.txt', '.jpg', '.exe']
DirCreate(@ScriptDir & "\backup")
For $eleFile In $Files
       FileCopy(@ScriptDir &"\*" & $eleFile, @ScriptDir & "\backup")
Next 以上是只复制au3、txt、jpg、exe4种类型的文件
你可以根据自己需要修改

虹客 发表于 2009-6-19 13:28:41

受教了....支持

menfan 发表于 2009-6-19 14:00:07

取配置文件也可以实现

即即 发表于 2009-6-19 14:57:58

2# lynfr8
不错，简单实用，学习了。

bbip 发表于 2009-6-20 12:24:03

頂二楼的代码不错 很简洁
页: [1]
查看完整版本: 我要复制一个目录里，一些扩展名排除在外的怎么办