用VBS实现PHP的md5
导读：收集整理的这篇文章主要介绍了用VBS实现PHP的md5_file函数代码，觉得挺不错的，现在分享给大家，也给大家做个参考。 复制代码 代码如下: Function md5_file(fi...
收集整理的这篇文章主要介绍了用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
参考链接：HashedData Object
原文：http://demon.tw/PRogramming/vbs-php-md5_file.htML 您可能感兴趣的文章:
- php实现MD5加密16位(不要默认的32位)
- php 的加密函数 md5,crypt,base64_encode 等使用介绍
- PHP中MD5函数使用实例代码
- php md5下16位和32位的实现代码
- php验证是否是md5编码的简单代码
声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！
若转载请注明出处： 用VBS实现PHP的md5
本文地址： https://pptw.com/jishu/609874.html