如何批量检验一个文件夹内的所有文件的MD5

vbeachx

如验证 .\bin\MOD\ 下所有文件
文件MD5与 .\modlist.txt 中的任意一条符合就进入下一个 直到验证完毕
没有一条符合就退出验证并报错
求程序代码

VC大圣

按照你的要求做完了

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
txt	文本型
a	文本型		0
n
索引	整数型
i	整数型
软件名	文本型
内容	字节集

txt ＝ 打开多文件对话框 (_启动窗口.取窗口句柄 (), “请选择要打开的文件”, “EXE文件|*.exe|”, )
i ＝ 1
如果真 (txt ≠ “”)
a ＝ 分割文本 (txt, “;”, )
计次循环首 (取数组成员数 (a), n)
索引 ＝ 超级列表框1.插入表项 (0, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (i))
超级列表框1.置标题 (索引, 1, a [n])
软件名 ＝ 取文本右边 (a [n], 取文本长度 (a [n]) － 倒找文本 (a [n], “\”, , 假))
超级列表框1.置标题 (索引, 2, 软件名)
超级列表框1.置标题 (索引, 3, 到大写 (取数据摘要 (到字节集 (a [n]))))
如果 (寻找文本 (“你的md5.txt目录”, 超级列表框1.取列标题 (3), , 假) ≠ -1)
超级列表框1.置标题 (索引, 4, “对”)
超级列表框1.置标题 (索引, 4, “错”)
i ＝ i ＋ 1
计次循环尾 ()
标签1.标题 ＝ “总共打开” ＋ 到文本 (n) ＋ “个文件”

子程序名	返回值类型	公开	备 注
_按钮2_被单击

i支持库列表	支持库注释
iext	扩展界面支持库一
dp1	数据操作支持库一

.版本 2<br /> .支持库 iext<br /> .支持库 dp1<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 txt, 文本型<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 n<br /> .局部变量 索引, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 软件名, 文本型<br /> .局部变量 内容, 字节集<br /> <br /> txt ＝ 打开多文件对话框 (_启动窗口.取窗口句柄 (), “请选择要打开的文件”, “EXE文件|*.exe|”, )<br /> i ＝ 1<br /> .如果真 (txt ≠ “”)<br />     a ＝ 分割文本 (txt, “;”, )<br />     .计次循环首 (取数组成员数 (a), n)<br />         索引 ＝ 超级列表框1.插入表项 (0, , , , , )<br />         超级列表框1.置标题 (索引, 0, 到文本 (i))<br />         超级列表框1.置标题 (索引, 1, a [n])<br />         软件名 ＝ 取文本右边 (a [n], 取文本长度 (a [n]) － 倒找文本 (a [n], “\”, , 假))<br />         超级列表框1.置标题 (索引, 2, 软件名)<br />         超级列表框1.置标题 (索引, 3, 到大写 (取数据摘要 (到字节集 (a [n]))))<br />         .如果 (寻找文本 (“你的md5.txt目录”, 超级列表框1.取列标题 (3), , 假) ≠ -1)<br />             超级列表框1.置标题 (索引, 4, “对”)<br />         .否则<br />             超级列表框1.置标题 (索引, 4, “错”)<br />         .如果结束<br />         i ＝ i ＋ 1<br /> <br />     .计次循环尾 ()<br />     标签1.标题 ＝ “总共打开” ＋ 到文本 (n) ＋ “个文件”<br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮2_被单击

如果可以  记得给好评啊！~
桌面.rar (540.77 KB, 下载次数: 132)

2015-12-26 16:56 上传

点击文件名下载附件




补充内容 (2015-12-26 17:02):
记得把
超级列表框1.置标题 (索引, 3, 到大写 (取数据摘要 (到字节集 (a [n]))))
修改成
超级列表框1.置标题 (索引, 3, 到大写 (取数据摘要 (读入文件 (a [n]))))

这一段我着急写错了！~

黑蟑螂

循环就可以了  取出文件夹内所有文件的MD5
然后按照文件各数，进行循环对比，对比成功，就进行下一次循环，记录下来所有对比成功的条数，如果循环完了，都没有能对比成功的，那就是全部都不匹配，那就提示，没有匹配的！思路这里，写出来也简单！但比较繁琐，对于初学者，可能弄不清楚，如果有点基础，做出来也非常容易的！

vbeachx

四六二十二软件 发表于 2015-12-26 16:08
循环就可以了  取出文件夹内所有文件的MD5
然后按照文件各数，进行循环对比，对比成功，就进行下一次循环 ...

求程序代码

易容术

校验MD5.rar (27.54 KB, 下载次数: 98)

2015-12-26 16:44 上传

点击文件名下载附件

canfeng11

VC大圣 发表于 2015-12-26 16:56
按照你的要求做完了

你这可以的,几乎每个帖子都有源码

VC大圣

canfeng11 发表于 2015-12-26 17:02
你这可以的,几乎每个帖子都有源码

嘻嘻，古如果可以就结贴吧