当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP常用函数:ReplaceHTML

ASP
用EasyMailObject组件处理Exchange邮件源代码(6)
用EasyMailObject组件处理Exchange邮件源代码(7)
利用ASP和Access数据库制作局域网网上答题系统
用ASP开发试题库与在线考试系统(1)
用ASP开发试题库与在线考试系统(2)
用ASP开发试题库与在线考试系统(3)
用ASP开发试题库与在线考试系统(4)
用ASP开发试题库与在线考试系统(5)
用ASP开发试题库与在线考试系统(6)
用ASP开发试题库与在线考试系统(7)
用ASP开发试题库与在线考试系统(8)
综合的判断用户输入的合法性的函数
三层动态下拉菜单的例子
将你的网站设置为客户的信任站点--VB方案
论坛中有新贴子功能的实现
ASP 编程中 15 个非常有用的例子
一个的无组件上传的ASP代码
利用ASP实现三个强大功能之一
利用ASP实现三个强大功能之二
利用ASP实现三个强大功能之三

ASP常用函数:ReplaceHTML


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 106 ::
收藏到网摘: n/a

<%
'去掉HTML标记
Public Function ReplaceHTML(Textstr)
Dim Str, re
Str = Textstr
Set re = New RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "<(.[^>]*)>"
Str = re.Replace(Str, "")
Set Re = Nothing
ReplaceHTML = Str
End Function
%>