繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 过滤掉危险的HTML标记：script,ifame,object
- ASP
- Adodb.Command 平时很少注意到的一个参数
- Asp.Net控件加载错误的解决方法
- 远程连接access数据库的方法
- 创建具有JScript的HTML的XMLHTTP
- 在Asp中如何快速优化分页的技巧
- 用VB生成DLL封装ASP代码，连接数据库
- RS.OPEN SQL,CONN,A,B 全接触
- 利用adodb.stream直接下载任何后缀的文件(防盗链)
- 用ASP编程控制在IIS建立Web站点的程序代码
- 使用VBScript操作Html复选框（CheckBox）控件
- 把文章内容中涉及到的图片自动保存到本地服务器
- 两个不同数据库表的分页显示解决方案
- 使用组件封装数据库操作(一)
- 使用组件封装数据库操作(二)
- 如何在pb中创建COM组件，并在asp中调用并返回结果集？
- 用ASP和Microsoft.XMLDOM分析远程XML文件
- 浅谈无刷新取得远程数据技术
- 将ASP纪录集输出成n列的的表格形式显示的方法
- 在ASP中通过oo4o连接Oracle数据库的例子
- Server Application Error详细解决办法
ASP 中的 过滤掉危险的HTML标记：script,ifame,object
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 195 ::
收藏到网摘: n/a
对于提交的HTML代码，如果含有script，iframe,frameset等标记，对网站本身会构成一定的潜在威胁，使用下面的函数可以过滤掉指定的HTML标记。
注：
1.对于单标记(如：<hr />,<br />等)，因其对网站本身不会构成威胁，故未将单标记纳过过滤范围。
2.参数strHTML：待过滤处理的HTML代码内容
3.参数strTAGs：为待过滤掉的HTML标记名，各标记名以英文逗号( , )为间隔
复制代码 代码如下:
<%
'Wrtten by i{At}CnLei.Com
Function lFilterBadHTML(byval strHTML,byval strTAGs)
Dim objRegExp,strOutput
Dim arrTAG,i
arrTAG=Split(strTAGs,",")
Set objRegExp = New Regexp
strOutput=strHTML
objRegExp.IgnoreCase = True
objRegExp.Global = True
For i=0 to UBound(arrTAG)
objRegExp.Pattern = "<"&arrTAG(i)&"[\s\S]+</"&arrTAG(i)&"*>"
strOutput = objRegExp.Replace(strOutput, "")
Next
Set objRegExp = Nothing
lFilterBadHTML = strOutput
End Function
'Wrtten by i{At}CnLei.Com
Function lFilterBadHTML(byval strHTML,byval strTAGs)
Dim objRegExp,strOutput
Dim arrTAG,i
arrTAG=Split(strTAGs,",")
Set objRegExp = New Regexp
strOutput=strHTML
objRegExp.IgnoreCase = True
objRegExp.Global = True
For i=0 to UBound(arrTAG)
objRegExp.Pattern = "<"&arrTAG(i)&"[\s\S]+</"&arrTAG(i)&"*>"
strOutput = objRegExp.Replace(strOutput, "")
Next
Set objRegExp = Nothing
lFilterBadHTML = strOutput
End Function
'Example
Dim sPageCont
sPageCont= "...网页正文内容..."
sPageCont=FilterBadHTML(sPageCont,"script,iframe,object,table")
%>
评论 (0) All
