怎么用VBS实现PHP的md5_file函数-创新互联

这篇文章主要介绍“怎么用VBS实现PHP的md5_file函数”,在日常操作中,相信很多人在怎么用VBS实现PHP的md5_file函数问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”怎么用VBS实现PHP的md5_file函数”的疑惑有所帮助!接下来,请跟着小编一起来学习吧!

十余年建站经验, 网站建设、网站制作客户的见证与正确选择。成都创新互联提供完善的营销型网页建站明细报价表。后期开发更加便捷高效,我们致力于追求更美、更快、更规范。

复制代码 代码如下:

Function md5_file(filename, raw_output) 
Dim HashedData, Utility, Stream 
Set HashedData = CreateObject("CAPICOM.HashedData") 
Set Utility = CreateObject("CAPICOM.Utilities") 
Set Stream = CreateObject("ADODB.Stream") 
HashedData.Algorithm = 3 
Stream.Type = 1 
Stream.Open 
Stream.LoadFromFile filename 
Do Until Stream.EOS 
HashedData.Hash Stream.Read(1024) 
Loop 
If raw_output Then 
md5_file = Utility.HexToBinary(HashedData.Value) 
Else 
md5_file = HashedData.Value 
End If 
End Function

到此,关于“怎么用VBS实现PHP的md5_file函数”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注创新互联网站,小编会继续努力为大家带来更多实用的文章!

文章题目:怎么用VBS实现PHP的md5_file函数-创新互联
网站URL:https://www.cdcxhl.com/article30/djchso.html

成都网站建设公司_创新互联,为您提供软件开发定制网站静态网站网站策划云服务器品牌网站制作

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联

成都做网站