内容搜索文件工具并替换内容

易语言 2020-03-22 17:15:13

内容搜索文件工具并替换内容

.子程序 文件_枚举, 整数型, 公开, 枚举某个目录下的指定类型文件;成功返回文件数量;
.参数 欲寻找的目录, 文本型, , 文件目录
.参数 欲寻找的文件名, 文本型, , 如果寻找全部文件可以填入*.*,或*.txt只找txt文件
.参数 文件数组, 文本型, 参考 可空 数组, 用于装载文件数组的变量;把寻找到的文件都放在这个数组里,并返回;
.参数 是否带路径, 逻辑型, 可空, 默认为假; 真=带目录路径,如C:\012.txt; 假=不带,如 012.txt;
.局部变量 局_文件名, 文本型
.局部变量 局_目录, 文本型

局_目录 = 欲寻找的目录
.如果真 (取文本右边 (局_目录, 1) ≠ “\”)
局_目录 = 局_目录 + “\”
.如果真结束
局_文件名 = 寻找文件 (局_目录 + 欲寻找的文件名, )
.判断循环首 (局_文件名 ≠ “”)
.如果 (是否带路径)
加入成员 (文件数组, 局_目录 + 局_文件名)
.否则
加入成员 (文件数组, 局_文件名)
.如果结束
局_文件名 = 寻找文件 (, )
.判断循环尾 ()
返回 (取数组成员数 (文件数组))