liujun409534709 当前离线
列兵
xianxian 当前离线
一级士官
TOP
namejm (闭关中)当前离线
批处理代码写手
荣誉版主
@echo off cd.>url.txt for %%i in (*.html) do ( for /f "tokens=4 delims=<>" %%j in ('findstr /i "\<h1\>.*\</h1\>" %%i') do set "str=<h1>%%j</h1>" for /f "tokens=2 delims=/." %%j in ('findstr /i "qvod://.*rmvb|" %%i') do call echo "%%str%% qvod://%%j.rmvb|">>url.txt ) pause复制代码
wankoilz 当前离线
上尉
@echo off&setlocal enabledelayedexpansion for /f "tokens=1* delims=:" %%i in ('findstr /r /c:"<h1>.*</h1>" *.html') do ( set "str=%%j" set "str=!str:*<h1>=!" set "%%i=^<h1^>!str:~0,-6!" ) (for /f "tokens=1* delims=:" %%i in ('findstr /r /c:"\<qvod://.*rmvb|\>" *.html') do ( set "str=%%j" set "str=!str:*qvod://=!" echo !%%i! qvod://!str:~0,-37! ))>a.txt复制代码