ASP正则提取href标签的值函数

function urlcontent(strHTML)
  Set objRegExp = New Regexp 
  objRegExp.IgnoreCase = True 
  objRegExp.Global = True 
  objRegExp.Pattern =  "<a.+?href=""(.+?)""[^\>]*>.+?</a>"
  urlcontent=objRegExp.replace(strHTML,"$1")
  Set objRegExp = Nothing 
end function

相关文章

• ASP电话号码正则表达式函数 2012/05/08
• ASP四个电子邮箱验证函数 2012/05/08
• ASP正则表达式过滤html函数 2012/05/08
• ASP常用函数 2012/05/02
• ASP格式化时间日期函数 2012/04/30
• asp封装加密成dll文件 2012/04/27
• ASP连接Oracle数据库方法 2012/04/27
• ASP内容分页函数 2012/04/27
• asp无组件文件上传类 2012/04/27
• 防止ASP木马 2012/04/27