:loop2
for /f delims= %%a in ('dir /b /a *.html') do (
 for /f delims=.html %%b in (%%a) do (
 ::
 echo %%b
set s=%%a
set d=%%b
 call 2.bat
)
)
goto loop2
nclick="copycode($('code0'));">復制代碼

for /f %%b in ('dir /b/od *.html') do (
set fn=%%b
if %s%==%fn% goto xin
)
::目的是不處理最新的那一個能不能保留3個最新的文件
grep 查看詳細信息%s%>%d%.txt
grep 身高： %s%>>%d%.txt
grep 信用等級 %s%>>%d%.txt
grep mobile.png%s%>>%d%.txt
iconv.exe -f utf-8 -t gb2312 %d%.txt>%d%.asp
del %s%
del %d%.txt
findstr 女， %d%.asp>nul&& goto 1 ||goto loop
:1
echo %d%>>全部女.txt
findstr 18歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 19歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 20歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 21歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 22歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 23歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 24歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 25歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 26歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 27歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 28歲 %d%.asp>nul&& goto 18 ||echoloop>nul
findstr 29歲 %d%.asp>nul&& goto 18 ||gotoloop
:18
echo %d%>>符合年齡.txt
findstr /c:163厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:164厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:165厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:166厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:167厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:168厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:169厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:170厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:171厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:172厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:173厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:174厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:175厘米 %d%.asp>nul>nul&& goto 168 ||echoloop>nul
findstr /c:176厘米 %d%.asp>nul>nul&& goto 168 ||goto loop
:168
echo %d%>>符合身高.txt
findstr 信用等級 %d%.asp>nul&& goto mobile ||echoloop>nul
findstr /c:mobile.png %d%.asp>nul&& goto mobile ||goto loop
:mobile
echo %d%>>符合信用.txt
findstr 信用等級 %d%.asp>nul&& goto 信用 ||goto 無
:信用
echo %d%>>信用.txt
goto loop
:無
echo %d%>>無信用.txt
goto loop
:loop
del /a %d%.asp
echo 循環結束
:xin
nclick="copycode($('code1'));">復制代碼