标题 | 巧用asp语言过滤html元素 |
内容 | 巧用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 |
随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。