asp正则式获取网页链接和标题

假设有如下字符串:

strSource="<a href='http://www.callcenter.com/viewNewsDetail.asp?ID=10873&classID=3' title='广发银行信用卡中心外呼团'><span class='text-main'>[09/11]</span>广发银行信用卡中心外呼团</a>"

现在,需要提取 href 后面的网址和链接的文字。
ASP的实现

<% 
Dim str, reg, objMatches 
str = strSource
Set reg = new RegExp 
reg.IgnoreCase = True 
reg.Global = True 
reg.Pattern = "http://([^\s]+)"".+?span.+?\[(.+?)\].+?>(.+?)<" 
Set objMatches = reg.Execute(str) 
If objMatches.Count > 0 Then 
Response.Write("网址:") 
Response.Write(objMatches(0).SubMatches(0)) 
Response.Write("<br>") 
Response.Write("标题:") 
Response.Write(objMatches(0).SubMatches(2)) 
End If 
%>

以上代码参考了网上信息,有兴趣者可以测试!

Original resource:Click here

发表评论

电子邮件地址不会被公开。 必填项已用*标注