【多线程枚举文件-56w文件目录8秒枚举完成】支持Unicode文本

深圳梦

@Bszk 大佬的原贴：
[易源码分享] [分享源码] 多线程枚举文件 - 56w文件目录8秒枚举完成
https://bbs.125.la/forum.php?mod=viewthread&tid=14690086&highlight=56
结合：
1.Unicode全功能模块@simor3
[易源码分享] [分享源码] 【完全开源】Unicode全功能模块，用过的人都说好
https://bbs.125.la/forum.php?mod=viewthread&tid=14732455

2.通用型寻找文件@福仔
[易语言纯源码] [分享源码] 通用型寻找文件,文件枚举
https://bbs.125.la/forum.php?mod=viewthread&tid=14315016

拼出来的，速度一样的快，不崩，支持Unicode文本路径和文件名。


另：下面取Unicode文本路径文件MD5（字节集形式）取出来不对。

  

子程序名	返回值类型	公开	备 注
取文件MD5	文本型
参数名	类 型	参考	可空	数组	备 注
wjm	字节集

变量名	类 型	静态	数组	备 注
m	整数型
md5	CMD5
n	整数型

CoInitialize (0)
n ＝ 打开文件_un (wjm, #读入, )
如果真 (n ＝ 0)
CoUninitialize ()
md5.开始 ()
判断循环首 (取反 (是否在文件尾 (n, )))
m ＝ m ＋ 1
md5.追加数据_字节集 (读入字节集_un (n, 8388608))
判断循环尾 ()
md5.完成 ()
关闭文件_un (n)
返回 (到大写 (md5.取结果 ()))
CoUninitialize ()

.版本 2<br /> <br /> .子程序 取文件MD5, 文本型<br /> .参数 wjm, 字节集<br /> .局部变量 m, 整数型<br /> .局部变量 md5, CMD5<br /> .局部变量 n, 整数型<br /> <br /> CoInitialize (0)<br /> n ＝ 打开文件_un (wjm, #读入, )<br /> .如果真 (n ＝ 0)<br />     CoUninitialize ()<br /> .如果真结束<br /> md5.开始 ()<br /> .判断循环首 (取反 (是否在文件尾 (n, )))<br />     m ＝ m ＋ 1<br />     md5.追加数据_字节集 (读入字节集_un (n, 8388608))<br /> .判断循环尾 ()<br /> md5.完成 ()<br /> 关闭文件_un (n)<br /> 返回 (到大写 (md5.取结果 ()))<br /> CoUninitialize ()

深圳梦

附件重新上传

LanceMoe

支持开源~！感谢分享

zifeiyu

666666666666666666666666

lxz159464

效果觉得不满意的话，请自己更换相关图片

爱易经精

感谢大神分享~！

tian89

我知道的是好像只有对象版本的才会使用CoInitialize (0)和CoUninitialize ()这两函数你在获取MD5上使用这个有什么说法没有？

leeweeee

有bug，部分目录无法枚举 首字母相同的目录只枚举第一个

wanghua2015

感谢分享！

ctry78985

感谢分享

pnf

支持开源~！感谢分享