188元求助批量删除文件夹包括子文件夹超过数量文件

wangluojianse

我要求删除.htm或者.html文件，在一个文件夹里，超过100个htm或者html文件全部删除，少于100个，就不处理，多于100个，就全部删除。包括里面子文件夹里的html文件，全部加起来超过100个，就删除！只保留100个
求助高手解决！

wangluojianse

支付宝支付

wangluojianse

qq5331485，可以联系我

ShowCode

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

wangluojianse

太好了，怎么付款？

老刘1号

@echo off&setlocal enabledelayedexpansion
Set /p 目录=拖入目录：
Set "目录=!目录:"=!"
set /a 计数=0
for /R %%i in ("!目录!\*.htm") do set /a 计数+=1&&if !计数! GTR 100 DEL /F "%%~fi"
Pause
复制代码

yu2n

[code]::DeleteHtmlFiles 刪除文件個數超過100的文件.bat

@echo off
setlocal enabledelayedexpansion

::設定文件夾位置（默認當前目錄，請自行修改）
  set "wk_dir=D:\"   && rem 演示1，D 盤
  set "wk_dir=%~dp0" && rem 演示2，當前目錄

::提示信息
  echo.
  echo 警告：
  echo.
  echo     請留意備份文件！
  echo.
  echo     即將刪除目錄 %wk_dir% 中個數超過 100 的htm、html文件。
  echo.
  echo     如需取消操作，請直接關閉本窗口。
  echo.
  set/p "input=> 是否繼續？(Y/N): "
  if not defined input goto :cancel
  if /i "%input%" neq "y" goto :cancel

::執行操作
  set /a n=0
  for /f "delims=" %%a in ('dir /a/b/s "%wk_dir%\*.htm" 2^>nul') do (
    if /i "%%~xa"==".htm" set /a n+=1
    if /i "%%~xa"==".html" set /a n+=1
    if !n! gtr 100 (
      if /i "%%~xa"==".htm" (
        echo delete %%~a
        echo delete %%~a>>"%wk_dir%\del.log"
        del /q "%%~a"
      )
      if /i "%%~xa"==".html" (
        echo delete %%~a
        echo delete %%~a>>"%wk_dir%\del.log"
        del /q "%%~a"
      )
    )
  )

::操作完成
:done
  echo.
  echo 操作已完成！
  echo.
  pause
  goto :eof

::操作取消
:cancel
  echo.
  echo 操作已取消！
  echo.
  pause
  goto :eof
复制代码

凑个热闹。话说楼主付款了吗？没有的话请快点付给4楼，4楼收到了也请吱个声。

ivor

下次可以留个支付宝二维码O(∩_∩)O哈哈~

老刘1号

总感觉这个价格和难度不太对应……

ShowCode

回复 5# wangluojianse


    如果认可我的方案，请替我捐赠给论坛吧：论坛专用支付宝账号 batcher.li@gmail.com

wangluojianse

已经支付到论坛支付宝。

Batcher

回复 11# wangluojianse


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