假设有如下字符串:

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

随机文章

一行代码,轻松将浏览器变成临时编辑器
一行代码,轻松将浏览器变成临时编辑器

乳房还是天然的好,想知道哪里有吗?
乳房还是天然的好,想知道哪里有吗?

OPPO N1将于12月10日在美国和欧洲上市
OPPO N1将于12月10日在美国和欧洲上市

Flipboard更新后一大优点已经不再了
Flipboard更新后一大优点已经不再了

如果android能运行windows程序,你会不会更喜欢android
如果android能运行windows程序,你会不会更喜欢android

Java基础第四讲:Java基本语法(三)
Java基础第四讲:Java基本语法(三)

相关文章

angular表单验证$parsers和$validators方式区别
angular表单验证$parsers和$validators方式区别

engadget发布上周android系统更新摘要
engadget发布上周android系统更新摘要

java制作坦克大战TankWar
java制作坦克大战TankWar

sandisk cruzer U盘量产,写入ISO
sandisk cruzer U盘量产,写入ISO

windows最新版chrome出现卡顿?
windows最新版chrome出现卡顿?

内容分享:道招
本文链接:asp正则式获取网页链接和标题
道招声明:除特别标注或作者不详外,本站所有文章均为原创,转载请注明。欢迎共同关注互联网!