思想之翼 当前离线
上尉
评分人数
pcl_test 当前离线
荣誉版主
@echo off setlocal enabledelayedexpansion cd /d "D:\数据\" for %%f in (*.txt) do ( set /p str=<"%%f" set n=0 for %%i in (!str!) do ( set /a n+=1 ) for /l %%a in (1 1 !n!) do call :aa %%a "%%f" move $ "%%f" ) pause & exit :aa set s= for /f "tokens=%1" %%b in ('type %2') do ( set "s=!s!%%b " ) >>$ echo,!s:~0,-1! goto :eof复制代码
TOP
xxpinqz (YiFeng)当前离线
中校
@echo off cd /d "d:\数据1\" for %%i in (*.txt) do ( setlocal enabledelayedexpansion for /f "delims=" %%a in (%%i) do ( set n=0 for %%b in (%%a) do ( set/a n+=1 for %%c in (!n!) do set "#!n!=!#%%c!%%b " ) ) for /l %%a in (1,1,!n!) do echo,!#%%a! endlocal )>"d:\数据2\%%i"复制代码
慕夜蓝化 当前离线
四级士官
@echo off&setlocal enabledelayedexpansion for %%a in (d:\数据\*.txt) do ( set/p str=<"%%a" for %%b in (!str!) do set/a n+=1 (for /l %%c in (1 1 !n!) do call :lines %%c "%%a") >%temp%\$ move /y %temp%\$ "%%a" set/a n=0 ) pause&exit :lines for /f "usebackq tokens=%1 delims= " %%i in ("%~2") do ( set/p=%%i <nul ) echo,&goto :eof复制代码