- @echo off
- ::逐字比对,效率很低。
- for /f "delims=" %%a in (a.txt) do (
- set "str=%%a"
- setlocal enabledelayedexpansion
- echo %%a|findstr "[0-9]">nul&&(call :loop&echo !result!)||echo 123456
- endlocal
- )
- pause&exit /b
- :loop
- set "chr=%str:~0,1%"
- echo %chr%|findstr "[0-9]">nul&&set result=%result%%chr%
- set "str=%str:~1%"
- if "%str%"=="" goto :eof
- goto loop
复制代码
|