zaqmlp

@echo off
mode con lines=3000
set info=互助互利,支付宝扫码头像,感谢打赏
rem 有问题,可加QQ956535081及时沟通
title %info%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass ^
    $enc=[Text.Encoding]::UTF8;[System.Collections.ArrayList]$s=@();^
    $files=@(dir^|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])});^
    for($i=0;$i -lt $files.length;$i++){^
        write-host $files[$i].Name;^
        write-host ('-'*20);^
        $text=[IO.File]::ReadAllText($files[$i].FullName,$enc);^
        $m=[regex]::matches($text,'\"pdfnum\":\"(\d+)\"');^
        foreach($j in $m){^
            write-host $j.Groups[1].value;^
            [void]$s.add($j.Groups[1].value);^
        };^
    };^
    [IO.File]::WriteAllLines('#result.log', $s, [Text.Encoding]::Default);
:end
echo;%info%
pause
复制代码

zaqmlp

回复 4# batbat001
嗯，扫头像