ASP生成图形(数字验证码)

getverifycode.asp

<% dim getrandom
Randomize 
getrandom=mid((rnd*100000),1,4) ''生成6位随机数,取高4位
Session("verifycode")=getrandom ''保存于Session中
%>  

<input name="code" type="text"  id="code" value=""/><%=session("verifycode")%><img src="images/<%=mid(Session("verifycode"),1,1)%>.gif" width="15"><img src="images/<%=mid(Session("verifycode"),2,1)%>.gif" width="15"><img src="images/<%=mid(Session("verifycode"),3,1)%>.gif" width="15"><img src="images/<%=mid(Session("verifycode"),4,1)%>.gif" width="15">

<%usercode=Request("code")
if usercode<>session("verifycode") then
Response.Redirect("verror.asp")
else
response.Write(11)
end if%>

需要注意的是验证码最后一段,就是比较的不能和include放一起,因为会重新include一次就是说肯定会不一样。

另外,这个可以用图片,也可以用数字,用图片的话要0-9的数字。

你可能感兴趣的:(asp)