Asp中去除脚本代码

Asp中去除脚本代码

 
‘================================================

‘ 显示解释函数,返回根据参数允许显示的格式字符串,具体调用方法可从后台管理获得

‘ 输入参数:

‘ s_Content : 要转换的数据字符串

‘ s_Filters : 要过滤掉的格式集,用逗号分隔多个

‘================================================

Function eWebEditor_DeCode(s_Content, sFilters)

 Dim a_Filter, i, s_Result, s_Filters

 eWebEditor_Decode = s_Content

 If IsNull(s_Content) Then Exit Function

 If s_Content = “” Then Exit Function

 s_Result = s_Content

 s_Filters = sFilters
 ‘ 设置默认过滤

 If sFilters = “” Then s_Filters = “script,object”
 a_Filter = Split(s_Filters, “,”)

 For i = 0 To UBound(a_Filter)

  s_Result = eWebEditor_DecodeFilter(s_Result, a_Filter(i))

 Next

 eWebEditor_DeCode = s_Result

End Function
%>
<Script Language=JavaScript RunAt=Server>

//===============================================

// 单个过滤

// 输入参数:

// s_Content : 要转换的数据字符串

// s_Filter : 要过滤掉的单个格式

//===============================================

function eWebEditor_DecodeFilter(html, filter){

 switch(filter.toUpperCase()){

 case “SCRIPT”:  // 去除所有客户端脚本javascipt,vbscript,jscript,js,vbs,event,…

  html = eWebEditor_execRE(“</?script[^>]*>”, “”, html);

  html = eWebEditor_execRE(“(javascript|jscript|vbscript|vbs):”, “$1:”, html);

  html = eWebEditor_execRE(“on(mouse|exit|error|click|key)”, “<I>on$1</I>”, html);

  html = eWebEditor_execRE(“&#”, “<I>&#</I>”, html);

  break;

 case “TABLE”:  // 去除表格<table><tr><td><th>

  html = eWebEditor_execRE(“</?table[^>]*>”, “”, html);

  html = eWebEditor_execRE(“</?tr[^>]*>”, “”, html);

  html = eWebEditor_execRE(“</?th[^>]*>”, “”, html);

  html = eWebEditor_execRE(“</?td[^>]*>”, “”, html);

  break;

 case “CLASS”:  // 去除样式类class=””

  html = eWebEditor_execRE(“(<[^>]+) class=[^ |^>]*([^>]*>)”, “$1 $2”, html) ;

  break;

 case “STYLE”:  // 去除样式style=””

  html = eWebEditor_execRE(“(<[^>]+) style=\”[^\”]*\”([^>]*>)”, “$1 $2”, html);

  break;

 case “XML”:   // 去除XML<?xml>

  html = eWebEditor_execRE(“< \\?xml[^>]*>”, “”, html);

  break;

 case “NAMESPACE”: // 去除命名空间<o:p></o:p>

  html = eWebEditor_execRE(“<\/?[a-z]+:[^>]*>”, “”, html);

  break;

 case “FONT”:  // 去除字体<font></font>

  html = eWebEditor_execRE(“</?font[^>]*>”, “”, html);

  break;

 case “MARQUEE”:  // 去除字幕<marquee></marquee>

  html = eWebEditor_execRE(“</?marquee[^>]*>”, “”, html);

  break;

 case “OBJECT”:  // 去除对象<object><param><embed></object>

  html = eWebEditor_execRE(“</?object[^>]*>”, “”, html);

  html = eWebEditor_execRE(“</?param[^>]*>”, “”, html);

  html = eWebEditor_execRE(“</?embed[^>]*>”, “”, html);

  break;

 default:

 }

 return html;

}
// ============================================

// 执行正则表达式替换

// ============================================

function eWebEditor_execRE(re, rp, content) {

 oReg = new RegExp(re, “ig”);

 r = content.replace(oReg, rp);

 return r;

}
</Script>
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/111124.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

  • cmd中实现代码雨的命令。。。「建议收藏」

    cmd中实现代码雨的命令。。。「建议收藏」颜色修改时不能使用十六进制数@echoofftitledigitalraincolor0bsetlocalENABLEDELAYEDEXPANSIONfor/l%%iin(0)

    2022年8月5日
    8
  • 管理会计公式大全

    管理会计公式大全以产品变动生产成本为基础的加成率 加成率 变动生产成本总额 目标利润 固定制造费用 非生产成本 100 价格差异 实际用量 实际价格 实际用量 标准价格 实际用量 实际价格 标准价格 数量差异 实际用量 标准价格 标准用量 标准价格 实际用量 标准用量 标准价格 1 产品价格 单位产品成本 单位产品成本 加成率 单位产品成本 1 加成率 二 加成率的确定以产品总成本为基础的加成率 加成率 成本总额 目标利润 100

    2025年11月24日
    4
  • python实现压缩,解压文件,使用密码解压文件。

    python实现压缩,解压文件,使用密码解压文件。

    2021年9月18日
    62
  • APP——List「建议收藏」

    [‘王者荣耀’,’QQ’,’作业帮-学习辅导’,’绝地求生:刺激战场’,’爱奇艺’,’快手’,’腾讯视频’,’微信’,’抖音短视频’,’全民K歌’,’手机淘宝’,’迷你世界’,’QQ音乐’,’优酷’,’WiFi万能钥匙’,’酷狗音乐’,’荒野行动’,’互动作业’,’穿越火线:荒岛特训-60V60′,’QQ飞车手游’,’拼多多’,’绝地求生全军出击’,’…

    2022年4月9日
    37
  • 小白都能看懂 XAMPP的下载安装配置详细教程(含拒绝访问坑)[通俗易懂]

    小白都能看懂 XAMPP的下载安装配置详细教程(含拒绝访问坑)[通俗易懂]话不相瞒,当初为了在xampp里面配置phpwind,我在卸载与安装之间来回了不下10次,而且我可能招坑体质,回想起来真是一把泪了。但是我的phpwind始终还是安装不成功,真的很无奈。最终,byebye了您。废话不说,直接干了。文章目录一、下载(三步)第一步:找对应的操作系统版本第二步:选一个迭代版本第三步:找到安装包二、安装三、配置第一步:配置Apace第一个文件(httpd.conf),需要修改两个地方。第二个文件(http-ssl.conf),需修改三个地方。第二步:配置MySQL第三步:配置S

    2022年7月12日
    64
  • strtok函数与函数用法实例

    strtok函数与函数用法实例strtok函数简介及运用实例(利用strtok函数分割字符串及单词逆序)

    2025年8月7日
    5

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号