标题: 关于之前在html文件提取地址的问题
[打印本页]
作者: crenel
时间: 2007-4-17 04:31
标题: 关于之前在html文件提取地址的问题
两天前曾在这里向各位请教的提取问题已经解决,在这里再次感谢帮助偶过的人~~
鞠躬~
(旧帖连接:
菜鸟求教各高手关于html里提取地址的p处理..)
之后我改写了代码 主要是生成地址list文件上
用了 逐字对比 和 变量扩展 两种方法
想起刚接触批处理时候对变量扩展的迷茫 以还是决定上传上来 也让还不了解的人多一个实例或参考都好...
至于做这个批处理的初衷 是因为在下载OllyDbg的Script时 发现网站上的链接很多是不规则的字符(例如空格和"." ) 这就造成下载软件不能正确辨认文件的扩展名,那下载下来之后可想而知...加上想起逐个改名字就不爽...所以就写了这批处理....
本来打算修改成可带参数的批处理或者更人性化一点...(例如直接输入html地址 就自动下载html到本地或直接抽取下载地址 然后调用下载软件下载) 但苦于下个星期就要考试(再不看书我就死定了...5555) 所以只好搁置...(或者哪位高手可以写一下呢?呵呵~~)
另外 有谁能告诉我...windows2003下的Dos怎么浏览web啊...realtek的8139/8110网卡...又找不到驱动...下载了wget 就说 No Packet Driver Found...唉...
好鸟 废话不说...上菜鸟...这次顺便把提取出来的OllyDbg Script地址list一并上传,如果有需要的朋友可以下载. 顺便一提...OllyDbg真的是不错的调试程序...
(ps. 这次拿了
看雪学院的网页做测试对象...特此声明下...另:想要下载OllyDbg的朋友 这里也顺便提供下载地址鸟.
>>下载OllyDbg<<)
代码:
GetA.cmd 采用逐字对比 :
@echo off&setlocal enabledelayedexpansion
set dfhtml=index.html
set dffilety=txt
set website=http://www.pediy.com/tools/Debuggers/ollydbg/
type nul>list.txt
for /f "delims=" %%a in ('findstr "href=" %dfhtml%') do (
set "str=%%a"
set "str=!str:href=★!"
set "str=!str:*★=!
if "!str:~-3,3!" == "%dffilety%" (call :prt "!str:~2!")
)
@cls.
@echo. ┏━━━━━━━━━━━━━━━━━━━━━━━━┓
@echo. ┃ ┃
@echo. ┃ Work finished...!! ┃
@echo. ┃ please Wait.... ┃
@echo. ┃ ┃
@echo. ┃ The Files will show U In 5's... ┃
@echo. ┃ ┃
@echo. ┃ Thank U for Ur time~ ┃
@echo. ┃ BoodBye...! ┃
@echo. ┗━━━━━━━━━━━━━━━━━━━━━━━━┛
@echo.
@echo.
@echo.
@ping -n 5 127.1>nul ¬epad list.txt
goto :eof
:prt
setlocal
set "chr=%~1★"
set "chr=!chr:"=!"
set outp=%website%
set/a n=0
:chck
set "tp=!chr:~%n%,1!" &&set/a n+=1
if [!tp!] == [★] goto op
set tm=!tp!
if "!tp!" == " " set tm=^%%20
if "!tp!" == "&" set tm=^%%26
if "!tp!" == "'" set tm=^%%27
:nx
set outp=!outp!!tm!
goto chck
:op
>>list.txt echo %outp: =%
echo %outp: =%
endlocal
goto :eof
GetB.cmd 采用 变量扩展 过滤:
@echo off&setlocal enabledelayedexpansion
set dfhtml=index.html
set dffilety=txt
set website=http://www.pediy.com/tools/Debuggers/ollydbg/
type nul>list_b.txt
for /f "delims=" %%a in ('findstr "href=" %dfhtml%') do (
set "str=%%a"
set "str=!str:href=★!"
set "str=!str:*★=!
if "!str:~-3,3!"=="%dffilety%" (call :rpt "!str:~2!")
)
@cls.
@echo. ┏━━━━━━━━━━━━━━━━━━━━━━━━┓
@echo. ┃ ┃
@echo. ┃ Work finished...!! ┃
@echo. ┃ please Wait... ┃
@echo. ┃ ┃
@echo. ┃ The Files will show U In 5's... ┃
@echo. ┃ ┃
@echo. ┃ Thank U for Ur time~ ┃
@echo. ┃ BoodBye...! ┃
@echo. ┗━━━━━━━━━━━━━━━━━━━━━━━━┛
@echo.
@echo.
@echo.
@ping -n 5 127.1>nul ¬epad list_b.txt
goto :eof
:rpt
setlocal
set "chr=%~1"
set "chr=!chr:"=!"
set "chr=!chr:^"=!
set "chr=!chr: =%%20!"
set "chr=!chr:&=%%26!"
set "chr=!chr:'=%%27!"
set "chr=!chr:|=%%7C!"
>>list_b.txt echo.%website%!chr!
echo.%website%!chr!
endlocal
goto :eof
附件:
代码下载及OllyDbg Script的下载地址
[
Last edited by crenel on 2007-4-16 at 03:33 PM ]