精美而实用的网站,关注web编程技术、网站运营、SEO推广,让您轻松愉快的学习

表单用户提交数据的时候,用户注册的时候,一些表单栏目我们需要做敏感不良字符过滤,去掉一些违法敏感字符,青岛星网下面跟大家分享:ASP敏感不良字符过滤函数

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
%>

青岛星网温馨提醒:示例中仅列出若干字符,可根据你的需要自己添加较多的过滤文字,从整体来说,函数简单实用,可用于用户注册用户名过滤,留言吧过滤等等。

Tags:ASP 函数