用正则表达式过滤html代码


代码例子如下:
<%
Option Explicit

Function stripHTML(strHTML)
'Strips the HTML tags from strHTML

Dim objRegExp, strOutput
Set objRegExp = New Regexp

objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "<.+?>"

'Replace all HTML tag matches with the empty string
strOutput = objRegExp.Replace(strHTML, "")

'Replace all < and > with < and >
strOutput = Replace(strOutput, "<", "<")
strOutput = Replace(strOutput, ">", ">")

stripHTML = strOutput 'Return the value of strOutput

Set objRegExp = Nothing
End Function
%>

<form method="post" id=form1 name=form1>
<b>Enter an HTML String:</b><br>
<textarea name="txtHTML" cols="50" rows="8" wrap="virtual"><%=Request("txtHTML")%></textarea>
<p>
<input type="submit" value="Strip HTML Tags!" id=submit1 name=submit1>
</form>

<% if Len(Request("txtHTML")) > 0 then %>
<p><hr><p>
<b><u>View of string <i>with no</i> HTML stripping:</u></b><br>
<xmp>
<%=Request("txtHTML")%>
</xmp><p>
<b><u>View of string <i>with</i> HTML stripping:</u></b><br>
<pre>
<%=StripHTML(Request("txtHTML"))%>
</pre>
<% End If %>



相关阅读:
JSP教程(二)
理解php原理的opcodes(操作码)
ASP.NET开发中的八个最佳实践上
Joomla教程:去掉分类文章列表中的文章序号
js键盘方向键 文章翻页跳转的效果[小说站常用已支持firefox]
CSS实现强制浏览器分页
Windows系统常见的操作弊习
JavaScript 事件冒泡应用实例分析
FreeBSD 4.0 Kernel Hacking Guide--i386/i386/p
CSS制作网页实例:DIV仿框架结构
按键盘方向键翻页跳转的javascript代码(支持ie,firefox)
JSP入门教程(2)
VBS基础编程教程 (第3篇)
添加一个以前写的table的spliter给大家
快速导航

Copyright © 2016 phpStudy |