在ASP动态网页中的一个注册表单中如何加一个验证信息。

来源：百度知道 编辑：UC知道 时间：2024/05/15 00:26:02
像一般网站上的注册表单中，实现图形和字母的验证符。
希望哪位好人能把源代码教给我。
谢谢！！！

下面的代码存成一个文件，比如getcode.asp就可以了，
用的时候<img src=getcode.asp?a=index>
-------------------------------------
<%
Option Explicit ' 显示声明

Class Com_GifCode_Class
Public Noisy, Count, Width, Height, Angle, Offset, Border

Private Graph(), Margin(3)

Private Sub Class_Initialize()
Randomize
Noisy = 6 ' 干扰点出现的概率
Count = 4 ' 字符数量
Width = 60 ' 图片宽度
Height = 15 ' 图片高度
Angle = 1 ' 角度随机变化量
Offset = 10 ' 偏移随机变化量
Border = 1 ' 边框大小
End Sub

Public Function Create()

Const cCharSet = "123456789"

Dim i, x, y

Dim vValidCode : vValidCode = ""
Dim vIndex

ReDim Graph(Width-1, Height-1)

For i = 0 To Count - 1
vIndex = Int(Rnd * Len(cCharSet))
vValidCode = vValidCode + Mid(cCharSet, vIndex+1 , 1)
SetDraw vIndex, i
Next

Create = vValidCode

End