Board logo

标题: [文件操作] 好久不回来,分享个自己写的批处理相片整理工具 [打印本页]

作者: 林小七    时间: 2015-7-28 14:21     标题: 好久不回来,分享个自己写的批处理相片整理工具

好久不回来,分享个自己写的相片整理工具
这个是今天整理文件偶然发现的,就和大家分享下..
没有使用第三方exe.....存p,win7  win8  win10通用...
纪念下我曾经的bat吧.  by:林小柒

论坛AV的画质,,,,,我也是醉了...
  1. @echo off&&setlocal enableextensions
  2. title PhotosMoves By:Seven&&color 0D
  3. MODE CON COLS=64 LINES=15
  4. set  mycolor="9ABCDEF"
  5. set "sevens=call :seven"&&set "end=@echo."
  6. set myName=%~n0
  7. if "%myName%" neq "se7en" (
  8. @echo. &&@echo.&&@echo               文件部分~损~坏,请将文件名修改为se7en后方可正常运行。
  9. @echo.         &&%sevens% D "                      By@林小柒   QQ:"&&%sevens% 9 "9"&&%sevens% A "8"&&%sevens% B "5"&&%sevens% C "3"&&%sevens% D "9"&&%sevens% E "0"&&%sevens% F "9"&&%sevens% A "2"&&%sevens% C "7"
  10. rename %0 se7en.bat
  11. pause>nul
  12. %0&exit
  13. )
  14. :f
  15. goto main
  16. :k
  17. set /p select="请选择要处理的类型:"
  18. if "%select%" == "1" goto f1
  19. if "%select%" == "2" goto f2
  20. if "%select%" == "3" goto f3
  21. if "%select%" == "4" goto f4
  22. if "%select%" == "5" goto f5
  23. if "%select%" == "6" exit
  24. goto f
  25. :f1
  26. for /r %%a in ("*.jpg") do set "t=%%~ta"&&call :movesByDd "%%a" %%t%%
  27. goto :dels
  28. :f2
  29. for %%a in ("*.jpg") do set "t=%%~ta"&&call :movesByDd "%%a" %%t%%
  30. goto :dels
  31. :f3
  32. for /r %%a in ("*.jpg") do set "t=%%~ta"&&call :movesByMm "%%a" %%t%%
  33. goto :dels
  34. :f4
  35. for %%a in ("*.jpg") do set "t=%%~ta"&&call :movesByMm "%%a" %%t%%
  36. goto :dels
  37. :f5
  38. @echo 把这个文件放到你要处理相片的目录下运行>D:\help.txt
  39. @echo 会按照照相的日期生成文件夹并且按照日期对相片进行移动或者分类>>D:\help.txt
  40. start notepad.exe "D:\help.txt"
  41. goto k
  42. :dels
  43. for /f "delims=" %%s in ('dir /s /ad /b') do rd /q "%%s" 2>nul 1>nul
  44. del /f /q "C:\help.txt" 2>nul 1>nul
  45. goto f
  46. :movesByDd
  47. set dates=%2&&call set dates=%%dates:/=-%%
  48. md %dates% 2>nul 1>nul
  49. move %1 %dates%
  50. set /a p=p+1
  51. goto :eof
  52. :movesByMm
  53. set dates=%2&&call set dates=%%dates:/=-%%&&call set dates=%%dates:~0,7%%
  54. md %dates% 2>nul 1>nul
  55. move %1 %dates%
  56. set /a p=p+1
  57. goto :eof
  58. :main
  59. cls
  60. %sevens% E "┌─────────────────────────────┐"&&%end%
  61. %sevens% E "│"&&%sevens% C "                  相片分类工具"&&%sevens% E "                            │"&&%end%
  62. %sevens% E "│"&&%sevens% A "              1.分类目录下所有相片(按天)"&&%sevens% E "                  │"&&%end%
  63. %sevens% E "│"&&%sevens% A "              2.分类当前目录下相片(按天)"&&%sevens% E "                  │"&&%end%
  64. %sevens% E "│"&&%sevens% A "              3.分类目录下所有相片(按月)"&&%sevens% E "                  │"&&%end%
  65. %sevens% E "│"&&%sevens% A "              4.分类当前目录下相片(按月)"&&%sevens% E "                  │"&&%end%
  66. %sevens% E "│"&&%sevens% A "              5.超级详细的帮助文档"&&%sevens% E "                        │"&&%end%
  67. %sevens% E "│"&&%sevens% A "              6.退出"&&%sevens% E "                                      │"&&%end%
  68. %sevens% E "│"&&%sevens% F "                         @Seven 2014-8-24"&&%sevens% E "                 │"&&%end%
  69. %sevens% E "│"&&%sevens% F "                               QQ:"&&%sevens% 9 "9"&&%sevens% A "8"&&%sevens% B "5"&&%sevens% C "3"&&%sevens% D "9"&&%sevens% E "0"&&%sevens% F "9"&&%sevens% A "2"&&%sevens% C "7"&&%sevens% E "              │"&&%end%
  70. %sevens% E "└─────────────────────────────┘"&&%end%
  71. if defined p echo ok.成功的分类了 %p% 张相片&&set /a p=0
  72. set files=nul
  73. set select=nul
  74. if not defined "%files%" set /p files="请拽入要处理的目录 6退出:"
  75. if "%files%" equ "6" exit
  76. if not exist "%files%" @call %sevens% A 文件路径不存在,任意键继续&&pause>nul&&goto main
  77. for %%a in ("%files%") do set "b=%%~aa"
  78. if defined b (if %b:~0,1% neq d (@echo 拽入的不是目录,任意键继续&&pause>nul&&goto main ))
  79. cd /d "%files%"
  80. goto k
  81. :seven
  82. pushd "%temp%"&set/p= <nul>"%~2"&findstr /a:%~1 .* "%~2" nul&del "%~2"&popd
复制代码

作者: 林小七    时间: 2016-2-29 10:01

回来看看~~~~~~
作者: 别喜欢哥    时间: 2016-5-31 12:17

大神有没有一键整理全盘图片jpep格式的然后默认输出指定文件夹
作者: 523066680    时间: 2016-10-22 13:01

楼主现在从事哪方面了?
作者: 林小七    时间: 2016-12-20 17:09

回复 4# 523066680

数据挖掘分析方面  主要使用java scala python....
作者: apr    时间: 2016-12-21 15:34

这个好
最好能批处理一份低分辨率照片的文件夹,这样选照片会方便一些




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