VBS中怎么调用CAPICOM对象，针对这个问题，这篇文章详细介绍了相对应的分析和解答，希望可以帮助更多想解决这个问题的小伙伴找到更简单易行的方法。

发展壮大离不开广大客户长期以来的信赖与支持，我们将始终秉承“诚信为本、服务至上”的服务理念，坚持“二合一”的优良服务模式，真诚服务每家企业，认真做好每个细节，不断完善自我，成就企业，实现共赢。行业涉及楼梯护栏等，在重庆网站建设公司、成都全网营销推广、WAP手机网站、VI设计、软件开发等项目上具有丰富的设计经验。

 代码如下:

Const CAPICOM_HASH_ALGORITHM_MD2 = 1 
Const CAPICOM_HASH_ALGORITHM_MD4 = 2 
Const CAPICOM_HASH_ALGORITHM_MD5 = 3 
Const CAPICOM_HASH_ALGORITHM_SHA1 = 0 
Const CAPICOM_HASH_ALGORITHM_SHA_256 = 4 
Const CAPICOM_HASH_ALGORITHM_SHA_384 = 5 
Const CAPICOM_HASH_ALGORITHM_SHA_512 = 6 
Dim HashedData 
Set HashedData = CreateObject("CAPICOM.HashedData") 
HashedData.Algorithm = CAPICOM_HASH_ALGORITHM_SHA1 
HashedData.Hash "Demon" 
WScript.Echo HashedData.Value

需要指出的是VBS的字符串是Unicode编码的，例如上面的字符串"Demon"在内存中的十六进制是4400 6500 6D00 6F00 6E00，这些Hash算法只关心数据的二进制值，不同编码的同一字符串的二进制值是不一样的，这就是算出来的值和PHP中（PHP默认的编码是UTF-8）的sha1("Demon")的值不一样的原因。

关于VBS中怎么调用CAPICOM对象问题的解答就分享到这里了，希望以上内容可以对大家有一定的帮助，如果你还有很多疑惑没有解开，可以关注创新互联行业资讯频道了解更多相关知识。

文章名称：VBS中怎么调用CAPICOM对象-创新互联
URL链接：http://azwzsj.com/article/dgjohp.html