ASP生成图形数字验证码

原创 2004年09月16日 15:37:00
<%
??Dim?a(10,10)
??a(0,1)?=?"0x3c"?''数字0
??a(0,2)?=?"0x66"
??a(0,3)?=?"0xc3"
??a(0,4)?=?"0xc3"
??a(0,5)?=?"0xc3"
??a(0,6)?=?"0xc3"
??a(0,7)?=?"0xc3"
??a(0,8)?=?"0xc3"
??a(0,9)?=?"0x66"
??a(0,10)=?"0x3c"
??a(1,1)?=?"0x18"?''数字1
??a(1,2)?=?"0x1c"
??a(1,3)?=?"0x18"
??a(1,4)?=?"0x18"
??a(1,5)?=?"0x18"
??a(1,6)?=?"0x18"
??a(1,7)?=?"0x18"
??a(1,8)?=?"0x18"
??a(1,9)?=?"0x18"
??a(0,10)=?"0x7e"
??a(2,1)?=?"0x3c"?''数字2
??a(2,2)?=?"0x66"
??a(2,3)?=?"0x60"
??a(2,4)?=?"0x60"
??a(2,5)?=?"0x30"
??a(2,6)?=?"0x18"
??a(2,7)?=?"0x0c"
??a(2,8)?=?"0x06"
??a(2,9)?=?"0x06"
??a(2,10)=?"0x7e"
??a(3,1)?=?"0x3c"?''数字3
??a(3,2)?=?"0x66"
??a(3,3)?=?"0xc0"
??a(3,4)?=?"0x60"
??a(3,5)?=?"0x1c"
??a(3,6)?=?"0x60"
??a(3,7)?=?"0xc0"
??a(3,8)?=?"0xc0"
??a(3,9)?=?"0x66"
??a(3,10)=?"0x38"
??a(4,1)?=?"0x38"?''数字4
??a(4,2)?=?"0x3c"
??a(4,3)?=?"0x36"
??a(4,4)?=?"0x33"
??a(4,5)?=?"0x33"
??a(4,6)?=?"0x33"
??a(4,7)?=?"0xff"
??a(4,8)?=?"0x30"
??a(4,9)?=?"0x30"
??a(4,10)=?"0xfe"
??a(5,1)?=?"0xfe"?''数字5
??a(5,2)?=?"0xfe"
??a(5,3)?=?"0x06"
??a(5,4)?=?"0x06"
??a(5,5)?=?"0x3e"
??a(5,6)?=?"0x60"
??a(5,7)?=?"0xc0"
??a(5,8)?=?"0xc3"
??a(5,9)?=?"0x66"
??a(5,10)=?"0x3c"
??a(6,1)?=?"0x60"?''数字6
??a(6,2)?=?"0x30"
??a(6,3)?=?"0x18"
??a(6,4)?=?"0x0c"
??a(6,5)?=?"0x3e"
??a(6,6)?=?"0x63"
??a(6,7)?=?"0xc3"
??a(6,8)?=?"0xc3"
??a(6,9)?=?"0x66"
??a(6,10)?="0x3c"
??a(7,1)?=?"0xff"?''数字7
??a(7,2)?=?"0xc0"
??a(7,3)?=?"0x60"
??a(7,4)?=?"0x30"
??a(7,5)?=?"0x18"
??a(7,6)?=?"0x18"
??a(7,7)?=?"0x18"
??a(7,8)?=?"0x18"
??a(7,9)?=?"0x18"
??a(7,10)=?"0x18"
??a(8,1)?=?"0x3c"?''数字8
??a(8,2)?=?"0x66"
??a(8,3)?=?"0xc3"
??a(8,4)?=?"0x66"
??a(8,5)?=?"0x3c"
??a(8,6)?=?"0x66"
??a(8,7)?=?"0xc3"
??a(8,8)?=?"0xc3"
??a(8,9)?=?"0x66"
??a(8,10)=?"0x3c"
??a(9,1)?=?"0x3c"?''数字9
??a(9,2)?=?"0x66"
??a(9,3)?=?"0xc3"
??a(9,4)?=?"0xc3"
??a(9,5)?=?"0x66"
??a(9,6)?=?"0x3c"
??a(9,7)?=?"0x18"
??a(9,8)?=?"0x0c"
??a(9,9)?=?"0x06"
??a(9,10)=?"0x03"
%>
<%
??''开启缓冲
Response.Buffer?=?True
With?Response
?.Expires?=?-1
?.AddHeader?"Pragma","no-cache"
?.AddHeader?"cache-ctrol","no-cache"
End?With

