表单用户提交数据的时候,用户注册的时候,一些表单栏目我们需要做敏感不良字符过滤,去掉一些违法敏感字符,青岛星网下面跟大家分享:ASP敏感不良字符过滤函数
<% Function ChkBadWords(fString) Dim BadWords,bwords,i BadWords = "狗|系统|中奖|000|王八|青岛星网" '这里面是需要过滤的文字,根据你的需要自己添吧。 IF(Not(IsNull(BadWords) or IsNull(fString)))THEN bwords = Split(BadWords, "|")'遍历要过滤的内容 For i = 0 to UBound(bwords) fString = Replace(fString, bwords(i), string(Len(bwords(i)),"*")) Next ChkBadWords = fString END IF End Function %>
青岛星网温馨提醒:示例中仅列出若干字符,可根据你的需要自己添加较多的过滤文字,从整体来说,函数简单实用,可用于用户注册用户名过滤,留言吧过滤等等。