查找文件夹下面的所有压缩包

司马崽

查找文件夹下面的所有压缩包 查找并删除那个压缩包

走一回

表述的有点问题:查找的是所有的压缩文件,删除的是那个(也就是一个)压缩文件.

帝火

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
压缩包目录	文本型
文件A	文本型		0
文件B	文本型		0
i

压缩包目录 ＝ 取运行目录 ()
文件_枚举 (压缩包目录, “*.zip”, 文件A, 假, , )
文件_枚举 (压缩包目录, “*.rar”, 文件B, 假, , )
计次循环首 (取数组成员数 (文件A), i)
文件_删除 (压缩包目录 ＋ “\” ＋ 文件A [i])
计次循环尾 ()
计次循环首 (取数组成员数 (文件B), i)
文件_删除 (压缩包目录 ＋ “\” ＋ 文件B [i])
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 压缩包目录, 文本型<br /> .局部变量 文件A, 文本型, , "0"<br /> .局部变量 文件B, 文本型, , "0"<br /> .局部变量 i<br /> <br /> 压缩包目录 ＝ 取运行目录 ()<br /> 文件_枚举 (压缩包目录, “*.zip”, 文件A, 假, , )<br /> 文件_枚举 (压缩包目录, “*.rar”, 文件B, 假, , )<br /> .计次循环首 (取数组成员数 (文件A), i)<br />     文件_删除 (压缩包目录 ＋ “\” ＋ 文件A <i>)<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (文件B), i)<br />     文件_删除 (压缩包目录 ＋ “\” ＋ 文件B <i>)<br /> .计次循环尾 ()

大司命

  

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

局_目录 ＝ 取运行目录 ()
文件_枚举EX (局_目录, , 真, &文件_枚举EX示例)

子程序名	返回值类型	公开	备 注
文件_枚举EX示例
参数名	类 型	参考	可空	数组	备 注
文件名	文本型
完整路径	文本型

变量名	类 型	静态	数组	备 注
局_扩展名	文本型

局_扩展名 ＝ 到小写 (文件_取扩展名 (完整路径))
如果真 (局_扩展名 ＝ “*.zip” 或 局_扩展名 ＝ “.rar” 或 局_扩展名 ＝ “.7z”)
删除文件 (完整路径)

.版本 2<br /> .局部变量 局_目录, 文本型<br /> 局_目录 ＝ 取运行目录 ()<br /> 文件_枚举EX (局_目录, , 真, &文件_枚举EX示例)<br /> .子程序 文件_枚举EX示例<br /> .参数 文件名, 文本型<br /> .参数 完整路径, 文本型<br /> .局部变量 局_扩展名, 文本型<br /> 局_扩展名 ＝ 到小写 (文件_取扩展名 (完整路径))<br /> .如果真 (局_扩展名 ＝ “*.zip” 或 局_扩展名 ＝ “.rar” 或 局_扩展名 ＝ “.7z”)<br />     删除文件 (完整路径)<br /> .如果真结束

精易模块~

司马崽

自己解决了