下面的网页如果提取代理地址？

ebhb

//--></SCRIPT></TD><TD class="list">3128</TD><TD class="list">HTTP</TD><TD class="list">美国 中部/南部(IANA)</TD><TD class="list">11-22 00:25</TD><TD class="list">7.003</TD><TD class="list"><a href=whois.php?whois=201.75.14.156 target=_blank>whois</TD></TR>
<TR align="center" bgcolor="#fbfbfb" onDblClick="clip('206.124.17.4:8888');alert('已拷贝到剪贴板!')" onMouseOver="this.style.backgroundColor='#E1E8E8';return true;" onMouseOut="this.style.backgroundColor='#fbfbfb';"><TD  class="list">7</TD><TD class="list"><SCRIPT LANGUAGE="JavaScript">
需要一个正则表达式，取206.124.17.4:8888

afan

$Str = _
'//--></SCRIPT></TD><TD class="list">3128</TD><TD class="list">HTTP</TD><TD class="list">美国 中部/南部(IANA)</TD><TD class="list">11-22 00:25</TD><TD class="list">7.003</TD><TD class="list"><a href=whois.php?whois=201.75.14.156 target=_blank>whois</TD></TR>' & @CRLF & _
'<TR align="center" bgcolor="#fbfbfb" onDblClick="clip(' & "'" & '206.124.17.4:8888' & "'" & ');alert(' & "'" & '已拷贝到剪贴板!' & "'" & ')" onMouseOver="this.style.backgroundColor=' & "'" & '#E1E8E8' & "'" & ';return true;" onMouseOut="this.style.backgroundColor=' & "'" & '#fbfbfb' & "'" & ';"><TD  class="list">7</TD><TD class="list"><SCRIPT LANGUAGE="JavaScript">' & @CRLF & _
''
Msgbox(0,0,$str)
$sR = StringRegExp($str, 'clip\(.(.+).\);alert', 3)
If @error = 0 Then Msgbox(0,0,$sR[0])

ebhb

谢谢afan了，能不能解释一下啊？什么意思？

水木子

没明白这个正则表达式
$sR = StringRegExp($str, 'clip\(.(.+).\);alert', 3)

'clip\(.(.+).\);alert' 这一句为什么要这样写？

ebhb

取http://www.proxycn.com/html_proxy/http-1.html这个地址的代理地址，本来是50个，但只能取18个，不知道什么原因。

afan

回复 5# ebhb


    可以取到100个啊，你应该是获取源码有问题吧~

afan

回复 4# 水木子


    只用了最简单的匹配字符（括号用了转义符\），不要往深处想，呵呵~

ebhb

谢谢，谢谢，我用的是那个正则表达式测试帖子里面来测试的，看来那个测试程序有点问题。
     $Url="http://www.proxycn.com/html_proxy/http-1.html"
     $oIE = _IECreate ($url)        
     $sHTML = _IEBodyReadHTML ($oIE)
   $sR = StringRegExp($sHTML, 'clip\(.(.+).\);alert', 3)
   If @error = 0 Then Msgbox(0,0,$sR[99])
Exit
用上面的测试没问题了。