怎么用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函数”的学习就结束了，希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习，快去试试吧！若想继续学习更多相关知识，请继续关注编程网网站，小编会继续努力为大家带来更多实用的文章！