在网上搜索了千万次,没有一个答案.只有在此请教:如果设置了敏感字过滤,如何使系统自动判断然后转入预审核,由管理员最后审核后再决定是否发布.这一技术好象还没有人研究过,不知道代码如何写,实现的思路样.对论坛限制灌水有极大的作用.对发布危险信息也有好处!请高手不啬赐教.

如果含有k=0如果没有k=1

k=1为正常帖
k=0为预审和

非常感谢,没想到这么快回贴,我水平低.能否再详细一些,或者有这方面的帖子也可以!

过滤你是怎么做的？

<%
'===================系统过滤非法字符开始=================================
Const ForbidStr="垃圾|靠|滚|妈|日|屎｜妈的|傻|垃|屎|蛋|爸|爷|%|and|b"
'过滤函数
Public Function checkForbidStr(guestStr)
checkForbidStr = True
Dim ForbidArr, i
ForbidArr = Split(ForbidStr, "|")
For i = 0 To UBound(ForbidArr)
If InStr(guestStr, ForbidArr(i)) > 0 Then
checkForbidStr = False
Exit Function
End If
Next
checkForbidStr = True
End Function
'===================系统过滤非法字符结束=================================
%>

怎么实现呢?帮助修改一下,多谢了!