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

下面的批处理只会修改本文件夹下的TXT文本(不包括子文件下的TXT文本)
  1. @echo off&chcp 936>nul&color 0A
  2. mkdir tempFile 2>nul
  3. for %%i in (*.txt) do (
  4. cd.>.\tempFile\%%~ni.temp
  5. call :subFun %%i
  6. )
  7. pushd ".\tempFile"
  8. ren *.temp *.txt 1>nul
  9. popd
  10. move /y .\tempFile\*.txt .\ 1>nul
  11. rd /q /s tempFile
  12. echo 处理完毕,按任意键结束...
  13. pause>nul&exit
  14. ::第一个参数为文件名
  15. :subFun
  16. setlocal EnableDelayedExpansion
  17. set "b=0"
  18. for /f "delims=" %%j in (%~1) do (
  19. if "%%j" neq "" (
  20. if !b! equ 0 (
  21. set "b=1"
  22. set "lines=%%j"
  23. set "line_1=!lines:~,20!"
  24. set "line_2=!lines:~19!"
  25. echo ^<a^>!line_1!^</a^>!line_2!>>.\tempFile\%~n1.temp
  26. ) else (
  27. echo %%j>>.\tempFile\%~n1.temp
  28. )
  29. )
  30. )
  31. endlocal
  32. goto :eof
复制代码

TOP

返回列表