设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
批处理之家»论坛 › 批处理专区: BAT CMD DOS › BAT原创&转载 › 批处理按文件名称自动分类
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发新帖
查看: 32479|回复: 4

[文件管理] 批处理按文件名称自动分类

[复制链接]
fml520
发表于 2008-4-20 22:29:27 | 显示全部楼层 |阅读模式
按文件名称自动分类代码1

  2. @echo off
  3. title 文件分类@fmr520 2008/4/20
  4. mode con cols=45 lines=15
  5. color 2f
  6. call :shuoming
  7. set "mulu=:"
  8. set "houzhui=:"
  9. cls
  10. setlocal EnableDelayedExpansion  
  11. :ml_
  12. cls
  13. echo\&echo. 文件夹格式是 d:\abc\mp3
  14. echo\&echo. 必须带有 \ 否则输入无效
  15. echo\&echo. ( .\ 表示当前文件夹 )
  16. echo\&echo.
  17. set /p mulu=将要操作的文件夹放到这里:
  18. set mulu=%mulu:"=%
  19. if "%mulu%" == ":" goto ml_
  20. if "%mulu%" == "." goto hz_
  21. if not "%mulu:~2,1%" == "" call :cuo "%mulu%"
  22. :hz_
  23. cls
  24. echo\&echo.程序运行中...
  25. ping 127.1 -n 1 >nul
  26. for /f "tokens=*" %%a in (list.ini) do (set vaa=%%a
  27. pushd "%mulu%"
  28. for /f "tokens=*" %%i in ('dir/b ^|findstr /i "!vaa!" ') do (
  29.    if not exist !vaa! md !vaa!
  30.            move "%%i" !vaa!
  31.           )
  32. )
  33. cls
  34. echo\echo. 完成!
  35. pause>nul&exit
  36. :cuo
  37. echo\&echo. 你输入的 %1 无效！
  38. pause>nul
  39. if %1 == "%houzhui%" goto hz_
  40. if %1 == "%mulu%" goto ml_
  41. goto ml_
  42. :shuoming
  43. echo 把你要分类的文件名写进list.ini这个文件里，一行只能写一个文件名，否则会出错。 >>说明.txt
  44. start 说明.txt
  45. ping 127.1 -n 2 >nul
  46. del 说明.txt /q/f/a
  47. goto :eof
复制代码
按文件名称自动分类代码2

  2. @echo off
  3. title 文件分类@fmr520 2008/4/19
  4. mode con cols=45 lines=15
  5. color 2f
  6. set "mulu=:"
  7. set "houzhui=:"
  8. cls
  9. setlocal EnableDelayedExpansion  
  10. :ml_
  11. cls
  12. echo\&echo. 文件夹格式是 d:\abc\mp3
  13. echo\&echo. 必须带有 \ 否则输入无效
  14. echo\&echo. ( .\ 表示当前文件夹 )
  15. echo\&echo.
  16. set /p mulu=将要操作的文件夹放到这里:
  17. set mulu=%mulu:"=%
  18. if "%mulu%" == ":" goto ml_
  19. if "%mulu%" == "." goto hz_
  20. if not "%mulu:~2,1%" == "" call :cuo "%mulu%"
  21. :hz_
  22. cls
  23. echo\&echo.输入要分类的后缀名,如 *.mp3 *.swf *.txt 或 *
  24. echo\&echo.可以同时输入多个后缀如 *.mp3 *.swf *.txt
  25. echo\&echo.输入 * 会对该目录下的全部文件分类
  26. echo\&echo.
  27. set /p houzhui=输入要分类的后缀名:
  28. if "%houzhui%" == ":" goto hz_
  29. if not "%houzhui:~0,1%" == "*" call :cuo "%houzhui%"
  30. cls
  31. echo\&echo. 程序正在运行中...
  32. ping 172.1 /n 1  >nul
  33. pushd "%mulu%"
  34. for /f "tokens=1* delims=-,.; " %%a in ('dir/b %houzhui%')  do (
  35.     set var=%%~na
  36.        if not exist !var! md !var!
  37.     move "%%a?%%b" !var!
  38.   )>nul 2>nul
  39. cls
  40. echo\echo. 完成!
  41. pause>nul&exit
  42. :cuo
  43. echo\&echo. 你输入的 %1 无效！
  44. pause>nul
  45. if %1 == "%houzhui%" goto hz_
  46. if %1 == "%mulu%" goto ml_
  47. goto ml_
复制代码
链接: https://pan.baidu.com/s/1GmoENYtoAWKdbOdiXV2SYg?pwd=eb2q

评分

参与人数 1PB +4 收起 理由
youxi01 + 4 呵呵，加油，可以借鉴其它同类作品

查看全部评分

回复

举报

xc007
发表于 2008-4-23 21:33:53 | 显示全部楼层
收藏了，再学习一下，多了解嘛
回复

举报

conglin58
发表于 2010-6-18 17:20:14 | 显示全部楼层
还是这儿好！找到我最想要的！
回复

举报

狂人一个
发表于 2012-6-2 20:37:33 | 显示全部楼层
学习了，有没有更简单一点的代码！
回复

举报

gawk
发表于 2012-6-2 22:27:28 | 显示全部楼层
回复 4# 狂人一个


    根据自己的实际需求写出来的代码最简单
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 06:47 , Processed in 0.020764 second(s), 12 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表