zaqmlp

@echo off
set info=互助互利,支付宝扫码头像,感谢赞助
rem 有问题,可加QQ956535081及时沟通
title %info%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass ^
    [System.Collections.ArrayList]$s=@();^
    $url='https://www.manhuadb.com/';^
    $web=New-Object System.Net.WebClient;^
    $web.Encoding=[System.Text.Encoding]::UTF8;^
    $html=$web.DownloadString($url);^
    $m=[regex]::matches($html,'(?^<=src=\"").+?\.jpg');^
    if($m.count -ge 1){^
        foreach($item in $m){[void]$s.Add($item.value);};^
        [IO.File]::WriteAllLines('结果.txt', $s, [Text.Encoding]::Default);^
    };
echo;%info%
pause
复制代码