批处理如何在近万张图片中找到分辨率最大的一张图片？

tcasdsss · 发表于 2014-9-13 15:19:20

@echo off
set %mW%=0
set %mH%=0
for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
set %W%=Width
set %H%=Height
if %W% gtr %mW%
set %mW%=Width
if %H% gtr %mH%
set %mH%=Height
)
）
pause

复制代码

我写的是这样的可是无法运行……

tcasdsss · 发表于 2014-9-13 15:41:07

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
set "%%i=%%j"
）
set %W%=Width
set %H%=Height
if %W% gtr %mW%
set %mW%=Width
if %H% gtr %mH%
set %mH%=Height
)
pause

复制代码

这样子也不行……

neorobin · 发表于 2014-9-13 16:14:24

回复 2# tcasdsss

%var% 不是 BAT 里变量必须采用的命名方式, 当然这样的变量名也是合法的. 实际上变量名比较自由

绝大多数字符都可以用于命名变量, 诸如此类: @#$% 甚至汉字, 甚至可以用数字作为起始字符(当然不好了)

%var% 是变量扩展, 要取变量 var 的值时可以用 %var% 为其赋值时这样: set var=something

分辨率最大如何理解? 应该算面积吧. 即 WIDTH * HEIGHT 这个乘积最大的吧

在找到最大分辨率时, 应该把该文件的路径给存下来吧, 所以可以设一个变量 set theFile=%%a

另外 WINDOWS 系统详细查看方式中, 可以选出尺寸列, 点击一下列标头, 即可排序, 可以试试.

tcasdsss · 发表于 2014-9-13 16:19:13

回复 3# neorobin

我说错了…… 我要找的是宽和高的最大值
现在最悲剧的是无法运行……

tcasdsss · 发表于 2014-9-13 16:22:56

回复 3# neorobin

set W=Width
set H=Height
if %W% gtr %mW%
set mW=Width
if %H% gtr %mH%
set mH=Height

复制代码

这样子赋值是不行的……

neorobin · 发表于 2014-9-13 16:31:13

回复 5# tcasdsss

nconvert.exe -info imagefile.jpg 输出信息格式是怎样的?

tcasdsss · 发表于 2014-9-13 16:41:54

本帖最后由 tcasdsss 于 2014-9-13 16:44 编辑

回复 6# neorobin

for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (

复制代码

这句我是借鉴别人的……
他的方法输出的宽和高是正确的

新建位图图像 (2)-.jpg

CrLf · 发表于 2014-9-13 17:12:05

@set @n=0/*&echo off
for /f "delims=" %%a in ('dir /b *.jpg ^| cscript -nologo -e:jscript "%~0"') do (
echo 在这里对 %%a 做你想做的操作...
)
pause &exit /b */
var Img = new ActiveXObject("WIA.ImageFile")
var px
var list = {max:0,files:[]}
while(!WScript.StdIn.AtEndOfStream){
var file = WScript.StdIn.ReadLine()
Img.LoadFile(file)
px = Img.Width * Img.Height
if(px > list.max){
list.max = px
list.files = [file]
} else {
list.files.push(file)
}
}
for(var i in list.files){
WScript.Echo(list.files[i])
}

复制代码

tcasdsss · 发表于 2014-9-13 17:16:27

回复 8# CrLf

不懂……
好像一部分不是批处理
这个怎么才能获得最大宽度和高度的数据呢？

tcasdsss · 发表于 2014-9-13 17:20:35

回复 8# CrLf

我现在想法是利用一个bat先找到这些图片中最大宽度和高度的数据再call 另一个bat文件将变量传过去通过nconvert来将图片分变率用canvas调整到最大值

neorobin · 发表于 2014-9-13 17:34:32

回复 7# tcasdsss

你的代码中有一个全角括号

@echo off & setlocal enabledelayedexpansion
set /a Width=0, Height=0
for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
if %%j gtr !%%i! set "%%i=%%j"
)
)
set Width
set Height
pause

复制代码

CrLf · 发表于 2014-9-13 17:39:55

虽然赶脚不需要我了，但还是改着玩玩...

@set @n=0/*&echo off
dir /b *.jpg | cscript -nologo -e:jscript "%~0" "格式化输出：高度[$height] 宽度[$width] 像素[$px] 文件[\'$file\']"
rem 按指定格式输出取得的信息
pause
for /f "delims=" %%a in ('dir /b *.jpg ^| cscript -nologo -e:jscript "%~0"') do (
echo 在这里对 %%a 做你想做的操作...
)
rem 处理示例
pause &exit /b */
var format = '$file'
if(WScript.Arguments.length){
format = WScript.Arguments.Item(0).replace(/\$\$/g,'{$$$$}')
format = format.replace(/\\r/g,'\r')
format = format.replace(/\\n/g,'\n')
format = format.replace(/\\t/g,'\t')
format = format.replace(/\\'/g,'"')
}
var Img = new ActiveXObject("WIA.ImageFile")
var px
var list = {px:0,files:[]}
while(!WScript.StdIn.AtEndOfStream){
var file = WScript.StdIn.ReadLine()
Img.LoadFile(file)
px = Img.Width * Img.Height
if(px > list.px){
list = {px:px,width:Img.Width,height:Img.Height,files:[file]}
} else {
list.files.push(file)
}
}
var output = format.replace(/\$px/gi,list.px)
output = output.replace(/\$height/gi,list.height)
output = output.replace(/\$width/gi,list.width)
for(var i in list.files){
output = output.replace(/\$file/gi,list.files[i])
WScript.Echo(output.replace(/\{\$\$\}/gi,'$$$$'))
}

复制代码

支持简单的格式化输出

CrLf · 发表于 2014-9-13 17:42:48

话说楼主你把 height 和 width 分开判断，怎么能保证是同一张图片的高和宽呢？

tcasdsss · 发表于 2014-9-13 17:46:32

回复 13# CrLf

我现在目的是要把一批图片压缩成hevc流文件以提高压缩率为了保证视频可以符合hevc流的要求又不损失数据我们就要把图片中的最长最高的值得到从而方便hevc压缩

tcasdsss · 发表于 2014-9-13 17:47:09

回复 11# neorobin

吊…… 比我的简洁好多……

		自动登录	找回密码
密码			注册

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

[文件操作] 批处理如何在近万张图片中找到分辨率最大的一张图片？