動網(wǎng)論壇防止暴力注冊 暴力營銷注冊 垃圾注冊 插件方法
[重要通告]如您遇疑難雜癥,本站支持知識付費業(yè)務(wù),掃右邊二維碼加博主微信,可節(jié)省您寶貴時間哦!
Rem ============================================================
一,修改模板部分(如有多個模板,都需進行修改)
1,后臺>風(fēng)格界面>風(fēng)格界面模板總管理>page_login界面風(fēng)格>template.html(12)
找到:
<input type="hidden" name="{$hidden}" value="{$hidden}"/>
下面另起一行添加:
<input type="hidden" name="custom_name" value="{$GlobalTm_1}"/>
2,后臺>風(fēng)格界面>風(fēng)格界面模板總管理>page_login界面風(fēng)格>template.html(13)
找到: ( dv8.2則需找: <h3 class="titlebig">用戶注冊(基本信息)</h3> )
<tr><th colspan="2" height="24">新用戶注冊</TH></tr>
下面另起一行添加:
<script>
<!-- 禁止暴力營銷注冊-增加代碼-Start -->
var Str = "{$GlobalTm_2}";
var prand = "";
for(var i = 0; i < Str.length; i++) {
prand += Str.charCodeAt(i).toString();
}
var a=((12^123)>>2)-10;
var b=Math.floor(Math.sin(1.11) * 10);
document.write ('<input type="hidden" name="custom_name" value=' + prand.substr(a,b) +' />')
<!-- 禁止暴力營銷注冊-增加代碼-End -->
</script>
3.(dv8.2需要進行這一步)
a.后臺>風(fēng)格界面>風(fēng)格界面模板總管理>main_style界面風(fēng)格>template.html(7)
找到:
<a href="reg.asp?action=apply" style="font-weight:bold">注冊</a>
改為:
<a href="reg.asp" style="font-weight:bold">注冊</a>
b.后臺>風(fēng)格界面>風(fēng)格界面模板總管理>page_index界面風(fēng)格>template.html(0)
找到:
<p class="tabgroup_on"><a href="reg.asp?action=apply">用戶注冊</a></p>
改為:
<p class="tabgroup_on"><a href="reg.asp">用戶注冊</a></p>
c.后臺>風(fēng)格界面>風(fēng)格界面模板總管理>page_login界面風(fēng)格>template.html(0)
找到:
<span><button onmousemove="this.className='button_on';" onmouseout="this.className='button'" onclick="window.location.href='reg.asp?action=apply';"> 立即注冊成為本站會員 </button></span><br /><br />
改為:
<span><button onmousemove="this.className='button_on';" onmouseout="this.className='button'" onclick="window.location.href='reg.asp';"> 立即注冊成為本站會員 </button></span><br /><br />
4,修改模板完成后記得更新下緩存.
Rem ============================================================
二,打開REG.ASP文件(修改前做好備份!)
(注意,第1步中的數(shù)字 "20" 為獲取頁面來源從左邊數(shù)的字符長度,根據(jù)自己的域名長度來看。)
(如:http://bbs.dvbbs.net/reg.asp 長度則為 28,此處可修改為 28)
(這里需要計算后得到ID值,可訪問: http://bbs.niutou.net/fbreg.asp 進行計算)
(得到的ID值,替換下面第3步的"ID值")
(有多個域名時,各個域名都要計算,則:)
( If Request.Form("custom_name")<>"ID值" Then )
( 修改成 )
( If Request.Form("custom_name")<>"ID值1" And Request.Form("custom_name")<>"ID值2" And Request.Form("custom_name")<>"ID值3" Then )
( 為了方便用戶,下面共享的是默認(rèn)Dv7.1sp1,8.0sp1,8.1和8.2修改后的reg.asp文件. )
(替換前做備份,替換后,計算ID值,修改第3步的"ID值"即可.)
1,找到:
TempLateStr=Replace(TempLateStr,"{$Forum_Name}",Dvbbs.Forum_Info(0))
TempLateStr=Replace(TempLateStr,"{$hidden}",GetFormID())
下面另起一行添加:
Rem 禁止暴力營銷注冊-增加代碼-Start (1)
TempLateStr=Replace(TempLateStr,"{$GlobalTm_1}",Left(UCase(Request.ServerVariables("HTTP_REFERER")),20))
Rem 禁止暴力營銷注冊-增加代碼-End (1)
2,找到:
TempLateStr=Replace(TempLateStr,"{$hidden}",FormID)
下面另起一行添加:
Rem 禁止暴力營銷注冊-增加代碼-Start (2)
TempLateStr=Replace(TempLateStr,"{$GlobalTm_2}",Request.Form("custom_name"))
Rem 禁止暴力營銷注冊-增加代碼-End (2)
3,找到:
If ErrCodes<>"" Then Exit Sub
If Dvbbs.ErrCodes<>"" Then Exit Sub
在這2行上面增加:(是上面哦)
Rem 禁止暴力營銷注冊-增加代碼-Start (3)
Rem Response.Write Request.Form("custom_name") Rem 遠程調(diào)試時,正常注冊即可輸出ID值
Rem Response.End Rem 并且輸入下面的<>"根據(jù)您的域名來源計算的ID"中
If Request.Form("custom_name")<>"ID值" Then
Dim NoadSql,l_r_content
l_r_content = "暴力營銷注冊名:"&username&" 密碼:"&pass2&" 郵件:"&useremail
NoadSql = "insert into Dv_Log (l_touser,l_username,l_content,l_addtime,l_ip,l_type) values ('Reg.Asp','"&username&"','"&l_r_content&"',"&SqlNowString&",'"&Dvbbs.UserTrueIP&"',6)"
Dvbbs.Execute(NoadSql)
Response.redirect "showerr.asp?ErrCodes=<li>系統(tǒng)檢測您可能正在使用注冊機軟件非法注冊,請正常注冊使用。&action=OtherErr"
End If
Rem 禁止暴力營銷注冊-增加代碼-End (3)
Rem ============================================================
以上修改之后,注冊一個新賬號,成功注冊即設(shè)置完成.
本內(nèi)容涉及的軟件下載: 動網(wǎng)所有版本下載哈。。請注意自己的版本號!
計算ID值文件???????????????? ?reg_for_dv71sp1
reg_for_dv80sp1??????? ? reg_for_dv81sp1???????? reg_for_dv82sp1
問題未解決?付費解決問題加Q或微信 2589053300 (即Q號又微信號)右上方掃一掃可加博主微信
所寫所說,是心之所感,思之所悟,行之所得;文當(dāng)無敷衍,落筆求簡潔。 以所舍,求所獲;有所依,方所成!