[已解决]dos如何在同级及子集所有txt文件的第一行后插入一行内容？

O.0

例：
源文件：
111
222
333
修改后：
111
444
222
333

zaqmlp

1. @echo off
   
2. set info=互助互利,支付宝扫码头像,感谢赞助
   
3. rem 有问题,可加QQ956535081及时沟通
   
4. title %info%
   
5. cd /d "%~dp0"
   
6. powershell -NoProfile -ExecutionPolicy bypass ^
   
7.     $n=1;^
   
8.     $str='444';^
   
9.     dir -r^|?{($_ -is [System.IO.FileInfo]) -and ($_.Extension -eq '.txt')}^|%%{^
   
10.         write-host $_.FullName;^
    
11.         $text=[IO.File]::ReadAllLines($_.FullName,[Text.Encoding]::Default);^
    
12.         if($text.Count -ge $n){^
    
13.             $text[$n-1]+=("`r`n"+$str);^
    
14.             [IO.File]::WriteAllLines($_.FullName, $text, [Text.Encoding]::Default);^
    
15.         };^
    
16.     };^
    
17.     write-host '%info%' -ForegroundColor green;
    
18. pause

复制代码

amwfjhh

1. @echo off
   
2. 
   
3. set /p "strInsert=Please input the insert content:"
   
4. 
   
5. for /f "tokens=*" %%i in ('dir /s/b/a-d *.txt') do (
   
6.         call :_Insert %%~si
   
7. )
   
8. 
   
9. pause
   
10. goto :EOF
    
11. 
    
12. :_Insert
    
13. (
    
14.         set /p=<nul>$.tmp
    
15.         echo,Current file : %1
    
16.         for /f "tokens=1,* delims=:" %%a in ('findstr /n .* %1') do (
    
17.                 echo,%%b>>$.tmp
    
18.                 if "%%a" equ "1" (
    
19.                         echo,%strInsert%>>$.tmp
    
20.                 )
    
21.         )
    
22.         type $.tmp
    
23.         move /y $.tmp %1
    
24.         echo,&echo,
    
25. 
    
26.         goto :EOF
    
27. )
    
28. 
    

复制代码

O.0

感谢两位大佬，已解决。

O.0

不好意思，新人帖子发错版块了。

amwfjhh

回复 5# O.0


    无妨。小问题。

zaqmlp

嗯，要用心，注意提示