求提取超链接地址的正则表达式算法？
如何提取以下代码中所有的超级链接地址
“<a href="1.asp" target="_blank">aaaaaa</a><a href=2.asp>bbbbb</a><a href=3.asp>ccc</a> <li><span
arrHref = Search(ListContentStr, "<a(.*?)href=""([^""""]*?)""([^>]*?)>")
arrImg = Search(ListContentStr, "<img(.*?)src=""([^""""]*?)""")
For Each item In arrHref
Response.Write item & "<br>"
Next
Response.Write "<br>"
For Each item In arrImg
Response.Write item & "<br>"
Next
yewu.asp?id=399
yewu.asp?id=399
yewu.asp?id=400
yewu.asp?id=400
yewu.asp?id=401
yewu.asp?id=401
yewu.asp?id=402
yewu.asp?id=402
yewu.asp?id=403
yewu.asp?id=403
yewu.asp?id=410
yewu.asp?id=410
yewu.asp?id=417
yewu.asp?id=417
yewu.asp?id=418
yewu.asp?id=418
yewu.asp?id=399
yewu.asp?id=399
yewu.asp?id=400
yewu.asp?id=400
yewu.asp?id=401
yewu.asp?id=401
yewu.asp?id=402
yewu.asp?id=402
yewu.asp?id=403
yewu.asp?id=403
yewu.asp?id=410
yewu.asp?id=410
yewu.asp?id=417
yewu.asp?id=417
yewu.asp?id=418
yewu.asp?id=418
UploadFile/menu/2012061817570777.jpg
UploadFile/menu/2012061818023087.jpg
UploadFile/menu/2012061817573898.jpg
UploadFile/menu/2012061817575454.jpg
UploadFile/menu/2012061817590166.jpg
UploadFile/menu/2012061817580709.jpg
UploadFile/menu/2012061818014287.jpg
UploadFile/menu/2012061817584132.jpg
UploadFile/menu/2012061817570777.jpg
UploadFile/menu/2012061818023087.jpg
UploadFile/menu/2012061817573898.jpg
UploadFile/menu/2012061817575454.jpg
UploadFile/menu/2012061817590166.jpg
UploadFile/menu/2012061817580709.jpg
UploadFile/menu/2012061818014287.jpg
UploadFile/menu/2012061817584132.jpg
这段代码能否直接在function里输出匹配的字符串用“
[解决办法]
”分割！
你自己改一下
