站長資訊網(wǎng)這套驗證碼與網(wǎng)上流傳的驗證多少有點不同。這里的圖片是單張分開的，便于修改
writeCheckCode.asp 通過本文件實現(xiàn)寫圖片功能，可以定義圖片所以路徑、文件名等
<%
‘****—-參數(shù)設(shè)定—-****
imgFolderPath=”images/CheckCode/” ‘**存放路徑
fileExt=”.gif” ‘**文件擴展名，要加上圓點的?？梢允褂玫奈募愋蜑間if jpeg bmp png
imgWidth=15 ‘**圖像寬
imgHeight=20 ‘**圖像高
dim imgFileName(10) ‘**文件名,不要加擴展名
imgFileName(0)=”0″
imgFileName(1)=”1″
imgFileName(2)=”2″
imgFileName(3)=”3″
imgFileName(4)=”4″
imgFileName(5)=”5″
imgFileName(6)=”6″
imgFileName(7)=”7″
imgFileName(8)=”8″
imgFileName(9)=”9″
‘****—-寫圖片—-****
no=request.querystring(“no”)
CheckCodeStr=session(“CheckCodeStr”)
url=imgFolderPath+imgFileName(cint(mid(CheckCodeStr,no,1)))+fileExt
select case lCase(fileExt)
case “.gif” response.ContentType=”image/gif”
case “.jpg” response.ContentType=”image/jpeg”
case “.bmp” response.ContentType=”image/bmp”
case “.png” response.ContentType=”image/png”
end select
set Ados=Server.CreateObject(“Adodb.Stream”)
Ados.Mode=3
Ados.Type=1
Ados.Open
Ados.LoadFromFile(server.mappath(url))
response.BinaryWrite Ados.read(Ados.size)
%>
CheckCodeFun.asp 顯示驗證碼及檢驗是否正確
<%
action=request.querystring(“action”)
if action=”show” then
‘****—-生成驗證碼—-****
dim CheckCode(3)
randomize()
for i=0 to 3
CheckCode(i)=cint(rnd()*10-0.5)
CheckCodeStr=CheckCodeStr+cStr(CheckCode(i))
next
session(“CheckCodeStr”)=CheckCodeStr ‘**驗證碼存于session(“CheckCodeStr”)
str=”<body topmargin=0 leftmargin=0><div onclick=’document.location.reload()’ style=’cursor:hand’>”
for i=1 to 4
str=str+”<img alt='<–看不清，換一組驗證碼–>’ src=’writeCheckCode.asp?no=”+cstr(i)+”‘>”
next
‘str=str+” <input type=button value=’換一個’ onclick=’document.location.reload()’>” ‘如果不需要此按鈕，可以把本行注釋掉
str=str+”</div></body>”
response.write (str)
response.end
end if
if action=”check” then
CheckCode=request.querystring(“CheckCode”)
Response.charset = “gb2312”
if (CheckCode=session(“CheckCodeStr”)) then
response.write “yes”
else
response.write “<font color=red>驗證碼不正確</font>”
end if
end if
%>
AjaxFun.js Ajax調(diào)用函數(shù)
function createXMLHttpRequest()
{
try
{
xmlHttp = new XMLHttpRequest();
return xmlHttp;
}
catch(trymicrosoft)
{
try
{
xmlHttp=new ActiveXObject(“Msxml2.XMLHTTP”);
return xmlHttp;
}
catch(othermicrosoft)
{
try
{
xmlHttp = new ActiveXObject(“Microsoft.XMLHTTP”);
return xmlHttp;
}
catch(failed)
{
return xmlHttp;
}
}
}
if (!xmlHttp)
{
return false;
}
}
function getResponseText(method,url,obj)
{
xmlHttp=createXMLHttpRequest();
if (xmlHttp==null)
{
return “[error]”;
}
xmlHttp.open(method,url);
xmlHttp.onreadystatechange=function()
{
if(4==xmlHttp.readyState)
{
if(200==xmlHttp.status)
{
obj.innerHTML=xmlHttp.responseText;
xmlHttp=null;
}
}
}
xmlHttp.send();
}
test.htm 測試
<body>
<script language=javascript src=”AjaxFun.js”></script>
<script language=javascript>
function checkcode()
{
cc=CheckCodeText.value; //用戶輸入的驗證碼
objHint=document.getElementById(“CheckCodeHint”);
objHint.innerHTML=”正在驗證….”;
getResponseText(‘get’,’CheckCodeFun.asp?action=check&CheckCode=’+cc,objHint);
}
</script>
<iframe id=”CheckCode” src=”CheckCodeFun.asp?action=show” name=”CheckCode” width=”75″ height=”16″ scrolling=”no” border=”0″ frameborder=”0″></iframe>
<input type=text name=”CheckCodeText”>
<input type=button value=”Check” onclick=”checkcode()”> <div id=”CheckCodeHint”></div>
</body>
