[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

在文本某行中插入字符(支持任意字符,保留空行)

本帖最后由 tkaven 于 2012-3-20 18:26 编辑
  1. @echo off&color a&setlocal enabledelayedexpansion
  2. ::用法 call :insert "要修改的本文文档路径" "在哪一行下面插入文字" "所要插入的文字"
  3. call :insert "C:\Users\Administrator\Desktop\新建 Text Document.txt" "5" "我好喜欢你啊,哈哈哈"
  4. endlocal
  5. echo 操作完成,按任意键退出&pause>nul
  6. exit
  7. :insert
  8. FOR /F %%l in ('find /c /v ""^< %1') do (
  9. for /l %%a in (1 1 %%l) do (
  10. set /p str=
  11. set /a 当前行=当前行+1
  12. if !当前行! GTR %~2 (
  13. echo.!str!
  14. ) else (
  15. if !当前行! EQU %~2 (echo.!str!&echo.%~3) else (echo.!str!)
  16. )
  17. set str=
  18. )
  19. )< %1 >> "%~d1%~p1%~n1_已处理%~x1"
  20. goto :eof
复制代码

TOP

返回列表