asp防止留言灌水的實例代碼

    asp防止留言灌水原理:在每次提交留言的時候,要輸入隨機生成的4位認證碼.
    以下代碼用在asp
    生成隨機4位數(shù):
    <%
    dim key
    randomize timer
    key=int((8999)*rnd +1000)
    %>
    在表單里顯示:
    認證碼：<%=key%>
    <input type=text name=rekey size=8 maxlength=4>
    <input value=<%=key%> type=hidden name=key>
    表單提交后檢查:
    key=request.form(key)
    rekey=request.form(rekey)
    if rekey<> key then
    response.write(<script language=javascript> alert('請輸入正確的認證碼！');history.back()</script> )
    response.end()
    end if