Dim?num
Randomize
num?=?Int(7999?*?Rnd?+?2000)
Session("validateCode")?=?num

Dim?Image
Dim?Width,?Height
Dim?digtal
Dim?Length
Dim?sort
Dim?hc
Length?=?4?
hc?=?chr(13)?&?chr(10)

Redim?sort(Length)

digital?=?""
For?I?=?1?To?Length?-?Len(num)
?digital?=?digital?&?"0"
Next
For?I?=?1?To?Len(num)
?digital?=?digital?&?Mid(num,?I,?1)
Next
For?I?=?1?To?Len(digital)
?sort(I)?=?Mid(digital,?I,?1)
Next
Width?=?8?*?Len(digital)
Height?=?10

Response.ContentType?=?"image/x-xbitmap"

Image?=?"#define?counter_width?"?&?Width?&?hc
Image?=?Image?&?"#define?counter_height?"?&?Height?&?hc
Image?=?Image?&?"static?unsigned?char?counter_bits[]?=?{"?&?hc

For?I?=?1?To?Height
?For?J?=?1?To?Length
??Image?=?Image?&?a(sort(J),I)?&?","
?Next
Next

Image?=?Left(Image,?Len(Image)?-?1)
Image?=?Image?&?"};"?&?hc

Response.Write?Image
%>

ASP生成图片验证码,不需要组件

建立font.asp 文件Dim FontDim Letter(30)Set Font = Server.CreateObject("Scripting.Dictionary")Letter(0) =...
  • great_domino
  • great_domino
  • 2007年04月03日 22:45
  • 5307

使用ASP生成图片彩色校验码

使用ASP生成图片彩色校验码49行代码,三个文件 Asp文件:Code.Asp 数据文件:body.Fix , Head.Fix --下载:下载打包文件 用法:  代码解释: Response.buf...
  • abandonship
  • abandonship
  • 2005年07月12日 09:11
  • 1235

asp数字验证码源代码

在这里我们用到3个页面分别是:index.asp   code.asp     display.asp   当然,名字你可以随便取,下面我们开始了:一.   index.asp 中代码:...
  • feiyafei2008
  • feiyafei2008
  • 2011年03月26日 01:25
  • 2106

ASP生成图形(数字验证码)

  • piperzero
  • piperzero
  • 2007年12月08日 10:40
  • 1237

iOS随机生成验证码

- (void)onTapToGenerateCode:(UITapGestureRecognizer *)tap { for (UIView *view in self.checkCodeNum...
  • woaifen3344
  • woaifen3344
  • 2014年05月13日 18:01
  • 8051

Android 之生成图形验证码

很简单,直接上代码了。import android.graphics.Bitmap; import android.graphics.Canvas; import android.graphics.C...
  • jky_yihuangxing
  • jky_yihuangxing
  • 2016年11月23日 10:27
  • 2314

ASP图形数字验证码

 图形生成文件checkcode.asp: 
  • jyh_jack
  • jyh_jack
  • 2008年07月25日 16:25
  • 670

ASP验证码图形生成

  我们经常在登陆时要让用户输入个验证码,对于这个验证码的产生,有好几种方法,有直接就是数字,那太简单,还有的是由数字映射到相应的图片,那样又不大好,找了一下网上关于这方面的介绍,决定由程序生成一张图...
  • zxub
  • zxub
  • 2004年10月23日 04:12
  • 1548

ASP加法数学公式图片验证码

yzcode.asp
  • cncco
  • cncco
  • 2009年05月12日 10:37
  • 1326

Java随机生成字母数字组合的验证码

字母与数字的ASCII码 目 前计算机中用得最广泛的 字符集及其编码,是由美国国家标准局(ANSI)制定的ASCII码(American Standard Code for Informatio...
  • qq_36948778
  • qq_36948778
  • 2017年05月18日 13:37
  • 1221
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:ASP生成图形数字验证码
举报原因:
原因补充:

(最多只允许输入30个字)