asp验证码（加法运算）
在提交页面中验证session("GetCode")
<%@CodePage="65001"%>
<%
Call Com_CreatValidCode("GetCode")
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 = 4 ' 杂点出现的机率
Const cAmount = 13 ' 文字数量
Const cCode = "0123456789+=?"
' 颜色的数据(字符，背景)
Dim vColorData(1),vColorRandom(10)
'vColorData(0) = ChrB(Int(Rnd*155)+100) & ChrB(Int(Rnd*155)+100) & ChrB(Int(Rnd*155)+100) ' 蓝0，绿0，红0（黑色）
vColorRandom(0)=ChrB(150) & ChrB(0) & ChrB(0)
vColorRandom(1)=ChrB(0) & ChrB(150) & ChrB(0)
vColorRandom(2)=ChrB(0) & ChrB(0) & ChrB(150)
vColorRandom(3)=ChrB(0) & ChrB(50) & ChrB(150)
vColorRandom(4)=ChrB(150) & ChrB(50) & ChrB(0)
vColorRandom(5)=ChrB(150) & ChrB(0) & ChrB(150)
vColorRandom(6)=ChrB(150) & ChrB(100) & ChrB(10)
vColorRandom(7)=ChrB(150) & ChrB(40) & ChrB(120)
vColorRandom(8)=ChrB(150) & ChrB(0) & ChrB(250)
vColorRandom(9)=ChrB(100) & ChrB(100) & ChrB(100)
vColorRandom(10)=ChrB(50) & ChrB(50) & ChrB(50)
vColorData(0) = vColorRandom(0)
vColorData(1) = ChrB(250) & ChrB(250) & ChrB(255) '背景色 蓝250，绿236，红211（浅蓝色）
' 随机产生字符
Dim vCode(6),vCodes,vCodeColors(6)
F
相关文档：
1. 让IIS7支持ASP
Windows Vista中IIS7是默认不安装的，所以在安装完Windows Vista之后如果需要安装IIS7的话，就要自己动手了。安装的步骤为：开始》控制面板》程序》打开或关闭Windows功能》Internet信息服 务(以前操作系统版本里面的"Windows components” 在Vista里面叫做"Programs and Features")。IIS7安装时� ......
之前写过一个不用验证码的防注册机方法，使用了将近2年后，彻底失效。
今天偶然撞见一个防止恶意注册的方法，正在思考ing。先把方法列下：
获取客户端提交的信息；
将信息存入 Session；
生成一个随机数（称为 ticket）；
将随机数也存入 Session；
用 JavaScript 的形式将随机数以链接的形式输出，并提示客户点击上� ......
本程序是asp实现 php uc_client 功能
程序说明
网上的一些代码号称UCenter 整合ASp，但是大部分都没有一个实例，只有一个加密解密函数，很多新手无法利用其进行实际应用。
近期公司网站项目--课堂无忧 需整合asp ucenter，研究了一把UCenter，写了这个范例程序
虽然只简单写了登陆和注册部分功能的实现，其余模块您可以 ......
Flash中的XML对象也有方法可以将XML数据向服务器发送。即send和sendAndLoad。send方法向某个 URL 传递 XML 对象，返回的信息都被发送到另外一个浏览器窗口；sendAndLoad 方法向某个 URL 发送一个 XML 对象。返回的信息都放在一个XML对象中。
在某种程度上， XML的send方法和sendAndLoad方法类似于loadVars对象的send方法和 ......
txt文件是下面这样的，
一行一条数据，用逗号分隔
下面写出asp文件
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!--#include file="inc/conn.asp" -->
<%
filespec=server.mappath("txt.txt")
Const ForRead ......
