脚本之家 服务器常用软件
快捷导航
您的位置：首页 → 网络编程 → 正则表达式 → ASP超级链接和HTML函数

ASP超级链接和HTML函数正则表达式 修正版

 更新时间：2010年01月02日 12:20:34   作者：  
ASP超级链接和HTML函数 正则表达式的使用，最后一个实例经过测试。
过滤超级链接
复制代码 代码如下:

Function RegRemoveHref(HTMLstr)
Set ra = New RegExp
ra.IgnoreCase = True
ra.Global = True
ra.Pattern = "<A[^>]+>(.+?)<\/A>"
RegRemoveHref = ra.replace(HTMLstr,"$1")
END Function


过滤所有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

过滤所有HTML代码 和空格换行
复制代码 代码如下:

Function RemoveHTML(strHTML)
Dim objRegExp, Match, Matches
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "<.+?>"
'objRegExp.Pattern = "(\r|\n|\r\n| |\t| )"
Set Matches = objRegExp.Execute(strHTML)
For Each Match in Matches
strHtml=Replace(strHTML,Match.Value,"")
Next
objRegExp.Pattern = "(\r|\n|\r\n| |\t| )"
Set Matches = objRegExp.Execute(strHTML)
For Each Match in Matches
strHtml=Replace(strHTML,Match.Value,"")
Next
RemoveHTML=strHTML
Set objRegExp = Nothing
End Function

asp使用正则表达式去除script代码和HTML代码
一、清楚内容中的Javsscript 代码 这个代码的作用是去掉用<script </script>标记包含的所有部分。
根据实际需要，它也许不能满足要求。如果用在屏蔽客户提交代码的地方，应保证这一步在最后执行。
很多人还会拼凑这样的标记，应小心。
复制代码 代码如下:

Function ClearJSCode(originCode)
Dim reg
set reg = New RegExp
reg.Pattern = "<SCRIPT[^<]*</SCRIPT>"
reg.IgnoreCase = True
reg.Global = True
clearJSCode = reg.Replace(originCode, "")
End Function

二、清除内容中的HTML代码
复制代码 代码如下:

Function ClearHTMLCode(originCode)
Dim reg
set reg = new RegExp
reg.Pattern = "<[^>]*>"
reg.IgnoreCase = True
reg.Global = True
ClearHTMLCode = reg.Replace(originCode, "")
End Function

复制代码 代码如下:

<js jsid="1" jsname="去除内容页里干扰信息"><![CDATA[
var sourcehtml=function(){/*%s*/}.toString().slice(13, -3);
parser9527=function()
{
var ss=sourcehtml;
ss=ss.replace(/<.*?>/ig,"");
ss=ss.replace(/(\r|\n|\r\n| |\t| )/ig,"");
ss=ss.replace(/(<\/a>)/ig,"");
ss=ss.replace(/<a((.|\n)*?)>/ig,"");
ss=ss.replace("_网易新闻中心","");
/*
ss=ss.replace(/<iframe((.|\n)*?)<\/iframe>/ig,"");
ss=ss.replace(/<script((.|\n)*?)<\/script>/ig,"");
ss=ss.replace(/<address((.|\n)*?)<\/address>/ig,"");
ss=ss.replace(/(<\/a>)/ig,"");
ss=ss.replace(/<a((.|\n)*?)>/ig,"");
ss=ss.replace(/<SELECT((.|\n)*?)<\/SELECT>/ig,"");
ss=ss.replace(/<TABLE((.|\n)*?)<\/TABLE>/ig,"");
ss=ss.replace(/<img((.|\n)*?)>/ig,"");
ss=ss.replace(/<TABLE((.|\n)*?)>/ig,"");
ss=ss.replace(/(<\/TABLE>)/ig,"");
ss=ss.replace(/<TR((.|\n)*?)>/ig,"<BR>");
ss=ss.replace(/(<\/TR>)/ig,"");
ss=ss.replace(/<nobr((.|\n)*?)>/ig,"<BR>");
ss=ss.replace(/<nobr((.|\n)*?)>/ig,"");
ss=ss.replace(/(<\/nobr>)/ig,"");
ss=ss.replace(/<TD((.|\n)*?)>/ig," ");
ss=ss.replace(/(<\/TD>)/ig,"");
ss=ss.replace(/<span id=((.|\n)*?)<\/small>/ig,"");
ss=ss.replace(/<div((.|\n)*?)>/ig,"");
ss=ss.replace(/(<\/div>)/ig,"");
*/
return ss;
}
parser9527();
]]></js>

ASP常用的正则过滤函数 可过滤html js style div font

开发程序，经常要用到正则表达式进行过滤一些不需要的东西，比如html js style div font，有时候需要过滤极个别的，有时候需要过滤好几种，不管怎么过滤，万变不离其宗。
这是我收藏的一些过滤函数，可以用来过滤您不需要的代码。如果需要过滤多种，可以嵌套使用，也可以自己整合代码。不过不建议嵌套使用，因为那样效率太低。

Asp 正则表达式 过滤 所有 html 标记 ：
复制代码 代码如下:

Function LoseHtml(ContentStr)
Dim ClsTempLoseStr,regEx
ClsTempLoseStr = Cstr(ContentStr)
Set regEx = New RegExp
regEx.Pattern = "<\/*[^<>]*>"
regEx.IgnoreCase = True
regEx.Global = True
ClsTempLoseStr = regEx.Replace(ClsTempLoseStr,"")
LoseHtml = ClsTempLoseStr
End function



