回复 3# 思想之翼
将代码保存在需要处理的txt文档的位置运行- @echo off&md New 2>nul
- for /f "delims=" %%a in ('dir /a-d /b *.txt') do (
- set str=0123456789
- (for /f "usebackq tokens=1,2 delims==" %%b in ("%%a") do (
- set num=%%c
- setlocal enabledelayedexpansion
- call :lp
- echo,%%b=!str!&endlocal
- ))>"New\%%a"
- )
- goto :eof
-
- :lp
- if not "!num:~%n%!"=="" (
- for %%a in ("!num:~%n%,1!") do set str=!str:%%~a=!
- set/a n+=1&goto :lp
- )
复制代码 PS:"高手"、"大师"听起来很扎眼,建议楼主以后尽量不用。 |