asp阻止灌水留言的方法(随机生成的4位认证码）(

<script type="text/javascript"><!--google_ad_client = "pub-4490194096475053";/* 内容页,300x250,第一屏 */google_ad_slot = "3685991503";google_ad_width = 300;google_ad_height = 250;// --></script><script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"></script>

原理:在每次提交留言的时候,要输入随机生成的4位认证码.

以下代码用在ASP
生成随机4位数:

<%
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