Asp 正则表达式 过滤 style 标记 ：
regEx.Pattern = "(<style)+[^<>]*>[^\0]*(<\/style>)+"
Asp 正则表达式 过滤 层 div 标记 ：
regEx.Pattern = "<(\/){0,1}div[^<>]*>"
Asp 正则表达式 过滤 链接 a 标记 ：
regEx.Pattern = "<(\/){0,1}a[^<>]*>"
Asp 正则表达式 过滤 字体 font 标记 ：
regEx.Pattern = "<(\/){0,1}font[^<>]*>"
Asp 正则表达式 过滤 span 标记 ：
regEx.Pattern = "<(\/){0,1}span[^<>]*>"
Asp 正则表达式 过滤 object 标记 ：
regEx.Pattern = "<object.*?/object>"
Asp 正则表达式 过滤 iframe 标记：
regEx.Pattern = "(<iframe){1,}[^<>]*>[^\0]*(<\/iframe>){1,}"
Asp 正则表达式 过滤 script ：
regEx.Pattern = "(<script){1,}[^<>]*>[^\0]*(<\/script>){1,}"
Asp 正则表达式 过滤 Class 标记 ：
regEx.Pattern = "(class=){1,}(""|\'){0,1}\S+(""|\'|>|\s){0,1}"

字符串替换 Replace 的正则表达式 ：
复制代码 代码如下:

<%
Function ReplaceReg(str,patrn,replStr,Ignor)
'=========================================
'参数解释:
'str 原来的字符串
'patrn 要替换的字符串（正则表达式）
'replStr 要替换成的字符串
'Ignor 是否区分大小写(1不区分,0区分)
'=========================================
Dim regEx ' 建立变量。
If Ingor=1 Then Ingor=true else Ingor=false
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = Ignor ' 设置是否区分大小写。
regEx.Global=True
ReplaceReg = regEx.Replace(str,replStr) ' 作替换。
End Function
'例如 将 www.xxx.com 替换成 <a href="https://www.jb51.net">www.jb51.net</a>
Response.Write(ReplaceReg("脚本之家www.xxx.com","www\.xxx\.com","<a href=""https://www.jb51.net"">www.jb51.net</a>",1))
%>
您可能感兴趣的文章:

相关文章

  • js 玩转正则表达式之语法高亮

    js 玩转正则表达式之语法高亮

    学了几天正则，差不多该总结整理写成果了，通过分析2位大神的代码，整理出来的一篇很实用的文章
    2014-05-05
  • JavaScript正则表达式验证中文实例讲解

    JavaScript正则表达式验证中文实例讲解

    JavaScript经常会验证中文本文将提供使用正则表达式实现，接下来介绍两个实例,感兴趣的你可不要错过了哈，希望本例知识点可以帮助到你
    2013-02-02
  • 一文秒懂python正则表达式常用函数

    一文秒懂python正则表达式常用函数

    这篇文章主要介绍了python正则表达式常用函数及使用方法，本文给大家介绍的非常详细，对大家的学习或工作具有一定的参考借鉴价值,需要的朋友可以参考下
    2020-03-03
  • 一文教会你用正则表达式校验日期时间格式

    一文教会你用正则表达式校验日期时间格式

    日期的格式多种多样，有如："yyyy-MM-dd HH:mm:ss"、"yyyy/MM/dd HH:mm:ss"、"yyyyMMdd HH:mm:ss"等，当然也有的只记录到天,下面这篇文章主要给大家介绍了关于用正则表达式校验日期时间格式的相关资料,需要的朋友可以参考下
    2022-10-10
  • 常用正则表达式收集

    常用正则表达式收集

    这篇文章主要整理了ASP.NET的常用正则表达式，有需要的朋友可以收藏一下
    2015-09-09
  • Centos7 Shell编程之正则表达式、文本处理工具详解

    Centos7 Shell编程之正则表达式、文本处理工具详解

    正则表达式可以很灵活的提供各种模糊匹配的筛选规则。常被用来检索、替换那些符合某个模式的文本，这篇文章主要介绍了Centos7 Shell编程之正则表达式、文本处理工具,需要的朋友可以参考下
    2022-08-08
  • 正则表达式 学习参考 推荐入门者看

    正则表达式 学习参考 推荐入门者看

    正则表达式(Regular Expression)是一种匹配模式，描述的是一串文本的特征。他可以实现一些可变字符的替换。
    2009-07-07
  • 常用正则表达式 整理篇

    常用正则表达式 整理篇

    正则表达式用于字符串处理，表单验证等场合，实用高效，但用到时总是不太把握，以致往往要上网查一番。我将一些常用的表达式收藏在这里，作备忘之用。本贴随时会更新。
    2009-02-02
  • asp.net 正则表达式[经常用的到]

    asp.net 正则表达式[经常用的到]

    经常用的到的一些正则表达式，正则规则是这样写的，大家可以根据自己的需要，用各种语言调用即可
    2008-11-11
  • 正则表达式简介及在C++11中的简单使用教程

    正则表达式简介及在C++11中的简单使用教程

    正则表达式(regular expression)是计算机科学中的一个概念，又称规则表达式，通常简写为regex、regexp、RE、regexps、regexes、regexen。接下来通过本文给大家介绍正则表达式简介及在C++11中的简单使用教程，一起通过本文学习吧
    2017-02-02

最新评论