|
|
|
|
|
Asp过滤HTML的函数,Asp过滤Html代码 |
|
作者:武汉SEO闵涛 文章来源:本站原创 点击数972 更新时间:2010/7/20 15:28:26 文章录入:mintao 责任编辑:mintao |
|
|
|
Asp过滤Html代码
以下是代码片段: Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Global = True '取闭合的<> objRegExp.Pattern = "<.+?>" '进行匹配 Set Matches = objRegExp.Execute(strHTML) ' 遍历匹配集合,并替换掉匹配的项目 For Each Match in Matches strHtml=Replace(strHTML,Match.Value,"") Next RemoveHTML=strHTML Set objRegExp = Nothing End Function | 过滤图片正则表达式
|
|
|
|
|
|
|
|
|