大佬 怎么用bat怎样批量提取图片的 宽高比例，比例大于1.3的 放A文件夹里，小于等于1.3的放B文件夹里？

发布网友 发布时间：2022-06-01 16:08

我来回答

共1个回答

热心网友 时间：2023-10-06 05:42

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起双击运行
<# :
cls&echo off&mode con lines=5000
rem 根据宽高比例将图片文件归类到不同文件夹里
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312')))) -Args '%~f0'"
echo;%#% +%$%%$%/%@% %z%
pause
exit
#>
Add-Type -AssemblyName 'System.drawing';
function getwh($f){
$wh=@(1,1);
try{
$img=[System.Drawing.Image]::FromFile($f.FullName)
$wh[0]=$img.Width;
$wh[1]=$img.Height;
$img.Dispose();
}catch{}
return $wh;
}
[byte[]]$b=@(32,45,45,62,32);
$c=[Text.Encoding]::Default.GetString($b);
$threshold=1.3;
$self=get-item -liter $args[0];
$path=$self.Directory.FullName;
$files=@(dir -liter $path|?{(@('.jpg','.jpeg','.bmp','.png') -contains $_.Extension) -and ($_ -is [System.IO.FileInfo])});
for($i=0;$i -lt $files.length;$i++){
$arr=getwh $files[$i];
$t=[Math]::Round($arr[0]/$arr[1],2);
$newfolder='A';
if($t -le $threshold){$newfolder='B';}
if(-not (test-path -liter $newfolder)){[void][IO.Directory]::CreateDirectory($newfolder)};
'['+$arr[0]+'x'+$arr[1]+':'+$t+']'+$files[$i].FullName.Substring($path.length)+$c+$newfolder;
}追问

大佬，我想让程序运行后，图片自己移动进 对应文件夹里去

追答按运行后窗口标题栏中的提示联系我