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

[文本处理] 批处理如何获取字符列表出现次数最多的字符?

  1. echo off
  2. for /f "delims=\ tokens=5" %%i in ('REG QUERY "HKLM\SYSTEM\CurrentControlSet\Services"') do (
  3. for /f "delims=_ tokens=2" %%k in ("%%i") do (
  4. echo %%k
  5. ))
复制代码

4b59e
4b59e
4b59e
4b59e
4b59e
Rec
GPIO2
GPIO2

想要4b59e,明显4b59e最多

本帖最后由 WHY 于 2021-9-7 20:25 编辑
  1. $arr = dir HKLM:\SYSTEM\CurrentControlSet\Services | ?{ $a = $_.Name.Split('\')[-1].Split('_'); $a.Count -ge 2 } | forEach{$a[1]} | group | sort Count -Desc;
  2. '' + $arr[0].Count + ' ' + $arr[0].Name
复制代码

TOP

回复 16# hentai87
  1. @echo off
  2. for /f "tokens=5 delims=\" %%i in ('reg query "HKLM\SYSTEM\CurrentControlSet\Services"') do (
  3.     for /f "tokens=2 delims=_" %%j in ("%%i") do (
  4.         set /a count_%%j+=1
  5.     )
  6. )
  7. set count=0
  8. for /f "tokens=2-3 delims=_=" %%a in ('set count_') do (
  9.     if %%b gtr !count! (
  10.         set "count=%%b"
  11.         set "name=%%a"
  12.     )
  13. )
  14. echo !name!: !count!
  15. endlocal
  16. pause
复制代码
1

评分人数

我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

本帖最后由 WHY 于 2021-9-7 19:42 编辑
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set "Max=0"
  4. for /f "delims=" %%i in ('REG QUERY "HKLM\SYSTEM\CurrentControlSet\Services"') do (
  5.     for /f "tokens=2 delims=_" %%k in ("%%~nxi") do (
  6.         set /a _%%k+=1
  7.         if !_%%k! GTR !Max! set "Max=!_%%k!" & set "Name=%%k"
  8.     )
  9. )
  10. echo;!Max! !Name!
  11. pause
复制代码
1

评分人数

TOP

回复 18# hentai87


if 后面 把引号去掉

TOP

回复 17# newswan

结果不对。。不是次数最多的

TOP

最后
echo %name%

TOP

回复 15# newswan

加了in结果为空
    echo off
setlocal   ENABLEDELAYEDEXPANSION

for /f "delims=\ tokens=5" %%i in ('REG QUERY "HKLM\SYSTEM\CurrentControlSet\Services"') do (
    for /f "delims=_ tokens=2" %%k in ("%%i") do (
        set /a count_%%k+=1
    )
)
set count=0
for /f "usebackq tokens=2-3 delims=_=" %%a in (`set count_`) do (
    if "%%b" GTR "!count!" (
        set count=%%b
        set name=%%a
    )
)
pause

TOP

少 了 in in in in in

TOP

回复 13# newswan


    还是闪退

TOP

本帖最后由 newswan 于 2021-9-6 23:39 编辑
  1. echo off
  2. setlocal   ENABLEDELAYEDEXPANSION
  3. for /f "delims=\ tokens=5" %%i in ('REG QUERY "HKLM\SYSTEM\CurrentControlSet\Services"') do (
  4.     for /f "delims=_ tokens=2" %%k in ("%%i") do (
  5.         set /a count_%%k+=1
  6.     )
  7. )
  8. set count=0
  9. for /f "usebackq tokens=2-3 delims=_=" %%a in (`set count_`) do (
  10.     echo %%a %%b
  11.     if %%b GTR !count! (
  12.         set count=%%b
  13.         set name=%%a
  14.     )
  15. )
  16. echo %name%
复制代码

TOP

REG QUERY的输出
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\WpnService
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\WpnUserService_4b59e
。。。

TOP

回复 5# newswan


    是不是不全,都没有运行REG QUERY,这段应该放哪里

TOP

echo off
setlocal   ENABLEDELAYEDEXPANSION
for /f "usebackq tokens=2-3 delims=_=" %%a (`set count_`) do (
if %%b GTR !count! (
set count=%%b
set name=%%a
)
)
pause

TOP

回复 8# newswan


    还是闪退

TOP

返回列表