主頁 > 知識庫 > 動(dòng)網(wǎng)防惡意廣告比較有效的辦法附asp代碼

動(dòng)網(wǎng)防惡意廣告比較有效的辦法附asp代碼

熱門標(biāo)簽:綿陽防封電銷卡價(jià)格 河北智能外呼系統(tǒng)軟件 伊春外呼業(yè)務(wù)系統(tǒng) 宜賓語音外呼系統(tǒng)軟件 調(diào)度系統(tǒng)外呼 電銷機(jī)器人源碼網(wǎng)盤下載 電銷機(jī)器人教育 中國辦理電信400電話 福建外呼增值業(yè)務(wù)線路
1.
  進(jìn)入后臺,風(fēng)格界面模板總管理,page_login,template.html(13) 

TR>
TD class=tablebody1>B>密碼問題/B>:BR>忘記密碼的提示問題/TD>


在此兩句上面添加如下代碼 

TR>
TD class=tablebody1>
div style="color:red">b>反論壇群發(fā)必填項(xiàng):/b>/div>
div>為了防止群發(fā)軟件的惡意注冊,/div>
div>請回答以下問題/div>
div style="color:blue;font-size=18px">b>{$EvilQuesion}b>/div>


/TD>
TD class=tablebody1>INPUT size=30 name=evilanswer> /TD>
/TR>


2. 打開reg.asp,找到
!--#include file="inc/md5.asp"-->
在其下添加
!--#include file="inc/CheckEvil.asp"-->
找到
TempLateStr=Replace(TempLateStr,"{$user_belief}",Selectinfo(5))
在其下添加
Randomize
Session("EvilID")=int(Rnd*QuesionNum) 
TempLateStr=Replace(TempLateStr,"{$EvilQuesion}", QuesionArray(Session("EvilID")))
找到
Else
quesion=Request.form("quesion")
End If
在其下添加
If Request.Form("EvilAnswer")="" Then
ErrCodes=ErrCodes+"li>"+"請?zhí)顚懛缾阂庾詥栴}!"
End If

If Not CheckEvil(Request.Form("EvilAnswer")) Then
ErrCodes=ErrCodes+"li>"+ "防惡意注冊問題回答錯(cuò)誤,請返回重試。"
End If



3. 增加一個(gè)新文件CheckEvil.asp,填寫如下代碼,并上傳到論壇inc目錄下,即 /inc/CheckEvil.asp。
%
Dim QuesionArray(100)
Dim AnswerArray(100)
Dim QuesionNum
QuesionNum=5 '請?jiān)谶@里正確設(shè)置問題的總數(shù)

Function CheckEvil(Answer)
Dim TrueAnswer
If Session("EvilID")="" Then
CheckEvil=False
Exit Function
End If
TrueAnswer=CStr(AnswerArray(Session("EvilID")))
If Answer=TrueAnswer Then
CheckEvil=true
End If


End Function

QuesionArray(0)="12的平方是多少?(數(shù)字)"
AnswerArray(0)="144"
QuesionArray(1)="中國最長的河流叫什么名字?"
AnswerArray(1)="長江"
QuesionArray(2)="“舉頭望明月”的下句是什么?(提示:低頭??鄉(xiāng))"
AnswerArray(2)="低頭思故鄉(xiāng)"
QuesionArray(3)="“舉頭望明月”的下句是什么?(提示:低頭??鄉(xiāng))"
AnswerArray(3)="低頭思故鄉(xiāng)"
QuesionArray(4)="中國史上唯一的女皇是誰?(提示:武?天)"
AnswerArray(4)="武則天"

%>

標(biāo)簽:那曲 新鄉(xiāng) 河池 延邊 優(yōu)質(zhì)小號 銅川 電商邀評 蘇州

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《動(dòng)網(wǎng)防惡意廣告比較有效的辦法附asp代碼》,本文關(guān)鍵詞  動(dòng)網(wǎng),防,惡意,廣告,比較,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《動(dòng)網(wǎng)防惡意廣告比較有效的辦法附asp代碼》相關(guān)的同類信息!
  • 本頁收集關(guān)于動(dòng)網(wǎng)防惡意廣告比較有效的辦法附asp代碼的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章