巧用asp语言过滤html元素
摘要：巧用asp语言过滤html元素：'过滤html'函数名：GlHtml'作用：过滤html元素'参数：str----要过滤字符'返回值：没有h...
巧用asp语言过滤html元素：
'过滤html
'函数名：GlHtml
'作 用：过滤html 元素
'参 数：str ---- 要过滤字符
'返回值：没有html 的字符
'**************************************************
Public Function GlHtml(ByVal str)
If IsNull(str) Or Trim(str) = "" Then
GlHtml = ""
Exit Function
End If
Dim re
Set re = New RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "(<.[^<]*>)"
str = re.Replace(str, " ")
re.Pattern = "(</[^<]*>)"
str = re.Replace(str, " ")
Set re = Nothing
str = Replace(str, "'", "")
str = Replace(str, Chr(34), "")
GlHtml = str
End Function
【巧用asp语言过滤html元素】相关文章：
★ asp.net用url重写URLReWriter实现任意二级域名第1/2页
★ Asp.Net 文件操作基类(读取,删除,批量拷贝,删除,写入,获取文件夹大小,文件属性,遍历目录)
上一篇：
asp用户登录模块实例代码
下一篇：
asp用户注册示例代码