- 帖子
- 11
- 积分
- 180
- 技术
- 0
- 捐助
- 0
- 注册时间
- 2008-9-12
|
回复 18# idwma
厉害了老铁 ,实在太感谢了 ,这个乱码整了一天都没弄好。前几天折腾了一个vb程序,但是计算sha256太卡,于是继续回来折腾bat了。
以下是完整代码,功能是拖入文件后计算hash值并复制到剪贴板,送给有同样需求的人:
@echo off
setlocal enabledelayedexpansion
:zzz
set /p=<nul
for /f "delims=" %%i in (
'powershell "[text.encoding]::default.getstring([byte[]]($(do {[int][console]::ReadKey(1).KeyChar} while ([console]::KeyAvailable))|foreach{if([int]$_ -gt 255){[bitconverter]::GetBytes([int]$_)[0]}else{$_}}))"'
) do echo %%~i&for /f "skip=1 tokens=*" %%a in ('certutil -hashfile %%i SHA256') do (
echo;!var!<nul|clip
set var=%%a
set var=!var: =!
echo !var!
)
echo.
goto zzz |
|