[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 tmpuser 于 2022-9-7 17:08 编辑

回复 13# Blitz


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

TOP

回复 16# tmpuser


    看看txt的编码是不是ansi

TOP

双字节字符后8位会串到下一个键
加个判断就好了
  1. @echo off
  2. set/p=拖入文件:<nul
  3. for /f "delims=" %%I in (
  4.     '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{$_}}))"'
  5. ) do set "wj=%%~I"&echo=
  6. echo=%wj%
  7. pause
复制代码
1

评分人数

TOP

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

TOP

返回列表