- @echo off
- call ascmap $
- for /f "tokens=* delims=" %%i in ('dir /a-d/b *.dat') do (
- echo.正在处理:%%~i&endlocal&setlocal enabledelayedexpansion
- for /f "tokens=* usebackq delims=" %%a in ("%%~i") do (
- set "str=%%a"
- set "str=!str:%$:~0x01,1%= !"
- set "str=!str:%$:~0x02,1%= !"
- set "str=!str:%$:~0x03,1%= !"
- set "str=!str:%$:~0x1E,1%= !"
- set "str=!str:%$:~0x04,1%= !"
- set "str=!str:%$:~0x05,1%= !"
- set str=!str:-=m!
- for %%A in (!str!) do (
- set/a _%%A+=1
- if !_%%A! GEQ 3 (echo %%A 出现!_%%A!次&echo gtr 3 wait del is ...&echo.)
- )))
-
- :end ==============================================================
- endlocal&echo 按任意键退出&pause>nul
复制代码 你先测试一下
'dir /a-d/b *.dat' 可以改成'dir /a-d/b/s *.dat' 以搜索子文件夹
由于有Hex字符,打个包吧, 额又占用论坛资源了. |