性欧美大战久久久久久久,伊人久久亚洲综合,国产欧美一区二区精品性色超碰

简单Asp图片验证码,收集大概35种各种各样图片样式验证码，还有语音验证码

2009/1/23 10:59:49 深山行者字体:大中小浏览 7876

大概收集了30种以上的图片验证码效果，还有语音验证码样式在里面。
下载地址：链接: https://pan.baidu.com/s/1rHP4PV6XULNMMHH4cTZSVg 提取码: kvxw

保存下面代码到code.asp,在需要显示验证码的地方使用
<img src="code.asp" alt="验证码" />来显示,使用session("qwbm")
来提取验证码

相应的生成效果图

以下为详细代码

<%
Option Explicit
Response.buffer=true
Call Com_CreatValidCode("qwbm")
Sub Com_CreatValidCode(pSN)
Response.Expires = -1
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
Response.ContentType = "Image/bmp"
Randomize
Dim i, ii, iii
Const cOdds = 6 ' 杂点出现的机率
Const cAmount = 10 ' 文字数量
Const cCode = "0123456789abcd"
' 颜色的数据(字符，背景)
Dim vColorData(1)
vColorData(0) = ChrB(0) & ChrB(0) & ChrB(255) ' 蓝0，绿0，红0（黑色）
vColorData(1) = ChrB(255) & ChrB(255) & ChrB(255) ' 蓝250，绿236，红211（浅蓝色）
' 随机产生字符
Dim vCode(4), vCodes
For i = 0 To 3
vCode(i) = Int(Rnd * cAmount)
vCodes = vCodes & Mid(cCode, vCode(i) + 1, 1)
Next
Session(pSN) = vCodes '记录入Session
' 字符的数据
Dim vNumberData(9)
vNumberData(0) = "1110000111110111101111011110111101001011110100101111010010111101001011110111101111011110111110000111"
vNumberData(1) = "1111011111110001111111110111111111011111111101111111110111111111011111111101111111110111111100000111"
vNumberData(2) = "1110000111110111101111011110111111111011111111011111111011111111011111111011111111011110111100000011"
vNumberData(3) = "1110000111110111101111011110111111110111111100111111111101111111111011110111101111011110111110000111"
vNumberData(4) = "1111101111111110111111110011111110101111110110111111011011111100000011111110111111111011111111000011"
vNumberData(5) = "1100000011110111111111011111111101000111110011101111111110111111111011110111101111011110111110000111"
vNumberData(6) = "1111000111111011101111011111111101111111110100011111001110111101111011110111101111011110111110000111"
vNumberData(7) = "1100000011110111011111011101111111101111111110111111110111111111011111111101111111110111111111011111"
vNumberData(8) = "1110000111110111101111011110111101111011111000011111101101111101111011110111101111011110111110000111"
vNumberData(9) = "1110001111110111011111011110111101111011110111001111100010111111111011111111101111011101111110001111"
' 输出图像文件头
Response.BinaryWrite ChrB(66) & ChrB(77) & ChrB(230) & ChrB(4) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) &_
ChrB(0) & ChrB(0) & ChrB(54) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(40) & ChrB(0) &_
ChrB(0) & ChrB(0) & ChrB(40) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(10) & ChrB(0) &_
ChrB(0) & ChrB(0) & ChrB(1) & ChrB(0)
' 输出图像信息头
Response.BinaryWrite ChrB(24) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(176) & ChrB(4) &_
ChrB(0) & ChrB(0) & ChrB(18) & ChrB(11) & ChrB(0) & ChrB(0) & ChrB(18) & ChrB(11) &_
ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) & ChrB(0) &_
ChrB(0) & ChrB(0)
For i = 9 To 0 Step -1 ' 历经所有行
For ii = 0 To 3 ' 历经所有字
For iii = 1 To 10 ' 历经所有像素
' 逐行、逐字、逐像素地输出图像数据
If Rnd * 99 + 1 < cOdds Then ' 随机生成杂点
Response.BinaryWrite vColorData(0)
Else
Response.BinaryWrite vColorData(Mid(vNumberData(vCode(ii)), i * 10 + iii, 1))
End If
Next
Next
Next
End Sub
%>

前一页:汉字转声母

后一页:asp版图形验证码，可自定义点阵信息，支持字符扭曲、倾斜、倾斜

相关阅读: 重要声明：关于某些人冒充本网站。; uni-app设置像页面html或者body的全局背景色; asp中Request.ServerVariables能获取的信息整理总结; 生成最新日期与时间选择（年月日）下拉框; 深山文章管理系统 v1.0 bulid 090418; 解析css属性的另类属性之媒体（Media）类型; AJAX弹出提示信息效果与lightbox效果一样; 一些常见的网页设计小技巧

共有0条关于《简单Asp图片验证码,收集大概35种各种各样图片样式验证码，还有语音验证码》的评论: 发表评论

正在加载评论......

返回顶部发表评论

呢称:
表情:
内容:	评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码:

网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择: 百度小程序开发; 微信小程序开发; 微信公众号开发; uni-app; asp函数库; ASP; DIV+CSS; HTML; python

更多>>同类信息: ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明; asp显示随机密码; 通过阿里云服务接口获得ip地址详细信息; iis点开后任务栏上有显示，但是窗口看不到的解决办法; RSA加密解密插件; 微软Encoder加密解密函数

更多>>最新添加文章: dw里面查找替换使用正则删除sqlserver里面的CONSTRAINT; Android移动端自动化测试：使用UIAutomatorViewer与Selenium定位元素; 抖音直播音挂载小雪花懂车帝小程序; javascript获取浏览器指纹可以用来做投票; 火狐Mozilla Firefox出现：无法载入您的Firefox配置文件它可能已经丢失或是无法访问问题解决集合处理办法; 在Android、iOS、Windows、MacOS中微信小程序的文件存放路径; python通过代码修改pip下载源让下载库飞起; python里面requests.post返回的res.text还有其它的吗

更多>>随机抽取信息: CSS教程:CSS伪类属性; JavaScript实现把汉字转换为拼音; 利用java控制图片的大小; DIV+CSS做的透明菜单兼容IE、FF等; JS获取网页中HTML元素的几种方法; 用uni-app里面的navigator做链接时感觉像有缓存只能点其中一个链接

更多标签热门标签

色彩比例 CAD imprt 加密 form 珍惜清除网站调色器 Google 命名 JavaScript实现文本框提示效果 web 文章客户端垂直分隔符 link hack 提交 ie5.5 像素 input script 163 工作行号底部 png alert textarea 版权常用忧化类别替换叛断参数关键字鼠标 pt 遍历 absolute 优化项目告效果 ResponseXML rad

久久久久成人免费看a含羞草久色_91福利资源站_好色综合网_久久久久国产精品一区二区三区_一级片免费看_久久久久国产精品久久久久

简单Asp图片验证码,收集大概35种各种各样图片样式验证码，还有语音验证码