1. 论坛系统升级为Xenforo,欢迎大家测试!
    Dismiss Notice

如何获取源代码中的某段特定代码?

Discussion in '后端开发' started by 不学无术, Jan 2, 2006.

  1. 不学无术

    不学无术 Ulysses 的元神

    Joined:
    Aug 31, 2005
    Messages:
    16,714
    Likes Received:
    39
    学写小偷程序,结果将远程页面源代码都获取过来了,但是不知道如何获取其中某段特定的内容。

    例如我要获取主题,源代码对应的有如下的部分:

    <tr><td>主题:<b>这里是主题</b></td></tr>

    现在想将“这里是主题”这段文字获取出来,该如何写正则表达式呢?

    论坛有人发过一段代码,可是我不会用:

    HTML:
    Function body(wstr,start,over)
        Dim xiaoqi
        Set xiaoqi = New Regexp'设置配置对象
        xiaoqi.IgnoreCase = True'忽略大小写
        xiaoqi.Global = True'设置为全文搜索
        xiaoqi.Pattern = "" & start & ".+?" & over & ""'正则表达式
    	Dim Matches
        Set Matches =xiaoqi.Execute(wstr)'开始执行配置
        set xiaoqi=nothing
        body=""
    	Dim Match
        For Each Match in Matches
            body=body&Match.Value '循环匹配
        Next
    End Function
    针对上面的应用,调用该函数时,start 和 over 应该填写什么呢?

    谢谢!
     
  2. 小叶

    小叶 New Member

    Joined:
    Sep 4, 2005
    Messages:
    17,941
    Likes Received:
    33
    dim content
    content=body(wstr,"<tr><td>主题:<b>","</b></td></tr>")
     
  3. Kevin

    Kevin New Member

    Joined:
    Oct 23, 2005
    Messages:
    12,728
    Likes Received:
    55
  4. 小叶

    小叶 New Member

    Joined:
    Sep 4, 2005
    Messages:
    17,941
    Likes Received:
    33
    我都快吐了,,google的啥玩意,,竟然会自动转换成英文.
     
  5. 不学无术

    不学无术 Ulysses 的元神

    Joined:
    Aug 31, 2005
    Messages:
    16,714
    Likes Received:
    39
    谢谢小叶,解决了。

    Google 的高级玩意儿,将“主题:”本地化了。

    :)
     
  6. 老林

    老林 New Member

    Joined:
    Sep 6, 2005
    Messages:
    10,580
    Likes Received:
    36