批处理复制当前文件内100个文件内的所有图片到当前目录“合并的图片”文件夹内？

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为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"
set "newfolder=合并的图片"
if not exist "%newfolder%" md "%newfolder%"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312')))) -Args '%~f0'"
echo;%#% +%$%%$%/%_% %z%
pause
exit
#>
$codes=@'
using System;
using System.Collections.Generic;
using System.Runtime.InteropServices;
public static class ExpDir
{
[DllImport("Shlwapi.dll", CharSet=CharSet.Unicode)]
public static extern int StrCmpLogicalW(string p1, string p2);
public static string[] Sort(string[] f)
{
Array.Sort(f, StrCmpLogicalW);
return f;
}
}
'@;
Add-Type -TypeDefinition $codes;
[byte[]]$b=@(32,45,45,62,32);
$c=[Text.Encoding]::Default.GetString($b);
$newfolder=get-item -liter $env:newfolder;
$self=get-item -liter $args[0];
$path=$self.Directory.FullName;
$folders=@(dir -liter $path|?{($_.Name -ne $newfolder.Name) -and ($_ -is [System.IO.DirectoryInfo])}|%{$_.Name});
if($folders.length -ge 1){
$arr=[ExpDir]::Sort($folders);
for($i=0;$i -lt $arr.Count;$i++){
$folder=$path+'\'+$arr[$i];
$files=@(dir -liter $folder|?{(@('.jpg','.jpeg','.bmp','.png') -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])}|%{$_.Name});
if($files.length -ge 1){
$brr=[ExpDir]::Sort($files);
for($j=0;$j -lt $brr.count;$j++){
$ext='';
$m=[regex]::match($brr[$j],'\.[^\.]+$');
if($m.Success){$ext=$m.groups[0].value;}
$srcfile=$folder+'\'+$brr[$j];
#$newname=$arr[$i]+'_'+($j+1).toString()+$ext;
$newname=$brr[$j];
$dstfile=$newfolder.FullName+'\'+$newname;
$srcfile.substring($path.length)+$c+$dstfile.substring($path.length);
}
}
}
}