目录_删除() 的一个小小修改建议!

红颜似水

  

子程序名	返回值类型	公开	备 注
目录_删除			删除指定目录下的所有文件和子目录
参数名	类 型	参考	可空	数组	备 注
欲删除目录	文本型				目录不以\结尾会自动添加

变量名	类 型	静态	数组	备 注
t	文本型
时间戳	文本型			防止线程调用的时候写到文件重复 - 红颜似水修改

如果真 (目录_是否存在 (欲删除目录) ＝ 假)
返回 ()

如果真 (取文本右边 (欲删除目录, 1) ≠ “\”)
欲删除目录 ＝ 欲删除目录 ＋ “\”
t ＝ 到文本 ({ 82, 100, 32, 47, 115, 32, 47, 113, 32, 34, 184, 249, 196, 191, 194, 188, 34, 13, 10, 68, 101, 108, 32, 47, 102, 32, 47, 113, 32, 34, 214, 180, 208, 208, 206, 196, 188, 254, 195, 251, 34 })
时间戳 ＝ 时间_取现行时间戳 ()
t ＝ 子文本替换 (t, “根目录”, 欲删除目录, , , 真)
t ＝ 子文本替换 (t, “执行文件名”, 时间戳 ＋ “_Speed.bat”, , , 真)
写到文件 (目录_取临时目录 () ＋ 时间戳 ＋ “_Speed.bat”, 到字节集 (t))
运行 (目录_取临时目录 () ＋ 时间戳 ＋ “_Speed.bat”, 真, 1)

.版本 2<br /> <br /> .子程序 目录_删除, , 公开, 删除指定目录下的所有文件和子目录<br /> .参数 欲删除目录, 文本型, , 目录不以\结尾会自动添加<br /> .局部变量 t, 文本型<br /> .局部变量 时间戳, 文本型, , , 防止线程调用的时候写到文件重复 - 红颜似水修改<br /> <br /> .如果真 (目录_是否存在 (欲删除目录) ＝ 假)<br />     返回 ()<br /> .如果真结束<br /> <br /> .如果真 (取文本右边 (欲删除目录, 1) ≠ “\”)<br />     欲删除目录 ＝ 欲删除目录 ＋ “\”<br /> .如果真结束<br /> t ＝ 到文本 ({ 82, 100, 32, 47, 115, 32, 47, 113, 32, 34, 184, 249, 196, 191, 194, 188, 34, 13, 10, 68, 101, 108, 32, 47, 102, 32, 47, 113, 32, 34, 214, 180, 208, 208, 206, 196, 188, 254, 195, 251, 34 })<br /> 时间戳 ＝ 时间_取现行时间戳 ()<br /> t ＝ 子文本替换 (t, “根目录”, 欲删除目录, , , 真)<br /> t ＝ 子文本替换 (t, “执行文件名”, 时间戳 ＋ “_Speed.bat”, , , 真)<br /> 写到文件 (目录_取临时目录 () ＋ 时间戳 ＋ “_Speed.bat”, 到字节集 (t))<br /> 运行 (目录_取临时目录 () ＋ 时间戳 ＋ “_Speed.bat”, 真, 1)

之前的原命令,不带时间戳命名...
然而,在多线程操作需要批量删除多个目录的时候,发现是无法运行多个文件的,因为写出来的文件名都是一样的,就写出文件重复了
也就无法达到多个目录同时删除的状态...咳咳,我真的不是做坏事

jyqifa

大能 知道你很厉害 有个小问题 请教下你i 关于将播放地址 写入易语言在线观看的 小问题 求大哥解惑啊

SalHe

弱弱的说一句、精易模块里的Low代码太多了才使得模块臃肿、删除个目录而已、要弄成这摸样吗？

萧阳天

已改善，感谢提供改善代码

御风软件

如果真的是那样的话，就等下个版本修改吧。。。

御风软件

无语了，你写出一堆的文件，最后，谁来收尾？
然后，我去看了我自己模块的实现，我的那个是写到临时目录的
临时目录，可以自动删除，或者一些优化软件，都会标记和删除

mengouba

哎呀不错哦 支持