中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

如何用VBS實現PHP的sha1_file函數效果

發布時間:2021-08-11 22:21:54 來源:億速云 閱讀:82 作者:chen 欄目:開發技術

本篇內容主要講解“如何用VBS實現PHP的sha1_file函數效果”,感興趣的朋友不妨來看看。本文介紹的方法操作簡單快捷,實用性強。下面就讓小編來帶大家學習“如何用VBS實現PHP的sha1_file函數效果”吧!

復制代碼 代碼如下:

Function sha1_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 = 0 Stream.Type = 1 Stream.Open Stream.LoadFromFile filename Do Until Stream.EOS HashedData.Hash Stream.Read(1024) Loop If raw_output Then sha1_file = Utility.HexToBinary(HashedData.Value) Else sha1_file = HashedData.Value End If End Function

到此,相信大家對“如何用VBS實現PHP的sha1_file函數效果”有了更深的了解,不妨來實際操作一番吧!這里是億速云網站,更多相關內容可以進入相關頻道進行查詢,關注我們,繼續學習!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

汽车| 宁都县| 宝应县| 象州县| 甘南县| 奉新县| 湘潭县| 台州市| 西乌珠穆沁旗| 庆元县| 额尔古纳市| 衡山县| 扎兰屯市| 巴彦县| 富民县| 峨山| 新密市| 滨海县| 吉首市| 黄骅市| 寻乌县| 广东省| 永寿县| 克山县| 昌乐县| 故城县| 汾西县| 淮安市| 莲花县| 云梦县| 东方市| 大荔县| 双桥区| 蒲城县| 田林县| 西林县| 鲁山县| 都兰县| 眉山市| 获嘉县| 巴里|