动网论坛防广告代码
[code]
<%
'-------针对信息产业局服务器一流信息监控的动网防广告代码
'说明:防注册机核心检测代码
'--检测当前是否访问reg.asp 即进行注册的相关操作
If server.mappath(Request.ServerVariables("SCRIPT_NAME")) = Server.MapPath("reg.asp") Then
'判断Session对象是否被赋值
If Session("AllowReg") <> 1 Then
Response.Write("" & VbCrLf)
Response.End
End if
End if
'检测是否浏览了论坛帖子
If server.mappath(Request.ServerVariables("SCRIPT_NAME")) = Server.MapPath("dispbbs.asp") Then
If Session("AllowReg") <> 1 Then
Session("AllowReg") = 1
End if
End if
%>
[/code]
将以上代码加到论坛conn.asp文件最后的%>下面!只能进行简单的防垃圾注册啦!注册垃圾发帖狗只要修改下还是能破了,但是防下也不错!
动网论坛防广告代码:等您坐沙发呢!