<TR>
<TD class=tablebody1>
<div style= "color:red" ><b> anti-forum mass must fill:</b></div>
<div> to prevent the malicious registration of mass software,</div>
<div> please answer the following questions </div>
<div style= "color:blue;font-size=18px" ><b>{$EvilQuesion}<b></div>
2. Open reg.asp and find
<!--#include file= "inc/md5.asp"-->
under which you add
<!--#include file= "inc/checkevil.asp"-->
Found it
Templatestr=replace (Templatestr, "{$user _belief}", Selectinfo (5))
under which you add
Randomize
Session ("Evilid") =int (Rnd*quesionnum)
Templatestr=replace (Templatestr, "{$EvilQuesion}", Quesionarray (Session ("Evilid"))
Found it
Else
Quesion=request.form ("Quesion")
End If
under which you add
If Request.Form ("evilanswer") = "" Then
errcodes=errcodes+ "<li>" + "Please fill out the problem of malicious registration!"
End If
If not Checkevil (Request.Form ("Evilanswer")) Then
errcodes=errcodes+ "<li>" + "anti-malicious registration problem answer error, please return to try again." "
End If
3. Add a new file checkevil.asp, fill in the following code, and upload to the Forum Inc directory, that is,/inc/checkevil.asp.
<%
Dim Quesionarray (100)
Dim Answerarray (100)
Dim Quesionnum
Quesionnum=5 ' Please set the total number of problems here correctly
Function Checkevil (Answer)
Dim Trueanswer
If session ("evilid") = "" Then
Checkevil=false
Exit Function
End If
Trueanswer=cstr (Answerarray ("Evilid"))
If Answer=trueanswer Then
Checkevil=true
End If
End Function
Quesionarray (0) = "12 squared is how much?" (digital) "
Answerarray (0) = "144"
Quesionarray (1) = "What is the name of the longest river in China?" "
Answerarray (1) = "Changjiang River"
Quesionarray (2) = "What is the next sentence of" Looking up at the moon "? (Hint: Bow down??) Township) "
Answerarray (2) = "head down and think of home"
Quesionarray (3) = "What is the next sentence of" Looking up at the moon "? (Hint: Bow down??) Township) "
Answerarray (3) = "head down and think of home"
Quesionarray (4) = "Who is the only empress in the history of China?" (Hint: Wu Tian) "
Answerarray (4) = "Empress Wu"
The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion;
products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the
content of the page makes you feel confusing, please write us an email, we will handle the problem
within 5 days after receiving your email.
If you find any instances of plagiarism from the community, please send an email to:
info-contact@alibabacloud.com
and provide relevant evidence. A staff member will contact you within 5 working days.