首页 > 编程 > Regex > 正文

怎么用正则表达式写的HTML分离函数

2024-09-07 17:39:57
字体:
来源:转载
供稿:网友

存成.asp文件,执行,你用ASPHTTP抓内容的时候用这个很爽,当然自己要改进一下了

Option Explicit

Function stripHTML(strHTML)
'Strips the HTML tags from strHTML

  Dim objRegExp, strOutput
  Set objRegExp = New Regexp

  objRegExp.IgnoreCase = True
  objRegExp.Global = True
  objRegExp.Pattern = "<.>"

  'Replace all HTML tag matches with the empty string
  strOutput = objRegExp.Replace(strHTML, "")

  'Replace all with
  strOutput = Replace(strOutput, "   strOutput = Replace(strOutput, ">", ">")

  stripHTML = strOutput    'Return the value of strOutput

  Set objRegExp = Nothing
End Function


%>
 


  Enter an HTML String:

  
  


  

 


0 then %>
    

 

 



    View of string with no HTML stripping:

    

<br>    <br>    


    View of string with HTML stripping:

    

 

        


 

 

    以上就是怎么用正则表达式写的HTML分离函数的全部内容,更多内容请继续关注错新技术频道网站!

 

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表