tmpuser

回复 13# Blitz


   万分感谢大兄弟，真的可以。只是中文名会乱码无法计算，不知道是不是我系统的问题，PowerShell的编码已经改成936了依然乱码

Blitz

回复 16# tmpuser


    看看txt的编码是不是ansi

idwma

双字节字符后8位会串到下一个键
加个判断就好了

@echo off
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 set "wj=%%~I"&echo=
echo=%wj%
pause
复制代码

tmpuser

回复 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