用VBS实现PHP的md5_file函数代码
更新时间：2011年01月21日 22:43:29 作者：
用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
相关文章
利用VBS修改二进制文件HEX数据。第一个参数为原文件，第二个参数为修改后的文件，第三个参数为原HEX值，第四个参数为修改后的HEX值2013-07-07
bs脚本的功能呢是很多的，不过有时候我们只需要其中的某些功能，今天我突然想研究下怎么用vbs脚本实现添加程序到自启动项2013-01-01
hosts文件存储了IP地址与域名的映射。因为有的时候需要经常性地配置hosts文件，因此这段时间我琢磨了一套傻瓜化的hosts文件配置方案，记录如下2019-09-09
VBScript的入门学习资料...2006-11-11
让IIS建立的站点默认是.net 2.0的,而不是.net 1.1的代码
让IIS建立的站点默认是.net 2.0的,而不是.net 1.1的,没有使用WMI,所以在操作前先得停止IIS相关服务2008-07-07
这篇文章主要介绍了Vbs脚本经典教材,其实最全的资料还是MSDN，不过脚本之家已经为大家整理了一些，也可以查看2014-08-08
很多人都觉得微软的VBScript功能比较弱，如果从开发自动化测试的角度来讲，更是不可能了。从我对VBScript脚本的了解来看，对一个脚本是否可以做自动化测试需要这个测试人员具备两方面的知识，第一个，就是对VBScript脚本开发语言精通，要了解VBScript的核心技术如何更广泛的应用；第二个，就是要有自动化的测试思想，这个一定得是做过测试工作的能够了解的多一些。2008-03-03
VBS教程：VBscript属性-Number 属性...2006-11-11
VBS基础编程教程 (第6篇)...2007-12-12
VBS教程：属性-Count 属性...2006-11-11
最新评论