精易模块V11.1.7 更新了(240802）

漠然°

感谢楼主分享

a11762931

dddddddddddddd

雾霭c

  

子程序名	返回值类型	公开	备 注
文件夹_复制			把某个文件夹下的所有文件复制到另一个文件夹里
参数名	类 型	参考	可空	数组	备 注
源目录	文本型				源目录，目录不以\结尾会自动添加
目标目录	文本型				目标目录，目录不以\结尾会自动添加
是否覆盖文件	整数型				可空。默认为直接覆盖。0=覆盖，非0不覆盖

变量名	类 型	静态	数组	备 注
局_子目录	文本型
局_文件名	文本型
局_旧目录	文本型
局_新目录	文本型

局_旧目录 ＝ 源目录
局_新目录 ＝ 目标目录
如果真 (取文本右边 (局_旧目录, 1) ≠ “\”)
局_旧目录 ＝ 局_旧目录 ＋ “\”
如果真 (取文本右边 (局_新目录, 1) ≠ “\”)
局_新目录 ＝ 局_新目录 ＋ “\”
如果真 (目录_是否存在 (局_新目录) ＝ 假)
目录_创建 (局_新目录)

局_文件名 ＝ 寻找文件 (局_旧目录 ＋ “*.*”, )
判断循环首 (局_文件名 ≠ “”)
文件_复制 (局_旧目录 ＋ 局_文件名, 局_新目录 ＋ 局_文件名, 是否覆盖文件)
处理事件 ()
局_文件名 ＝ 寻找文件 (, )
判断循环尾 ()
局_子目录 ＝ 寻找文件 (局_旧目录 ＋ “*.*”, #子目录 )
判断循环首 (局_子目录 ≠ “”)
如果真 (局_子目录 ≠ “.” 且 局_子目录 ≠ “..”)
处理事件 ()
文件夹_复制 (局_旧目录 ＋ 局_子目录, 局_新目录 ＋ 局_子目录)
局_子目录 ＝ 寻找文件 (, #子目录 )
判断循环尾 ()

.版本 2<br /> <br /> .子程序 文件夹_复制, , 公开, 把某个文件夹下的所有文件复制到另一个文件夹里<br /> .参数 源目录, 文本型, , 源目录，目录不以\结尾会自动添加<br /> .参数 目标目录, 文本型, 可空, 目标目录，目录不以\结尾会自动添加<br /> .参数 是否覆盖文件, 整数型, 可空, 可空。默认为直接覆盖。0=覆盖，非0不覆盖<br /> .局部变量 局_子目录, 文本型<br /> .局部变量 局_文件名, 文本型<br /> .局部变量 局_旧目录, 文本型<br /> .局部变量 局_新目录, 文本型<br /> <br /> 局_旧目录 ＝ 源目录<br /> 局_新目录 ＝ 目标目录<br /> .如果真 (取文本右边 (局_旧目录, 1) ≠ “\”)<br />     局_旧目录 ＝ 局_旧目录 ＋ “\”<br /> .如果真结束<br /> .如果真 (取文本右边 (局_新目录, 1) ≠ “\”)<br />     局_新目录 ＝ 局_新目录 ＋ “\”<br /> .如果真结束<br /> .如果真 (目录_是否存在 (局_新目录) ＝ 假)<br />     目录_创建 (局_新目录)<br /> .如果真结束<br /> <br /> 局_文件名 ＝ 寻找文件 (局_旧目录 ＋ “*.*”, )<br /> <br /> .判断循环首 (局_文件名 ≠ “”)<br />     文件_复制 (局_旧目录 ＋ 局_文件名, 局_新目录 ＋ 局_文件名, 是否覆盖文件)<br />     处理事件 ()<br />     局_文件名 ＝ 寻找文件 (, )<br /> .判断循环尾 ()<br /> 局_子目录 ＝ 寻找文件 (局_旧目录 ＋ “*.*”, #子目录)<br /> .判断循环首 (局_子目录 ≠ “”)<br />     .如果真 (局_子目录 ≠ “.” 且 局_子目录 ≠ “..”)<br />         处理事件 ()<br />         文件夹_复制 (局_旧目录 ＋ 局_子目录, 局_新目录 ＋ 局_子目录)<br />     .如果真结束<br />     局_子目录 ＝ 寻找文件 (, #子目录)<br /> .判断循环尾 ()

提交一个更新，原精易模块里面的"目录_更新"在复制文件夹的时候碰到文件夹名称如果是以"."开头的，例如".123"的文件夹就会忽略跳过不去进行复制，修改后的就没有这个问题啦

hnpjxsw

感谢分享！！！！！！！！

anluoxi520

感谢分享！！！！！！！！

冷淡的

12333333333333333

ppddxd

试试看新版本

mingyunzhidao

666666666666

星有灵心

只要你一声令下，你就是新的精易模块官方

aa583

太好了 神神神神神神神神神神神神神神神神神神神神神神