求一段BAT代码~~~(高分)!!!
来源:百度知道 编辑:UC知道 时间:2024/05/31 07:48:21
用bat文件打开一个网页
然后把这个网页的源文件另存为a.txt (在这个bat目录下)
然后查找a.txt所有“ <a href="http://www.xxx.com/show.asp?ssid=*******" target="_blank">#######</a> ”的内容
(注意 “******” 代表任意字符 “#######” 也代表任意字符)
然后只留下 “#######” 的内容另存为 b.txt
比如说
这个源文件有以下内容:
………………………
………………………
<a href="http://www.xxx.com/show.asp?ssid=123" target="_blank">45r</a>
…………
…………
<a href="http://www.xxx.com/show.asp?ssid=678" target="_blank">90a</a>
………………
…………
<a href="http://www.xxx.com/show.asp?ssid=<
然后把这个网页的源文件另存为a.txt (在这个bat目录下)
然后查找a.txt所有“ <a href="http://www.xxx.com/show.asp?ssid=*******" target="_blank">#######</a> ”的内容
(注意 “******” 代表任意字符 “#######” 也代表任意字符)
然后只留下 “#######” 的内容另存为 b.txt
比如说
这个源文件有以下内容:
………………………
………………………
<a href="http://www.xxx.com/show.asp?ssid=123" target="_blank">45r</a>
…………
…………
<a href="http://www.xxx.com/show.asp?ssid=678" target="_blank">90a</a>
………………
…………
<a href="http://www.xxx.com/show.asp?ssid=<
@echo off
if exist a*.txt del a*.txt/f/q
call :delall
if exist htm2txt.vbs goto doit
>htm2txt.vbs echo set oDOM = WScript.GetObject(WScript.Arguments(0))
>>htm2txt.vbs echo do until oDOM.readyState = "complete"
>>htm2txt.vbs echo WScript.sleep 200
>>htm2txt.vbs echo loop
>>htm2txt.vbs echo WScript.Echo oDOM.Body.InnerText
:doit
set /p numbeg=从第几页开始:
set /p numend=到第几页完毕:
for /l %%i in (%numbeg%,1,%numend%) do (
wget "http://www.czqq.com/thread.php?fid=7&page=%%i" -O Testit.htm
cls
call :turn
)
for /f "delims=" %%i in (a1.txt) do (
if not defined %%i set %%i=A & echo %%i>>a.txt)
if exist htm2txt.vbs del htm2txt.vbs/f/q
if exist a1.txt del a1.txt/f/q
echo 生成文件完毕,请查看。
pause>nul&&goto :eof
:turn
findstr &q