ASP.NET程序中实现校验码图像生成_Web开发_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

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

作者：闵涛文章来源：闵涛的学习笔记点击数：586 更新时间：2009/4/23 10:34:57

　　在Web系统中很多时候需要用到校验码，例如我们经常遇到不少电子邮件、论坛的注册过程需要我们输入校验码，这是为了提高安全性。今天我们就来讲讲如何生成校验码。

　　使用ASP.NET来生成校验码图像很方便，网上也有不少教程与文章有介绍，但是都讲的太简单了，不够实用。我来介绍一点自己的思路，算是抛砖引玉吧。

　　首先我们来看看，生成校验码的一种常见方式：

　　1．生成校验码的字符串

　　2．将该字符串输出为图像

　　具体步骤

　　下面我们就开始简单的例子来介绍这个过程，首先打开VS.NET，新建一个Web Site，添加一个新的 Web Form，取名为 VCode.aspx，在其代码文件（VCode.aspx.vb）中添加一个函数generateVCode，此函数用于生成校验码的字符串，具体代码如下：

''' ＜summary＞
''' 产生随机数（包含字母与数字）用于校验码
''' ＜/summary＞
''' ＜param name="CodeLength"＞＜/param＞
''' ＜returns＞＜/returns＞
''' ＜remarks＞＜/remarks＞
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
c = randObj.Next(35)
If c ＞= 10 Then
c += 7
End If
c += 48
VCode += Chr(c)
Next
Return VCode
End Function
　　上面的的函数使用随机数来代表需要产生的校验码，包含数字与大写的字母。

　　接着我们需要将上面生成的校验码字符串作为图像输出。利用ASP.NET的强大图像处理功能可以很方便的实现这一点。但是考虑到直接将校验码生成图像输出，安全性太差，我们需要做一些增强。这里我介绍一种简单的方法，就是为校验码图像增加背景，可以使用现有的一些图像作为背景，也可以使用ASP.NET直接画出背景。为了讲解的方便，这里我们介绍使用ASP.NET直接来画出背景。

　　首先，图像上输出文字之前，可以随即选择一种画笔的笔触（HatchBrush），具体的代码如下：

''' ＜summary＞
''' 产生随机的笔触样式(用于图像的背景)
''' ＜/summary＞
''' ＜returns＞＜/returns＞
''' ＜remarks＞＜/remarks＞
Private Function generateHatchStyle() As HatchStyle
　Dim slist As New ArrayList
　For Each style As HatchStyle In System.Enum.GetValues(GetType(HatchStyle))
　　slist.Add(style)
　Next

　Dim randObj As New Random()
　Dim index As Integer = randObj.Next(slist.Count - 1)

　Return CType(slist(index), HatchStyle)
End Function
　　现在校验码字符串已经产生，用于图像背景的画笔也有了，我们就介绍具体的图像输出，使用函数GenerateVCodeImage来输出图像，

''' ＜summary＞
''' 产生随机数校验码图像
''' ＜/summary＞
''' ＜remarks＞＜/remarks＞
Private Function GenerateVCodeImage()

　Dim oBitmap As Bitmap = New Bitmap(90, 35)
　Dim oGraphic As Graphics = Graphics.FromImage(oBitmap)
　Dim foreColor As System.Drawing.Color
　Dim backColor As System.Drawing.Color

　Dim sText As String = generateVCode(5) '获取校验码字符串
　Dim sFont As String = "Comic Sans MS" '设置自己喜欢的字体

　'前景、背景的颜色
　foreColor = Color.FromArgb(220, 220, 220)
　backColor = Color.FromArgb(190, 190, 190)
　
　'设置用于背景的画笔
　Dim oBrush As New HatchBrush(CType(generateHatchStyle(), HatchStyle), foreColor, backColor)
　'用于输出校验码的画笔
　Dim oBrushWrite As New SolidBrush(Color.Gray)

　'生成的图像矩形大小
　oGraphic.FillRectangle(oBrush, 0, 0, 100, 50)
　oGraphic.TextRenderingHint = TextRenderingHint.AntiAlias

　Dim oFont As New Font(sFont, 14)
　Dim oPoint As New PointF(5.0F, 4.0F)

　oGraphic.DrawString(sText, oFont, oBrushWrite, oPoint)
　
　Response.ContentType = "image/jpeg"
　oBitmap.Save(Response.OutputStream, ImageFormat.Jpeg)
　oBitmap.Dispose()

　Return sText
End Function
　　上面介绍的都是几个实现具体功能的函数，我们还需要在VCode.aspx的Page Load事件里面添加调用这些函数的代码，具体如下：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
　Dim code As String = GenerateVCodeImage()
　Session("VCode") = code
End Sub
　　现在来看看效果，刷新几次比较一下，注意背景的不同：