Board logo

标题: 188元求助批量删除文件夹包括子文件夹超过数量文件 [打印本页]

作者: wangluojianse    时间: 2017-6-9 16:40     标题: 188元求助批量删除文件夹包括子文件夹超过数量文件

我要求删除.htm或者.html文件,在一个文件夹里,超过100个htm或者html文件全部删除,少于100个,就不处理,多于100个,就全部删除。包括里面子文件夹里的html文件,全部加起来超过100个,就删除!只保留100个
求助高手解决!
作者: wangluojianse    时间: 2017-6-9 16:41

支付宝支付
作者: wangluojianse    时间: 2017-6-9 16:42

qq5331485,可以联系我
作者: ShowCode    时间: 2017-6-9 18:23

  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set n=0
  4. for /f "delims=" %%i in ('dir /b /s "c:\11_Sync_HP\Test\test\*.htm"') do (
  5.     set /a n+=1
  6.     if !n! gtr 10 (
  7.         del /f /q "%%i"
  8.     )
  9. )
复制代码

作者: wangluojianse    时间: 2017-6-9 20:02

太好了,怎么付款?
作者: 老刘1号    时间: 2017-6-9 21:03

本帖最后由 老刘1号 于 2017-6-10 15:32 编辑
  1. @echo off&setlocal enabledelayedexpansion
  2. Set /p 目录=拖入目录:
  3. Set "目录=!目录:"=!"
  4. set /a 计数=0
  5. for /R %%i in ("!目录!\*.htm") do set /a 计数+=1&&if !计数! GTR 100 DEL /F "%%~fi"
  6. Pause
复制代码

作者: yu2n    时间: 2017-6-9 22:09

本帖最后由 yu2n 于 2017-6-9 22:16 编辑
  1. [code]::DeleteHtmlFiles 刪除文件個數超過100的文件.bat
  2. @echo off
  3. setlocal enabledelayedexpansion
  4. ::設定文件夾位置(默認當前目錄,請自行修改)
  5.   set "wk_dir=D:\"   && rem 演示1,D 盤
  6.   set "wk_dir=%~dp0" && rem 演示2,當前目錄
  7. ::提示信息
  8.   echo.
  9.   echo 警告:
  10.   echo.
  11.   echo     請留意備份文件!
  12.   echo.
  13.   echo     即將刪除目錄 %wk_dir% 中個數超過 100 的htm、html文件。
  14.   echo.
  15.   echo     如需取消操作,請直接關閉本窗口。
  16.   echo.
  17.   set/p "input=> 是否繼續?(Y/N): "
  18.   if not defined input goto :cancel
  19.   if /i "%input%" neq "y" goto :cancel
  20. ::執行操作
  21.   set /a n=0
  22.   for /f "delims=" %%a in ('dir /a/b/s "%wk_dir%\*.htm" 2^>nul') do (
  23.     if /i "%%~xa"==".htm" set /a n+=1
  24.     if /i "%%~xa"==".html" set /a n+=1
  25.     if !n! gtr 100 (
  26.       if /i "%%~xa"==".htm" (
  27.         echo delete %%~a
  28.         echo delete %%~a>>"%wk_dir%\del.log"
  29.         del /q "%%~a"
  30.       )
  31.       if /i "%%~xa"==".html" (
  32.         echo delete %%~a
  33.         echo delete %%~a>>"%wk_dir%\del.log"
  34.         del /q "%%~a"
  35.       )
  36.     )
  37.   )
  38. ::操作完成
  39. :done
  40.   echo.
  41.   echo 操作已完成!
  42.   echo.
  43.   pause
  44.   goto :eof
  45. ::操作取消
  46. :cancel
  47.   echo.
  48.   echo 操作已取消!
  49.   echo.
  50.   pause
  51.   goto :eof
复制代码
凑个热闹。话说楼主付款了吗?没有的话请快点付给4楼,4楼收到了也请吱个声。
作者: ivor    时间: 2017-6-9 22:33

下次可以留个支付宝二维码O(∩_∩)O哈哈~
作者: 老刘1号    时间: 2017-6-9 22:45

总感觉这个价格和难度不太对应……
作者: ShowCode    时间: 2017-6-9 23:00

回复 5# wangluojianse


    如果认可我的方案,请替我捐赠给论坛吧:论坛专用支付宝账号 batcher.li@gmail.com
作者: wangluojianse    时间: 2017-6-10 13:27

已经支付到论坛支付宝。
作者: Batcher    时间: 2017-6-10 14:18

回复 11# wangluojianse


    收到。感谢大家对论坛的支持。




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