网站中的验证码是怎么做的,谁有源程序????

源码，保存为CodePhoto.asp,
在要插入验证码图片的地方插入<img border="0" src="codephoto.asp" width="50" height="20">
生成的随机验证码存在
Session("ValidCode")中，你只要把用户输入的验证码和Session("ValidCode")比较就行了。

<%
Call Com_CreatValidCode("ValidCode")
response.write vCodes
Sub Com_CreatValidCode(pSN)
' 禁止缓存
Response.Expires = -9999
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
Response.ContentType = "Image/BMP"

Randomize

Dim i, ii, iii

Const cOdds = 2 ' 杂点出现的机率
Const cAmount = 36 ' 文字数量
Const cCode = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"

' 颜色的数据(字符，背景)
Dim vColorData(1)
vColorData(0) = ChrB(255) & ChrB(100) & ChrB(0) ' 蓝0，绿0，红0（黑色）