净化网络环境asp程序实现过滤脏话

《净化网络环境asp程序实现过滤脏话》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、净化网络环境ASP程序实现过滤脏话>>教育资源库<!--#includefile="../conn/dbconn1.asp"--><!--#includefile="../inc/safe.asp"--><%content=Replace_Text(request.Form("content"))content=replace(content,"<","[")content=replace(content,">","]")ne("ne("ip")rname=Replace_Text(request.Form("rname"))rname=re

2、place(rname,"<","[")rname=replace(rname,">","]")'username=Replace_Text(request.Form("username"))'username=replace(username,"<","[")'username=replace(username,">","]")'处理发表内容是脏话setrs=server.CreateObject("adodb.recordset")sql="select*frombadeiziliao!")elseonerrorresumenextdoe=repla

3、ce(rname,rs.fields("ovenextloopendifrs.closesetrs=nothing''''''''''''''''''''''''''''''setrs=server.CreateObject("ADODB.RecordSet")sql="select*frompl"rs.opensql,conn,3,3rs.addnee")=rnamers("username")=usernamers.updaters.close%><%setrsn=server.CreateObject("adodb.recordset")sqln="se

4、lectne,plbzfromnep;nep;""rsn.opensqln,conn,1,3rsn("plnum")=rsn("plnum")+1rsn("plbz")=1rsn.updatersn.close%><script>alert("成功发布！")parent.location.href="shownews.asp?newsid=<%=newsid%>"</script>>>>>这篇文章来自..，。