|
25精币
.版本 2
.子程序 _按钮1_被单击
.局部变量 a, 正则表达式类
.局部变量 目录数组, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 目录文本, 文本型
目录_枚举子目录 (“E:\8925\a2”, 目录数组, 假, )
目录文本 = 数组_合并 (目录数组, #换行符)
a.创建 (“[a-zA-Z]+\d+”, 目录文本, , , , )
.计次循环首 (a.取匹配数量 (), i)
编辑框1.加入文本 (a.取匹配文本 (i, ) + #换行符)
rar_初始化 (“C:\Program Files\WinRAR\Rar.exe”, )
rar_压缩 (“E:\8925\a2” + “\” + a.取匹配文本 (i, ), “E:\8925\a2” + “\” + a.取匹配文本 (i, ) + “.rar”, “mima”, , , , )
目录_删除目录 (“E:\8925\a2” + “\” + a.取匹配文本 (i, ))
.计次循环尾 ()
目录_删除目录 (“E:\8925\a2” + “\” + a.取匹配文本 (i, )) 这一串代码怎么不生效呢,原文件夹没有删掉
|
最佳答案
查看完整内容
方法一:删除单个文件夹
删除目录 ("C:\myfolder", 真, 真)
在这个例子中,“删除目录”命令将删除C盘根目录下的"myfolder"文件夹。第二个参数设置为真,表示如果文件夹不存在,不会发生错误。第三个参数也设置为真,表示删除文件夹及其所有子目录和文件。
方法二:删除多个文件夹
删除目录 ("C:\myfolder", 真, 真)
删除目录 ("D:\hisfolder", 真, 真)
在这个例子中,“删除目录”命令将删除C盘和D盘上的"myfolder"和"hisfolde ...
|