标题: [文件操作] [已解决]求助修改BAT代码,一键删除像素低于1000PX的图片 [打印本页]
作者: zhuan1688 时间: 2020-4-3 15:05 标题: [已解决]求助修改BAT代码,一键删除像素低于1000PX的图片
本帖最后由 zhuan1688 于 2020-4-8 10:08 编辑
注:最终我没用bat,而是使用免费软件:everything,可以直接用:width:>1000 等代码搜索图片大小、像素等。
下面代码是一键删除像素小于1000的图片,但是不能删除子文件夹,我要遍历目录,删除所有子文件夹里像素低于1000的图片,不论几级子目录,请各位大神帮忙修改,无比感激- @echo off&setlocal enabledelayedexpansion
- rem 删除当前目录下---下一行所设扩展名--宽度大于下两行所设像素的图片
- set "var=*.jpg *.bmp *.jpeg"
- set /a w=1000
- >tmp.vbs echo Set oImg=CreateObject("WIA.ImageFile")
- >>tmp.vbs echo oImg.LoadFile WScript.Arguments(0)
- >>tmp.vbs echo ImgInfo=oImg.Width
- >>tmp.vbs echo Wscript.Echo int(ImgInfo)
- for /f %%a in ('dir /b /a-d !var!') do (
- for /f "delims=" %%i in ('cscript //nologo tmp.vbs %%a') do (
- set /a width=%%i*1
- if !width! lss !w! echo %%a宽度小于!w!,实际宽度为!width!,正在删除...&del %%a /f /q
- )
- )
- del tmp.vbs
- pause
- exit /b
复制代码
作者: Batcher 时间: 2020-4-3 15:45
回复 1# zhuan1688
第9行改成这样可以吗:
for /f %%a in ('dir /b /s /a-d !var!') do (
作者: zhuan1688 时间: 2020-4-3 15:56
回复 2# Batcher
谢谢您的帮助,不行,请看图片
作者: Batcher 时间: 2020-4-3 16:01
回复 3# zhuan1688
第9、10行这样呢:
for /f "delims=" %%a in ('dir /b /s /a-d !var!') do (
for /f "delims=" %%i in ('cscript //nologo tmp.vbs "%%a"') do (
欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |