asp的@language与doctype html,如何给ASP网站加入校验码完全点的

最新推荐文章于 2022-03-27 23:27:50 发布
最新推荐文章于 2022-03-27 23:27:50 发布
阅读量103 收藏
点赞数
文章标签： asp的@language与doctype html

1、index.asp

%@LANGUAGE=VBSCRIPT CODEPAGE=936%

!DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transitional//EN http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd

html xmlns=http://www.w3.org/1999/xhtml

head

meta http-equiv=Content-Type content=text/html; charset=gb2312 /

title无标题文档/title

/head

body

form action=submit.asp method=post name=form1

请输入验证码input type=text value= name=yanzheng /

img src=yanzhengma.asp

input type=submit /

/form

/body

/html

2、yanzhengma.asp

%

Call Com_CreatValidCode(ValidCode)

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 = 8 '杂点出现的机率

Const cAmount = 10 '文字数量

Const cCode = 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ

'颜色的数据(字符，背景)

Dim vColorData(1)

vColorData(0) = ChrB(0) & ChrB(0) & ChrB(255) '蓝0，绿0，红0(黑色)

vColorData(1) = ChrB(235) & ChrB(235) & ChrB(235) '蓝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(ddyanzheng)=vCodes '记录入Session

'字符的数据

Dim vNumberData(35)

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

vNumberData(10) = 1111011111111101111111101011111110101111111010111111101011111100000111110111011111011101111000100011

vNumberData(11) = 1000000111110111101111011110111101110111110000111111011101111101111011110111101111011110111000000111

vNumberData(12) = 1110000011110111101110111110111011111111101111111110111111111011111111101111101111011101111110001111

vNumberData(13) = 1000001111110111011111011110111101111011110111101111011110111101111011110111101111011101111000001111

vNumberData(14) = 1000000111110111101111011011111101101111110000111111011011111101101111110111111111011110111000000111

vNumberData(15) = 1000000111110111101111011011111101101111110000111111011011111101101111110111111111011111111000111111

vNumberData(16) = 1110000111110111011110111101111011111111101111111110111111111011100011101111011111011101111110001111

vNumberData(17) = 1000100011110111011111011101111101110111110000011111011101111101110111110111011111011101111000100011

vNumberData(18) = 1100000111111101111111110111111111011111111101111111110111111111011111111101111111110111111100000111

vNumberData(19) = 1110000011111110111111111011111111101111111110111111111011111111101111111110111110111011111000011111

vNumberData(20) = 1000100011110111011111011011111101011111110001111111010111111101101111110110111111011101111000100011

vNumberData(21) = 1000111111110111111111011111111101111111110111111111011111111101111111110111111111011110111000000011

vNumberData(22) = 1000100011110010011111001001111100100111110101011111010101111101010111110101011111010101111001010011

vNumberData(23) = 1000100011110011011111001101111101010111110101011111010101111101100111110110011111011001111000110111

vNumberData(24) = 1110001111110111011110111110111011111011101111101110111110111011111011101111101111011101111110001111

vNumberData(25) = 1000000111110111101111011110111101111011110000011111011111111101111111110111111111011111111000111111

vNumberData(26) = 1110001111110111011110111110111011111011101111101110111110111011111011101001101111011001111110001011

vNumberData(27) = 1000001111110111011111011101111101110111110000111111010111111101101111110110111111011101111000110011

vNumberData(28) = 1110000011110111101111011110111101111111111001111111111001111111111011110111101111011110111100000111

vNumberData(29) = 1000000011101101101111110111111111011111111101111111110111111111011111111101111111110111111110001111

vNumberData(30) = 1000100011110111011111011101111101110111110111011111011101111101110111110111011111011101111110001111

vNumberData(31) = 1000100011110111011111011101111101110111111010111111101011111110101111111010111111110111111111011111

vNumberData(32) = 1001010011110101011111010101111101010111110101011111001001111110101111111010111111101011111110101111

vNumberData(33) = 1000100011110111011111101011111110101111111101111111110111111110101111111010111111011101111000100011

vNumberData(34) = 1000100011110111011111011101111110101111111010111111110111111111011111111101111111110111111110001111

vNumberData(35) = 1100000011110111011111111101111111101111111110111111110111111111011111111011111111101110111100000011

'输出图像文件头

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%

3、在submit.asp验证验证码输入的是否正确

%if trim(server.HTMLEncode(Request.Form(yanzheng))) session(ddyanzheng) then

response.Write(验证码不正确)

'response.Redirect(index.asp)

else

response.Write(ok)

end if

%

取消

评论

.NET ASP.NET支付宝支付接口调用实现
qq_43434300的博客
11-06 1211
此接口APP_Code下一共五个类介绍注释详细，代码如下，连个web窗体分别为同步异步，和点击去支付的点击事件，log文件夹，本人个人自己新添加的注释都有提出标注，接口压缩包地址也会留在下方。 AlipayConfig.cs代码如下，需要传入的参数有以2088开头合作身份者ID签约账号、MD5格式的密钥、同步路径、异步路径。 using System.Web; using System.Tex...
asp.net 真正实现完全跨域单点登录
热门推荐
ABC123
08-13 1万+
asp.net 跨域单点登录     关键字：单点登录   跨域    跨域单点登录   源代码下载：http://download.csdn.net/source/1571879     单点登录（Single Sign On），简称为 SSO，是目前比较流行的企业业务整合的解决方案之一。SSO的定义是在多个应用系统中，用户只需要登录一次就可以访问所有相互
asp的@language与doctype html,ASP 程序
weixin_42372510的博客
06-21 94
ASP 子程序在 ASP 中，您可通过 VBScript 调用 JavaScript 子程序，反之亦然。子程序ASP 源代码可包含子程序和函数：实例sub vbproc(num1,num2)response.write(num1*num2)end sub%>Result: 演示实例 »将 这一行写在 标签的上面，就可以使用另一种脚本语言来编写子程序或者函数：实例function jspr...
asp的@language与doctype html,ASP动态生成的javascript表单验证代码
weixin_33586594的博客
06-21 144
以网上down了一个ASP动态生成Form验证javascript的代码，自己扩容了一下。作者的大名我给忘了，不过我记得清楚，从第一条至第九条的代码都是该作者的原创。至于九至第十五条却是本人自己加的哦。而且由于本人水平有限，从第九条至第十五条不见得会条条生效啊？呵呵，其实把它贴在这里没有什么必要的，因为这点小会伎俩谁都会用的，我把它的作用定位为：开发时找不到该函数时到这里拷贝一下就可以了。呵，因为...
asp的@language与doctype html,asp.net提供的3种认证方式(2)
weixin_34498545的博客
06-21 121
2)登录页面代码 login.aspx 1%@ Page Language=C# AutoEventWireup=true CodeFile=login.aspx.cs Inherits=login % 2 3!DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transitional//EN http://www.w3.org/TR/xhtml12)登录页面代码...
<!DOCTYPE>
我多么希望明天有太阳，来灼烧我腐烂的梦想
01-19 506
http://www.w3school.com.cn/html/html_doctype.asp 声明 Web 世界中存在许多不同的文档。只有了解文档的类型，浏览器才能正确地显示文档。 HTML 也有多个不同的版本，只有完全明白页面中使用的确切 HTML 版本，浏览器才能完全正确地显示出 HTML 页面。这就是 的用处。 不是 HTML 标签。
ASP.NET登录时验证码的制作与验证
将暮未暮缓缓归的博客
03-27 5123
ASP.NET 验证码的制作与校验（使用 cookie 传值） （1）验证码应该是图片格式，不能是文字格式，即无法用鼠标选中。 （2）验证码上应该有噪点和干扰线条。 （3）验证码应该回避相似字符，如“0”和“o”“I”和“1”等。 （4）验证码至少是数字和字母（含大小写）的组合，不应该是单纯的数字或字母，可以出现汉字。应该实现输入验证码字母字母“不区分大小写”。验证码中的内容，应该是随机生成。 （5）验证码，可以通过点击图片或旁边文字实现“看不清，换一张”的功能
ASP.net 简单注册界面
m0_56227168的博客
02-10 6942
一.说明 此文是小白在学习张晨光老师的视频教学<<Asp.Net WEB服务器编程技术>>中做的学习笔记,一些知识点也是跟着教程走的,大家也可以去老师的主页去学习,谢谢大家. 这一篇要练习的是,如下课程的代码: 先新建img文件夹,用来存储图片: 图片大家可以在网上随便找一些壁纸来替代,练习所用,不必太过讲究 再新建js文件夹,用来存放js文件: 从 jquery.com 下载 jQuery 库 二.注册界面(RegUser.aspx) 前端代码: <%@ Page La
Asp.Net约束注册用户名密码规则
hello_word_cool的专栏
02-12 617
前台代码：     用户注册                         账号             密码                         后台代码： using System; using System.Collections.Generic; using System.Linq; us
解读ASP.NET密码强度验证代码实例分享
01-02
@ Page Language=”C#” AutoEventWireup=”true” CodeFile=”Default.aspx.cs” Inherits=”_Default” %> <!DOCTYPE html PUBLIC “-//W3C//DTD XHTML 1.0 Transitional//EN” ...
asp.net2.0密码强度验证
jayhuu的专栏
02-23 587
.net 网站接入支付宝扫码支付
weixin_42864149的博客
04-29 5249
一、下载电脑网站支付的demohttps://docs.open.alipay.com/270/106291/ 二、登录支付宝开发网站https://open.alipay.com/developmentAccess/developmentAccess.htm，注册好ID，决定是用沙箱测试还是直接在线测试。 将下载好的demo放入项目中，注册好的ID等信息填入App_Code的config.c...
【9493】基于springboot+vue的美食信息推荐系统的设计与实现.zip
最新发布
11-13
技术选型 【后端】：Java 【框架】：springboot 【前端】：vue 【JDK版本】：JDK1.8 【服务器】：tomcat7+ 【数据库】：mysql 5.7+ 项目包含前后台完整源码。 项目都经过严格调试，确保可以运行！ 具体项目介绍可查看博主文章或私聊获取 助力学习实践，提升编程技能，快来获取这份宝贵的资源吧！ 在当今快速发展的信息技术领域，技术选型是决定一个项目成功与否的重要因素之一。基于以下的技术栈，我们为您带来了一份完善且经过实践验证的项目资源，让您在学习和提升编程技能的道路上事半功倍。以下是该项目的技术选型和其组件的详细介绍。 在后端技术方面，我们选择了Java作为编程语言。Java以其稳健性、跨平台性和丰富的库支持，在企业级应用中处于领导地位。项目采用了流行的Spring Boot框架，这个框架以简化Java企业级开发而闻名。Spring Boot提供了简洁的配置方式、内置的嵌入式服务器支持以及强大的生态系统，使开发者能够更高效地构建和部署应用。 前端技术方面，我们使用了Vue.js，这是一个用于构建用户界面的渐进式JavaScript框架。Vue以其易上手、灵活和性能出色而受到开发者的青睐，它的组件化开发思想也有助于提高代码的复用性和可维护性。 项目的编译和运行环境选择了JDK 1.8。尽管Java已经推出了更新的版本，但JDK 1.8依旧是一种成熟且稳定的选择，广泛应用于各类项目中，确保了兼容性和稳定性。 在服务器方面，本项目部署在Tomcat 7+之上。Tomcat是Apache软件基金会下的一个开源Servlet容器，也是应用最为广泛的Java Web服务器之一。其稳定性和可靠的性能表现为Java Web应用提供了坚实的支持。 数据库方面，我们采用了MySQL 5.7+。MySQL是一种高效、可靠且使用广泛的关系型数据库管理系统，5.7版本在性能和功能上都有显著的提升。 值得一提的是，该项目包含了前后台的完整源码，并经过严格调试，确保可以顺利运行。通过项目的学习和实践，您将能更好地掌握从后端到前端的完整开发流程，提升自己的编程技能。欢迎参考博主的详细文章或私信获取更多信息，利用这一宝贵资源来推进您的技术成长之路！
(源码)基于Spring、Struts和Hibernate的OA系统.zip
11-13
# 基于Spring、Struts和Hibernate的OA系统 ## 项目简介 本项目是一个基于Spring、Struts和Hibernate框架的办公自动化（OA）系统。该系统主要用于企业内部的日常办公管理，包括用户登录、组织管理、权限管理等功能。系统前端使用现成的模板和JavaScript、jQuery技术，后端通过Struts、Hibernate和Spring框架实现业务逻辑和数据持久化。 ## 项目的主要特性和功能 ### 登录模块 防止多设备登录系统能够检测到同一账号在不同设备上的登录情况，并在检测到异地登录时通知用户并强制下线。 WebSocket支持使用WebSocket技术实现实时通知功能。 ### 组织管理模块 部门管理支持部门的增删改查操作，包括查看部门信息、职位信息和员工数量。 用户管理支持用户的增删改查操作，包括指定用户所在部门、职位和角色。 角色管理支持角色的增删改查操作，包括查看角色权限和修改角色权限。
HTML基础语法与ASP交互实战教程
本资源是一份面向初学者的HTML入门教程，重点在于通过实际操作和示例代码，帮助学习者快速掌握HTML的基础语法和标签元素使用，同时也涉及ASP（Active Server Pages）技术，以实现与服务器端的动态交互。通过本教程，...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值