易语言验证文件夹下所有文件的MD5

2025-04-07 02:17:37
推荐回答(1个)
回答1:

.版本 2
.支持库 dp1

.子程序 __启动窗口_创建完毕
.局部变量 文本, 文本型
.局部变量 文件名, 文本型
.局部变量 路径, 文本型
.局部变量 MD5, 文本型, , "0"
.局部变量 计次, 整数型

文本 = 到文本 (读入文件 (“D:\modlist.txt”))
MD5 = 分割文本 (文本, #换行符, )
路径 = “D:\bin\MOD\”
文件名 = 寻找文件 (路径 + “*.*”, )
.判断循环首 (文件名 ≠ “”)
文本 = 取数据摘要 (读入文件 (路径 + 文件名))
.计次循环首 (取数组成员数 (MD5), 计次)
.如果真 (MD5 [计次] = 文本)
跳出循环 ()
.如果真结束

.计次循环尾 ()
.如果真 (计次 > 取数组成员数 (MD5))
信息框 (“没有找到” + 文件名 + “的MD5码”, #错误图标, )
结束 ()
.如果真结束
文件名 = 寻找文件 (, )
.判断循环尾 ()