aloha20200628

回复 1# 228630386

先给一个版本
以下代码存为 test.bat 运行，将当前目录下及其各子目录中符合匹配条件（须前缀17个字符相同）的目标文件 *.jpg （忽略单个文件）移入对应的新建子目录中...

@echo off &setlocal &(dir /b/s/ad|sort /r &echo,%cd%)>"all.d"
for /f "delims=" %%d in (all.d) do for %%F in ("%%d\*.jpg") do (
   set "nF=%%~nF" &setlocal enabledelayedexpansion &set "nF17=!nF:~,17!"
   for /f %%n in ('dir /b/a-d "%%d\!nF17!*%%~xF"^|find /c /v "" ') do if %%n gtr 1 (
       md "%%d\!nF17!"
       move /y "%%d\!nF17!*%%~xF" "%%d\!nF17!"
   ) 2>ul
   endlocal
)
del/q "all.d"&endlocal&pause&exit/b
复制代码