pcl_test

回复 5# CrLf

什么鬼

CrLf

gawk 也是个好选择：

@echo off
for /f "delims=" %%a in ('dir /a-d /b *.txt') do (
   gawk "FNR==2{print FILENAME};1" "%%a" >$
   ren $ "%%a"
)
复制代码

wzf1024

happy886rr大虾的处理的确会把行首的：删除，但容易扩展成把文件名插入任意行间；
pcl_test大虾的处理考虑周到，但只能把文件名插入1行和2行间，似乎扩展不了（可能我菜，不懂扩展）。
但目的达到，非常感谢各位大虾！！

CrLf

回复 3# pcl_test


    不需要用 more +1 吧，因为 set /p 已经取走一行了，另外，建议把 set /p a= 放到 setlocal 之后，否则应事先 set "a="

pcl_test

回复 2# happy886rr


要是首字符为:呢

pcl_test

@echo off
::取决more的限制
for /f "delims=" %%a in ('dir /a-d /b *.txt') do (
    (
      set/pa=
      setlocal enabledelayedexpansion
      echo;!a!
      endlocal
      echo;%%~na
      more +1
    )<"%%a">$
    move $ "%%a"
)
pause
复制代码

happy886rr

回复 1# wzf1024

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%A in ('dir /a-d /b /s *.txt') do (
	(for /f "tokens=1* delims=:" %%a in ('type "%%A"^|findstr /n .*') do (
		if %%a equ 2 (echo,%%~nA)
		echo,%%b
	))>"%%A.bak"
	del "%%A"
	ren "%%A.bak" "%%~nxA"
)
set /p =执行完毕!
复制代码