返回

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

2007-08-08 10:17心跳论坛

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

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>

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

相关文章 大家在看