[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文件操作] 批处理bat批量删除最后一张图片

本帖最后由 s7765991 于 2021-2-28 00:31 编辑

例子:
文件夹a
文件夹b
文件夹c
文件夹.........
每个文件夹下面有数量不等的jpg图片和子文件夹(子文件夹也有数量不等的图片)
要求:
批量删除每个文件夹下面的最后一张图片(按名称排序)子文件夹下的图片不动。

  1. @Echo off&SetLocal EnableDelayedExpansion&set n=0
  2. for /d %%i in (*)do set "x=%%i"&ren "%%i" !x:~,6!&cd "%%~dpi\!x:~,6!"&for /f "delims=" %%j in ('dir /b/o:-n *.bmp,*.jpg,*.gif,*.png')do set /a n+=1&if !n!==1 del "%%j"
  3. pause
复制代码

TOP

回复 2# smss


    谢谢大哥  刚测试了下  提示系统找不到指定文件  系统找不到指定路径    是要怎么修改

TOP

回复 1# s7765991


    这两个要求功能代码分开来。

TOP

回复 2# smss

      重命名文件夹都问题已经解决了   就剩删除下级文件夹中最后一张图片这个功能怎么实现大神帮忙下

TOP

本帖最后由 cutebe 于 2021-2-28 18:09 编辑

删除操作很危险,请做好备份!
  1. ::删除子一级目录下最后一张图片
  2. @echo off
  3. setlocal enableDelayedExpansion
  4. for /f "delims=" %%m in ('dir/ad/b')do (
  5. for /f "delims=" %%c in ('dir/a-d/b/on "%%m"')do set "LastPic=%%c"
  6. echo del "%%~fm\!LastPic!"
  7. del "%%~fm\!LastPic!"
  8. )
  9. pause
  10. goto :eof
复制代码
如无特别说明,代码测试环境均为 XP SP3

TOP

这涉及到排序问题,要注意批处理中的排序跟我们通常看到的Windows中的文件及文件夹排序有区别,特别是文件和文件夹名中含有数字时。比如:1.txt 2.txt 123.txt,批处理查找文件时的顺序是1.txt 123.txt 2.txt,是按照字符从前到后逐个排序,因为2.txt中第一个字符2比其它2个文件第一个字符1大,所以要排在最后面。

TOP

返回列表