getcode.asp

因网上的中文验证很少

<% 
'------------------ 
'汉字图片验证码 
'此代码是在别人基础上增加的汉字功能，特此感谢，同时感谢鬼火狼烟。 
'以前的图片验证码很容易被破解，所以在其基础上进行改进，生成汉字，就目前而言很难破解 
'干扰次数每加一 -> 穷举法的代价提高约100*100倍 
'适当设定杂点几率可以有效降低软件识别正确率 
'验证码值保存在 Session("psn")
'Download by http://www.codefans.net
'------------------ 
Option Explicit 
Call Com_CreatValidCode("SessionName") 

Rem 生成验证码图片 
Sub Com_CreatValidCode(pSN) 
Const codeLen = 4'验证码位数 
Const cOdds = 4 '杂点出现的机率 
Const dbtTimes = 1'干扰次数（安全考虑，最好不要小于2） 
Const cAmount = 85 '字库数量 
Const cCode = "好一路阳光子无开月了的比小山古天中石头井火大西木开人也叶九七六五合文只个鱼羊哈么点四生件格不步布各你田红蓝来很春下画京左百白东关工共足方尺才梦见查着去区曲寻早可上丰爱呵刘" '字库对应的字符 
Const UnitWidth = 28'字宽(要为4的倍数) 
Const UnitHeight = 28'字高 
Const DotsLimit = 2'每次删除有效点的上限(避免无法人为识别)