apang

我也来个：

@set @n=0; /* & echo off & setlocal enabledelayedexpansion
set "s=1 2 3 4 5 7 15 16 "
for /f "tokens=1,2*" %%a in ('dir/b/s %s: =.jpg? %^|cscript -nologo -e:jscript "%~0"') do (
        if /i "%%~nxc" NEQ "!Name!" (
                if defined Name echo,!Name! 共!i!张
                set i=1
        ) else set /a i+=1
        echo,%%c %%b
        set "Name=%%~nxc"
)
pause & exit/b & rem */

var objShell = new ActiveXObject("Shell.Application");
var objFolder = objShell.NameSpace(0);
var i = 0;

while(true) {
        if (objFolder.GetDetailsOf(null, i) == "尺寸") {break} else i++;
}

var re = /^(1|2|3|4|15|16)\.jpg1000x1200$|^(5|7)\.jpg200x300$/i;
var arr = [];
while(!WScript.StdIn.AtEndOfStream) {
        var f = WScript.StdIn.ReadLine();
        var m = f.match(/^(.+)\\(.+\.jpg)$/i);
        var objFolder = objShell.NameSpace(m[1]);
        var objItem = objFolder.ParseName(m[2]);
        var size = objFolder.GetDetailsOf(objItem, i).match(/\d+/g).join("x");
        if (!re.test(m[2] + size)) {
                arr.push(parseInt(m[2])+100 + " " + size + " " + f)
        }
}
WScript.Echo(arr.sort().join("\n")+ "\n/")
复制代码