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

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

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

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

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

可以利用数组达到这样的效果

Local $Files[4] = ['.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

頂二楼的代码不错很简洁

		自动登录	找回密码
密码			加入