急,如何用ASP正则表达式取出以下不同的地址

china_bank 2008-04-15 12:12:31
从以下代码中取出地址:
<a href=http://www.163.com target=_blank class=a>abc</a>
<a href=../../a.htm target=_blank class=a>abc</a>
<a href="../b.html" target=_blank>abc</a>
<a href="/ab/bc/cd.html">abc</a>
<a href="/ab/bc/cd.asp?ab=1&cd=2">abc</a>

以上地址中有相对路径,也有绝对路径,请问如何用一个ASP正则表达式表达(需用ASP的正则表达式)得到:
http://www.163.com
../../a.htm
../b.html
/ab/bc/cd.html
/ab/bc/cd.asp?ab=1&cd=2


请高手剔教
...全文
54 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
myvicy 2008-04-15
哈可以参考下这个帖子:
http://topic.csdn.net/u/20080314/11/4e6d8e04-fd9b-4fd9-aad2-50320b47cc20.html
回复
楼上的正则正解
回复
Dim str:str="<a href=http://www.163.com target=_blank class=a>abc</a>"&_
"<a href=../../a.htm target=_blank class=a>abc </a>" &_
"<a href=""../b.html"" target=_blank>abc </a>"&_
"<a href=""/ab/bc/cd.html"">abc </a>"&_
"<a href=""/ab/bc/cd.asp?ab=1&cd=2"">abc</a>"
Dim re
Set re=New RegExp
re.IgnoreCase=True
re.Global=True
re.Pattern="<a\s*href\s*=\s*['""]?([^\s""']+)['""]?[^>]*>"
Set ms=re.Execute(str)
For Each m In ms
response.Write m.submatches(0)&"<br/>"
Next
Set re=Nothing
回复
aspd199 2008-04-15
str="(.{8}\"?)(.*)(\"| t)(.*)(\n)"
$2结果

不太了解你意思
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2008-04-15 12:12
社区公告
暂无公告