转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 站长学院 >> Web开发 >> 正文
Asp.Net生成验证码         ★★★★

Asp.Net生成验证码

作者:闵涛 文章来源:闵涛的学习笔记 点击数:718 更新时间:2009/4/23 10:43:40
       经常在论坛里看到有问怎么实现验证码的帖子,其实关于验证码的文章在csdn,dev-club等网站上都有很多,但是很多文章只讲诉了如何输出一个随机生成数字或字符的图象,当然了,这个是验证码的核心了,但是对很多asp.net的初学者来说,怎么使用它生成的图象又成了一个问题(论坛有不少问这个的),这也是我写本文的一个原因.
    言归正传,关于验证码的原理,我就不多说了,大家可以参见其他文章,文末附有完整的实例代码,里面有详细的注释,你可以跳过解说文字,直接使用
    首先,我要简要说说session和viewstate的用法,因为后面会用到它
       把数据存储在session中:session("key")="test"
       从session取值:dim testvalue as string=session("key")
      类似的:
       把数据存储在viewstate中:viewstate("key")="test"
       从viewstate中取值:dim testvalue as string=viewstate("key")
    关于viewstate的更详细的资料,你可以参看msdn的<<asp.net viewstate 初探>>一文
      百闻不如一见,有时代码本身就比任何解说更有表现力,所以在此就不对代码解说太多了,本文实现的验证码需要用到两个文件:
       gif.aspx           该文件用于生成验证码
       validatecode.aspx  该文件用来测试验证码(即如何使用)
   下面给出gif.aspx的完整代码:
<%@ import namespace="system"%>
<%@ import namespace="system.io"%>
<%@ import namespace="system.drawing"%>
<%@ import namespace="system.drawing.imaging"%>
<script language="vb" runat="server">
 sub page_load(sender as object,e as eventargs)
    ''''rndnum是一个自定义函数
    dim vnum as string=rndnum(4)
    session("vnum")=vnum
    validatecode(vnum)
 end sub
 ''''生成图象验证码函数
 sub validatecode(vnum)
   dim img as system.drawing.bitmap
   dim g as graphics
   dim ms as memorystream
   dim gheight as integer=int(len(vnum)*11.5)
   ''''gheight为图片宽度,根据字符长度自动更改图片宽度
   img=new bitmap(gheight,20)
   g=graphics.fromimage(img)
   g.drawstring(vnum,(new font("arial",10)),(new solidbrush(color.blue)),3,3)''''在矩形内绘制字串(字串,字体,画笔颜色,左上x.左上y)
   ms=new memorystream()
   img.save(ms,imageformat.png)
   response.clearcontent() ''''需要输出图象信息 要修改http头
   response.contenttype="image/png"
   response.binarywrite(ms.toarray())
   g.dispose()
   img.dispose()
   response.end()
 end sub
  ''''--------------------------------------------
  ''''函数名称:rndnum
  ''''函数参数:vcodenum--设定返回随机字符串的位数
  ''''函数功能:产生数字和字符混合的随机字符串
  function rndnum(vcodenum)
    dim vchar as string="0,1,2,3,4,5,6,7,8,9,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,w,x,y,z"
    dim vcarray() as string=split(vchar,",") ''''将字符串生成数组
    dim vnum as string=""
    dim i as byte
    for i=1 to vcodenum
      randomize
      vnum=vnum & vcarray(int(35*rnd)) ''''数组一般从0开始读取,所以这里为35*rnd
    next
    return vnum
  end function
</script>
那么又应该如何使用该文件生成的图象验证码,看这句代码:
 <asp:image id="image1" runat="server" imageurl="gif.aspx" />
这就是用来显示验证码的image控件,你可以把它放在任何你喜欢的地方,下面的给出详细的使用代码,你把它保存为validatecode.aspx,并把它和gif.aspx放在同一目录下,在浏览器中打开validatecode.aspx,就可以测试它的效果了:
<script language="vb" runat="server">
  sub page_load(sender as object,e as eventargs)
      dim vnum as string=session("vnum")
      session.abandon()
      viewstate("vnum")=vnum
  end sub
  ''''下面的事件代码是用来测试验证码,可以根据需要更改
  sub btnsubmit_click(sender as object,e as eventargs)
      ''''判断输入的验证码与所给是否相同
      if txtvalidatecode.text=cstr(viewstate("vnum")) then
          lblshow.text="<font color=''''red''''>提示:验证通过</font>"
      else
       lblshow.text="所填写的验证码与所给的不符"
      end if
  end sub
</script>
<html>
<body>
<form runat="server">
  <div align="center">
    <table width="750">
      <!--dwlayouttable-->
      <tr>
        <td width="256" height="46">&nbsp; </td>
        <td width="9">&nbsp;</td>
        <td width="88">&nbsp;</td>
        <td width="87">&nbsp;</td>
        <td width="100">&nbsp;</td>
        <td width="68">&nbsp;</td>
        <td width="97">&nbsp;</td>
      </tr>
      <tr>
        <td height="21"></td>
        <td></td>
        <td colspan="3" valign="top"><asp:label id="lblshow" runat="server"></asp:label></td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td height="14"></td>
        <td></td>
        <td></td>
        <td></td>
        <td></td>
        <td></td>
        <td></td>
      </tr>
      <tr>
        <td height="21">&nbsp;</td>
        <td colspan="2" valign="middle">验证码:</td>
        <td valign="top"><asp:image id="image1" runat="server" imageurl="gif.aspx" /></td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td height="20">&nbsp;</td>
        <td colspan="2" valign="top">输入验证码:</td>
        <td valign="top"><asp:textbox id="txtvalidatecode" runat="server" textmode="singleline" /></td>
        <td colspan="2" valign="middle"><font color="#ff0000" size="2">*注意:区分大小写</font></td>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td height="25">&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td height="19">&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td valign="top"><asp:button id="btnsubmit" runat="server" text="比较" onclick="btnsubmit_click" /></td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
        <td>&nbsp;</td>
      </tr>
    </table>
  </div>
</form>
</body>
</html>


[C语言系列]NET 中C#的switch语句的语法  [系统软件]托拽Explore中的文件到VB.net的窗口
[系统软件]Boost库在XP+Visual C++.net中的安装  [常用软件]新配色面板:Paint.Net3.0RC1官方下载
[常用软件]用内建的“Net Meeting”聊天  [VB.NET程序]Henry的VB.NET之旅(三)—共享成员
[VB.NET程序]Henry的VB.NET之旅(二)—构造与析构  [VB.NET程序]Henry的VB.NET之旅(一)—失踪的窗体
[VB.NET程序]在托盘上显示Balloon Tooltip(VB.NET)  [VB.NET程序]Henry手记-VB.NET中动态加载Treeview节点(二)
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · Web开发  · 网页制作
    · 平面设计  · 网站运营
    · 网站推广  · 搜索优化
    · 建站心得  · 站长故事
    · 互联动态
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台