通常在HTML编辑器发布过程中，会出现一些自动生成的HTML标签，或者在留言板程序应用过程中，也会出现有人恶意写入一些HTML代码的情况，所以怎么精准的过滤掉某些特定的属性标签和参数呢？小生以多年开发经验，使用ASP的非正则表达式来实现了过滤功能，下面是代码：

<%

Function ReplaceText(fString,patrn,replStr) 　Set regEx = New RegExp ' 建立正则表达式。 　regEx.Pattern = patrn ' 设置模式。 　regEx.IgnoreCase = True ' 设置是否区分大小写。 　regEx.Global = True ' 设置全局可用性。 　ReplaceText = regEx.Replace(""&fString&"",""&replStr&"") ' 作替换。 　Set regEx=nothing End Function

Function MBrow(str) 　str=ReplaceText(str,"data-scayt_word=""([^""]*)""","")　'把蓝色部分的属性修改为自己所过滤的属性名称即可 　str=ReplaceText(str,"data-scaytid=""([^""]*)""","") 　'红色部分则是过滤掉属性后面双引号中的质 　MBrow = str End Function

%> 本文来源于广州网站建设公司与广州网站设计制作公司-广帆互动广州公司！