以上面为例就是要分别取出，http://andrewteman.org/ 和 andrewteman.org这2项~~~

麻烦大家，正则高手来~~~

这么简单的东西还要写正则吗？

<%
ssdoc="<a class=l href=""http://andrewteman.org/"" target=_blank onmousedown=""return clk(0,'','','res','2','')"">andrewteman.org</a>"

V= Split(ssdoc,"""")
For i = 0 To UBound(V)
if Instr(V(i),"http://") > 0 then
Response.Write V(i)&"<br/>"
exit for
end if
Next
%>

<%
ssdoc="<a class=l href=""http://andrewteman.org/"" target=_blank onmousedown=""return clk(0,'','','res','2','')"">andrewteman.org</a>"

ssdoc=Right(ssdoc,len(ssdoc)-Instr(ssdoc,"href=""")-5)
response.write left(ssdoc,Instr(ssdoc,"""")-1)
%>

另一种根据href来找的

要找连接文字同理，根据</a>来找，不过反向

<span id=t><a class=l href="http://andrewteman.org/" target=_blank mousedown="return clk(0,'','','res','2','')">andrewteman.org</a>
</span>
<input type=button value=test onclick="alert(document.all.t.innerHTML.replace(/<.*?>/g,''))">

(href)+=[^\s]+

先提取href="xx" 或href=xx 出来，剩下的事，你自己应该会做了把

dim string:strng = ="<a class=l href=""http://andrewteman.org/"" target=_blank onmousedown=""return clk(0,'','','res','2','')"">andrewteman.org</a>"
dim Reg:Set Reg = new regexp
reg.IgnoreCase = true
reg.global = true
reg.Pattern = "<a (?:[^>]*)href=""([^>]*)"">(.*)<\/a>"
Set Matches = reg.Execute(strng)   ' 执行搜索。
...

$1是href，$2是<a..></a>之间的

帮顶

我来了，帮你顶

TO:webphoenix() 
怎么提取出$1  $2??