您正在使用 IPV4 [3.81.79.135] 访问本站,您本次已经查看了 1 页
用户名: 密 码: 验证码:     用QQ登录本站
首页 软件 编程 笑话 知识 公告 台风 日历 计算器
[公益]保护绿色环境,构建和谐社会       悟空收录网      

【腾讯云】 爆款2核2G3M云服务器首年 61元,叠加红包再享折上折      
[公益] 地球是我家,绿化靠大家      
2024年 清明节 006
2024年 劳动节 033
2025年 元 旦 278
2025年 春 节 306
综合数码金融娱乐服务报刊政府机构 推荐 排名 今日 申请 友情  
您现在的位置:首页 >> ASP/ASP.net >> 内容
本类新增
本类热门
ASP正则表达式清除HTML指定标签
内容摘要: 在HTML编辑器发布过程中,会出现一些自动生成的HTML标签,或者在留言板程序应用过程中,也会出现有人恶意写入一些HTML代码的情况,所以怎么精准的过滤掉某些特定的属性标签和参数呢?小生以多年开发经验,使用ASP的非正则表达式来实现了过滤功能,下面是代码:%Function ReplaceText(fString,patrn,replStr)Set regE......
在HTML编辑器发布过程中,会出现一些自动生成的HTML标签,或者在留言板程序应用过程中,也会出现有人恶意写入一些HTML代码的情况,所以怎么精准的过滤掉某些特定的属性标签和参数呢?小生以多年开发经验,使用ASP的非正则表达式来实现了过滤功能,下面是代码:


<%


Function ReplaceText(fString,patrn,replStr)

Set regEx = New RegExp ' 建立正则表达式。

regEx.Pattern = patrn ' 设置模式。

regEx.IgnoreCase = True ' 设置是否区分大小写。

regEx.Global = True ' 设置全局可用性。

ReplaceText = regEx.Replace(""&fString&"",""&replStr&"") ' 作替换。

Set regEx=nothing

End Function


Function MBrow(str)

str=ReplaceText(str,"data-scayt_word=""([^""]*)""","")'把蓝色部分的属性修改为自己所过滤的属性名称即可

str=ReplaceText(str,"data-scaytid=""([^""]*)""","") '红色部分则是过滤掉属性后面双引号中的质

MBrow = str

End Function


%>

版权声明:本内容来源于网络,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。
上一篇:textarea 多行数组分割处理方法

 

下一篇:老y文章管理系统友情链接调用参数说明

发布日期:2021/6/15
手机扫二维码直达本页
发布时间:12:34:56
点  击:6
录  入:齐天大圣
相关文章
Baidu
YiJiaCMS 7.3.8 build231228(MSSQL) 闽ICP备05000814号-1
本空间由腾讯云(轻量应用服务器)提供,Cloudflare提供加速防护
运行时间载入中.....