中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 关于之前在html文件提取地址的问题

crenel
新手上路

积分 18
发帖 6
注册 2007-4-14
状态离线

『楼主』: 关于之前在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 &notepad 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 &notepad 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 ]

2007-4-17 04:31

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: