科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道基础软件ASP.NET程序中实现校验码图像生成

ASP.NET程序中实现校验码图像生成

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

我们经常遇到不少电子邮件、论坛的注册过程需要我们输入校验码。

作者:Activer 来源:天极开发 2007年11月6日

关键字: Windows

  • 评论
  • 分享微博
  • 分享邮件
 我们已经能够生成校验码的图像了,那么如何使用呢?下面介绍一个简单的例子说明如何使用这个VCode.aspx。

  在VS.NET中,转到Default.aspx页面添加一个名为:TextBox1的TextBox,在其右边添加一个Button,ID设置为btnCheck,还要再添加一个用于显示提示信息的Label,把它的ID设置为lblMessage。最后是我们的重点,添加一个Image控件,设置ImageUrl='VCode.aspx'。以上几个步骤设置结束后的参考HTML如下:

<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
<asp:Button ID="btnCheck" runat="server" Text="Check It" /> 
<asp:Label ID="lblMessage" runat="server"></asp:Label><br />
<br />
<asp:Image ID="Image1" runat="server" Height="32px" Width="104px" ImageUrl='VCode.aspx' /> <br />
<br />

  当然,我们还需要实现检查用户输入校验码是否正确,并给出提示。具体代码如下:

Protected Sub btnCheck_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCheck.Click
 Dim code As String = Session("VCODE")
 If TextBox1.Text.Trim.ToUpper = code Then
  lblMessage.Text = "校验成功!"
  lblMessage.ForeColor = Color.Blue
 Else
  lblMessage.Text = "您输入的注册码错误!"
  lblMessage.ForeColor = Color.Red
 End If
 TextBox1.Text = ""
End Sub

  具体的效果如下:


  总 结

  上述的方法考虑到讲述的方便,省略了一些细节。当然我们可以根据具体的应用对上述实现的方法进行一些改进,例如上面介绍的字符串生成函数会生成字符O与数字0,会对用户造成混淆。对于这个问题,可以在其循环过程中添加如下代码解决(不生成数字0, 当然也可以选择两个都不生成):

Private Function generateVCode(ByVal CodeLength As Integer) As String
 Dim VCode As String = String.Empty
 Dim randObj As New Random()
 Dim c As Integer = 63
 For i As Byte = 1 To CodeLength
  '是否显示 数字:0, 因为数字0 与字母O 容易混淆
  'While (c = 63)
   ' c = randObj.Next(35)
  'End While
  c = randObj.Next(35)
  If c >= 10 Then
   c += 7
  End If
  c += 48
  VCode += Chr(c)
 Next

 Return VCode
End Function

  我们还可以在生成图像的过程中,使用更加复杂的方法来增强安全性,常用的方法有:

  1.在上述图像生成结束后,在图像上添加随机的杂点,或者是随机的线条

  2.使用彩色的字体或者背景;

  3.使用预先准备的干扰性更强的背景;

  4.还可以移动或者旋转每个字符的位置与角度;

  当然我们也可以使用汉字来做校验码,但是用户恐怕很难接受吧,哈哈遇到校验码里面的字居然不认识的时候,说不定很抓狂~~。

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件
    邮件订阅

    如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。

    重磅专题
    往期文章
    最新文章