|
因为好多朋友经常受此垃圾软件的困扰，特将自己的方法发上来供大家参考，以下方法只要将代码加在适当位置同样适用于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>
至此结束，可以和那些恶意注册的垃圾暴力营销说拜拜了。
相关文件下载：
 WU5YiiLB.rar (9.95 KB)
| 
发表于 2005-8-13 20:13
| 
发表于 2005-8-13 20:41
| 
