Board logo

标题: [文件管理] 批处理版图片整理(进度版) [打印本页]

作者: foxJL    时间: 2007-11-15 20:35     标题: 批处理版图片整理(进度版)

和namejm的代码比起来实在是微不足道.
功能少了很多,一个选项也没有.BUG也一大堆,因为是写给自己用的,所以也就足够了..
  1. @echo off
  2. mode con cols=86 lines=8
  3. title 图片整理(进度版)
  4. color 3f
  5. set nonum=0
  6. set yesnum=0
  7. del %temp%\copys.ini>nul 2>nul
  8. setlocal EnableDelayedExpansion
  9. set/p list=请拖入要整理的文件夹:
  10. for /f "tokens=*" %%i in ('dir %list%\*.jpg,%list%\*.gif /s/b') do (
  11.     for /l %%c in (1,1,45) do (set/p=<nul)
  12.     set /a yesnum+=1
  13.     echo %%~ti "%%i">>%temp%\copys.ini
  14.     set/p=正在收集.可以整理 !yesnum! 个文件.<nul
  15. )
  16. set /a copynum=yesnum/80+1
  17. set /a copygd=yesnum/copynum
  18. echo.&echo.&echo.&set /p=    <nul
  19. for /l %%i in (1,1,!copygd!) do set /p=-<nul
  20. for /l %%i in (1,1,!copygd!) do set /p=<nul
  21. for /f "tokens=1,2,*" %%j in (%temp%\copys.ini) do (
  22.     if not exist "\%%j\." md "%%j">nul 2>nul
  23.         copy %%l "%%j\" /y >nul 2>nul
  24.         del %%l>nul 2>nul
  25.         call :xs
  26.         set /a cf+=1
  27.         title 已经移动 !cf! 个文件...
  28. )
  29. echo.&echo.&echo.&echo.    整理完成!
  30. pause>nul&exit
  31. :xs
  32. set /a n+=1
  33. if !n! EQU !copynum! ((set n=0)&(set /p=^><nul)&goto :eof)
复制代码





欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2