:: Blog List ::
LeadBBS防止软件恶意注册灌水的修正钉子 发表于 2005-6-29 11:27:59
呵呵，和别人的修改方法不一样，还是贴出来吧，
功能：只打开注册时的验证码，不打开发帖时的验证吗
我的方法不需要修改后台设置，只要修改两个文件就可以了
原理：以下列出的红色代码都是检测后台设置是否需要验证码的，
把这些红色代码去掉后，不管在后台怎么设置，注册时总是要输入验证码。
演示：http://www.jpwind.com/bbs
修正的有效性我已经在本机及自己的网站上测试过了
如果不放心，请不要在我站测试，请修改后在自己机子上测试
如果不熟悉代码修改，请下载我的程序，
只要覆盖user/userjoin.asp和user/inc/User_fun.ASP就可以了
http://www.jpwind.com/down/bbs/bbs_regyzm.rar
让大家看看，用的着的朋友顶一下
1。修改user/userjoin.asp
修改方法：去掉下面代码中的红色代码
（1）357行左右
<%End if
If DEF_EnableAttestNumber > 2 Then%>
if(obj.ForumNumber.value=="")
{
alert("请输入验证码!\n");
ValidationPassed = false;
obj.ForumNumber.focus();
return;
}<%End If%>
（2）545左右
</TR><%If DEF_EnableAttestNumber > 2 Then%>
<TR>
<TD height="25" align=center>
<p>验 证 码：
</TD>
<TD height="25">
<TABLE border=0 class=font width="100%" cellpadding="0" cellspacing="0">
<TR>
<TD>
<input name=ForumNumber maxlength=4 size=4 value="<%=htmlencode(Request("RndNumber"))%>" class=fminpt></td>
<td> 请在框中输入<img src="/<";%=DEF_BBS_HomeUrl%>User/number.asp?n=<%=timer%> align=absmiddle width=32 height=12>，否则无法注册</td></tr></table>
</TD>
</TR><%End If%>
2。修改user/inc/user_fun.asp
修改方法：去掉以下代码中的红色代码
(1)626行左右
If ApplyFlag = 1 and DEF_EnableAttestNumber > 2 Then
If CheckRndNumber = 0 Then
GBL_CHK_TempStr = "<b><font color=ff0000>验证码填写错误!</font></b><br>"
GBL_CHK_Flag = 0
Exit Function
End If
End If
（2）827行左右
Function CheckRndNumber
If DEF_EnableAttestNumber = 0 Then
CheckRndNumber = 1
Exit Function
End If
------------------------------------------------------------
OK，大功告成了
-------------------------
转自：http://www.leadbbs.com/a/a.asp?B=200&ID=1930116&E=0
功能：只打开注册时的验证码，不打开发帖时的验证吗
我的方法不需要修改后台设置，只要修改两个文件就可以了
原理：以下列出的红色代码都是检测后台设置是否需要验证码的，
把这些红色代码去掉后，不管在后台怎么设置，注册时总是要输入验证码。
演示：http://www.jpwind.com/bbs
修正的有效性我已经在本机及自己的网站上测试过了
如果不放心，请不要在我站测试，请修改后在自己机子上测试
如果不熟悉代码修改，请下载我的程序，
只要覆盖user/userjoin.asp和user/inc/User_fun.ASP就可以了
http://www.jpwind.com/down/bbs/bbs_regyzm.rar
让大家看看，用的着的朋友顶一下
1。修改user/userjoin.asp
修改方法：去掉下面代码中的红色代码
（1）357行左右
<%End if
If DEF_EnableAttestNumber > 2 Then%>
if(obj.ForumNumber.value=="")
{
alert("请输入验证码!\n");
ValidationPassed = false;
obj.ForumNumber.focus();
return;
}<%End If%>
（2）545左右
</TR><%If DEF_EnableAttestNumber > 2 Then%>
<TR>
<TD height="25" align=center>
<p>验 证 码：
</TD>
<TD height="25">
<TABLE border=0 class=font width="100%" cellpadding="0" cellspacing="0">
<TR>
<TD>
<input name=ForumNumber maxlength=4 size=4 value="<%=htmlencode(Request("RndNumber"))%>" class=fminpt></td>
<td> 请在框中输入<img src="/<";%=DEF_BBS_HomeUrl%>User/number.asp?n=<%=timer%> align=absmiddle width=32 height=12>，否则无法注册</td></tr></table>
</TD>
</TR><%End If%>
2。修改user/inc/user_fun.asp
修改方法：去掉以下代码中的红色代码
(1)626行左右
If ApplyFlag = 1 and DEF_EnableAttestNumber > 2 Then
If CheckRndNumber = 0 Then
GBL_CHK_TempStr = "<b><font color=ff0000>验证码填写错误!</font></b><br>"
GBL_CHK_Flag = 0
Exit Function
End If
End If
（2）827行左右
Function CheckRndNumber
If DEF_EnableAttestNumber = 0 Then
CheckRndNumber = 1
Exit Function
End If
------------------------------------------------------------
OK，大功告成了
-------------------------
转自：http://www.leadbbs.com/a/a.asp?B=200&ID=1930116&E=0
| 更多分享链接
发表评论：
Best view with 1024 x 768 pixel & IE 6.0.
About Me
Archives Categories
Replies List
My FriendLinks
Blog Info
