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

回复 1# linqing0
  1. @echo off
  2. for /r %%i in (*.txt) do (
  3. for /f "tokens=1,2" %%j in ("%%~nxi") do (
  4. echo      %%j>%%i
  5. echo %%j>>%%i
  6. )
  7. )
复制代码

TOP

本帖最后由 ivor 于 2012-1-14 14:16 编辑

回复 5# linqing0
  1. @echo off & setlocal ENABLEDELAYEDEXPANSION
  2. md ..\NewFolder 2>nul
  3. for /r %%i in (*.txt) do (
  4.         set File=%%~ni
  5. set File=!File:~0,-5!
  6. set Count=0
  7. for /f "usebackq" %%j in ("%%i") do (
  8. set /a Count+=1
  9. if !Count! LEQ 2 (
  10. set Str=%%j
  11. ECHO !Str:~,5!!File!!Str:~5! > ..\NewFolder\%%~nxi
  12. if !Count! EQU 2 (
  13. ECHO !File!%%j >> ..\NewFolder\%%~nxi
  14. )
  15. ) else (
  16. echo %%j >> ..\NewFolder\%%~nxi
  17. )
  18. )
  19. )
  20. ::处理的结果已经放在了上层目录中的NewFolder目录中
  21. pause
复制代码
用之前注意备份数据

TOP

返回列表