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
复制代码

[ 本帖最后由 wankoilz 于 2010-7-24 22:09 编辑 ]