[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 tmplinshi 于 2011-3-24 02:07 编辑
  1. @echo off
  2. set "OutDir=#1#"
  3. md "%OutDir%" 2>nul
  4. for /f "delims=" %%f in (' dir /b *.txt ') do (
  5.     if %%~zf neq 0 (
  6.         findstr /n "^$" "%%f" >.tmp
  7.         set n=0
  8.         set /p n=<.tmp
  9.         set /a n = n, n_ = n
  10.         call :o "%%f" >"%OutDir%\%%~nf_%%~xf" 2>nul
  11.     )
  12. )
  13. exit /b
  14. :o
  15. for /f "eol= usebackq delims=" %%s in ("%~1") do (
  16.     echo,%%s
  17.     set /a "n -= 1, 1 / (n - 1)" || (
  18.         more +%n_% %1 >.tmp
  19.         move .tmp %1
  20.         goto :eof
  21.     )
  22. )
  23. move .tmp %1
复制代码

TOP

返回列表