[推薦] RHash (hash 計算工具 內建SFV)
軟體名稱：RHash
軟體資訊：windows linux 免安裝
軟體功能：hash 值計算
軟體特色: 體積小 速度快 有32/64版本
官方網站：http://sourceforge.net/projects/rhash/
下載連結：http://sourceforge.net/projects/rhash/files/rhash/1.2.9/
推薦原因：本來是找算 ED2K 值軟體 找到這套 又同時內建 SFV 功能 很方便
誰適合用：檔案 hash 值不對就覺得毛毛的人(?
誰不適合用：這套得在 cmd 下使用 不過 有寫了簡單的 VBS 呼叫程式 也是很方便
使用感想: 這套似乎不支援 unicode 除此之外都很滿意
附註: 下面是自己寫的右鍵呼叫選單程式
以下是登錄檔 存成 *.reg 後 點2下匯入(VBS的路徑位置需自己設定)
檔案開始
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\*\shell\RHash]
[HKEY_CLASSES_ROOT\*\shell\RHash\command]
@="wscript.exe C:\\portable\\RHash.vbs \"%1\""
檔案結束
以下是 VBS 檔案內容 存成 RHash.vbs (建議值 OR 跟登錄檔內相同也可)
記得要改 RHash 主程式的位置!!
檔案開始
Set WshShell = WScript.CreateObject("WScript.Shell")
Dim argument(2)
argument(0) = "C:\portable\RHash-1.2.9-win64\rhash.exe" 'application path
Dim argumentselect
Do
argumentselect = InputBox("1 = MD5" &Chr(10) & _
"2 = SHA1" &Chr(10) & _
"3 = ED2K" &Chr(10) & _
"4 = CHECK" &Chr(10) & _
"Select Feature (Other Number=Exit)" , _
"Input A Number For Your Choice")
Loop While IsNumeric(argumentselect) = Flase
Select Case argumentselect
Case 1
argument(1) = "-M"
Case 2
argument(1) = "-H"
Case 3
argument(1) = "-E"
Case 4
argument(1) = "-c"
Case else
WScript.Quit
End select
argument(2) = WScript.Arguments.Item(0)
Return = WshShell.run("%COMSPEC% /u /k" &Chr(32) &argument(0) _
&Chr(32) &argument(1) _
&Chr(32) &Chr(34) &argument(2) &Chr(34) , 1 , True)
檔案結束
本著作依據 Creative Commons 姓名標示-非商業性-相同方式分享 授權條款為授權
http://creativecommons.org/licenses/by-nc-sa/3.0/tw/
2015/10/21 update:
https://github.com/belldandy-syaorin/script/tree/master/rhash
目錄變更
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 125.224.34.182
推
08/11 03:04, , 1F
08/11 03:04, 1F
→
09/20 02:47, , 2F
09/20 02:47, 2F
https://github.com/belldandy-syaorin/script/blob/master/RHash.vbs
(VBS) 內建安裝右鍵選單
※ 編輯: Bellkna 來自: 111.252.205.109 (09/20 19:16)
※ 編輯: Bellkna 來自: 111.252.209.162 (11/02 20:18)
※ 編輯: Bellkna (114.33.123.103), 10/21/2015 20:50:42