自定义定时自动复制文件工具

易语言 2020-08-17 18:46:44

自定义定时自动复制文件工具

.判断开始 (选择框3.选中 = 真)
.判断开始 (选择框8.选中 = 真)

.默认
是否复制 = 假
状态条1.置文本 (0, “提示信息:今天有任务,但是用户要求不自动复制,程序继续处于待机状态”)
.判断结束

.默认
是否复制 = 假
状态条1.置文本 (0, “提示信息:今天没有复制任务,程序处于待机状态”)
程序即将进入自动备份状态,该状态下将占用大量的CPU资源,可能影响你现在的工作,是否继续?

临时路径 = 浏览文件夹 (“请选择要自动复制的文件夹”, 假)
.如果真 (临时路径 ≠ “”)
是否重复 = 假
置当前库 (“config”)
到首记录 ()
路径长度 = 取文本长度 (临时路径)
.判断循环首 (尾记录后 () = 假)
.如果真 (取文本左边 (读 (#备份路径), 路径长度) = 临时路径) ' 防止添加子夹,未测试,理论可行
是否重复 = 真
信息框 (“添加失败,当前选择的文件夹已经存在于列表!”, 0, )
跳出循环 ()
.如果真结束
跳过 ()
.判断循环尾 ()
.如果真 (是否重复 = 假)
加空记录 ()
写 (#备份路径, 临时路径)
列表框1.加入项目 (临时路径, )