当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp中文数字验证码

ASP
Microsoft SQL Server 7.0安全问题
最优化ASP程序性能
Access数据库操作中出现的怪现象
将ASP代码移植为VB COM组件-1
将ASP代码移植为VB COM组件-2
将ASP代码移植为VB COM组件-3
将ASP代码移植为VB COM组件-4
使用ASP常见问题解答
数据库聊天室的“无刷新”技术要点
把ASP移植到ASP+
如何使用XQI?
一个普通的数据库例子源源程序
让Session对象在不同域名下实现共享
无组件图片与文本同步存入数据库的最简单的办法
在WAP网站上建立反馈表单
如何增强ASP程序性能(4)
关于在浏览器中执行*.exe文件的深入探讨!
用RecordSet实现分页(by Daniel Adrian)
remote script文档(转载自微软)(九)
Microsoft 脚本编码器Script Encoder介绍(1)全中文

ASP 中的 asp中文数字验证码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 165 ::
收藏到网摘: n/a

大写数字验证码的实现方法
复制代码 代码如下:

<form method="post" name=myform>
姓 名:<input type="text" name="name" value=""><br>
学 号:<input type="text" name="num" value=""><br>
。。。:<input type="text" name="aaa" value=""><br>
。。。:<input type="text" name="bbb" value=""><br>
验证码:<img src="vcode/c.asp" onclick="this.src=this.src" title="点击图片可以更改验证码" height="13" width="52">
<input type="text" size="5" name="C" autocomplete="off" style="ime-mode:disabled;" value="">
<input type="submit" value="提交">
</form>

asp代码:
复制代码 代码如下:

<%
c = Request.form("c")
'如果可以输入小写的数字,请把下面三行注释掉
for ii = 0 to 9
c = Replace(c,Cstr(ii),"")
next
c = Replace(c,"零","0")
c = Replace(c,"一","1")
c = Replace(c,"二","2")
c = Replace(c,"三","3")
c = Replace(c,"四","4")
c = Replace(c,"五","5")
c = Replace(c,"六","6")
c = Replace(c,"七","7")
c = Replace(c,"八","8")
c = Replace(c,"九","9")
if Cstr(c) <> Cstr(Session("validateCode")) then
Response.write ("验证码不正确")
Response.end
end if
%>