动网论坛防止“暴力营销恶意注册发广告”的方法

因为好多朋友经常受此垃圾软件的困扰，心跳将自己的方法发上来供大家参考，以下方法只要将代码加在适当位置同样适用于7.0版本。

先看程序（以动网官方Dvbbs7.1.0_Ac[2005.07.04]最新的reg.asp文件为准）

1、找到235行－246行的内容

If Request.form("quesion")="" Then
  ErrCodes=ErrCodes+"<li>"+template.Strings(11)
Else
  quesion=Request.form("quesion")
End If
If Request.form("answer")="" Then
    ErrCodes=ErrCodes+"<li>"+template.Strings(11)
ElseIf Request.form("answer")=Request.form("oldanswer") Then
  answer=Request.form("answer")
Else
  answer=md5(Request.form("answer"),16)
End If

在其下面插入

/'防止恶意注册添加项 by xintiao
If Request.form("Forumname")="" Then
  Response.redirect "showerr.asp?ErrCodes=<li>您没有回答“防恶意注册问题答案”！&action=OtherErr"
Else
  If Request.form("Forumname")<>Dvbbs.Forum_Info(0) Then
   Response.redirect "showerr.asp?ErrCodes=<li>请回答正确的“防恶意注册问题答案”！&action=OtherErr"
  End If
End If

2、114行处找到

TempLateStr=Replace(TempLateStr,"{$user_belief}",Selectinfo(5))

在其下面添加一行

TempLateStr=Replace(TempLateStr,"{$Forumname}",Dvbbs.Forum_Info(0))

然后再看风格处的修改，后台界面风格模板总管理page_login  template.html(13)中找到

<INPUT type=text size=30 name=answer>
</TD></TR>

在其下面插入

<TR>
<TD class=tablebody1><B>本论坛的中文名称是什么？</B><BR><font color=red>此条为防止恶意注册必填项！答案：</font><font color=blue>{$Forumname}</font></TD>
<TD class=tablebody1>
<INPUT maxLength=50 size=30 name=Forumname></TD>
</TR>

至此结束，可以和那些恶意注册的垃圾暴力营销说拜拜了