經常在論壇里看到有問怎么實現驗證碼的帖子，其實關于驗證碼的文章在網站上都有很多，但是很多文章只講訴了如何輸出一個隨機生成數字或字符的圖象，當然了，這個是驗證碼的核心了，但是對很多asp.net的初學者來說，怎么使用它生成的圖象又成了一個問題(論壇有不少問這個的)，這也是我寫本文的一個原因。

　　言歸正傳，關于驗證碼的原理，我就不多說了，大家可以參見其他文章，文末附有完整的實例代碼，里面有詳細的注釋，你可以跳過解說文字，直接使用。

　　首先，我要簡要說說session和viewstate的用法，因為后面會用到它。

　　把數據存儲在session中:session("key")="test"

　　從session取值:dim testvalue as string=session("key")

　　類似的:

　　把數據存儲在viewstate中:viewstate("key")="test"

　　從viewstate中取值:dim testvalue as string=viewstate("key")

　　百聞不如一見，有時代碼本身就比任何解說更有表現力，所以在此就不對代碼解說太多了，本文實現的驗證碼需要用到兩個文件:

　　gif.aspx 該文件用于生成驗證碼。

　　validatecode.aspx 該文件用來測試驗證碼(即如何使用)

　　下面給出gif.aspx的完整代碼:

＜%@ import namespace="system"%＞
＜%@ import namespace="system.io"%＞
＜%@ import namespace="system.drawing"%＞
＜%@ import namespace="system.drawing.imaging"%＞
＜script language="vb" runat="server"＞
sub page_load(sender as object，e as eventargs)
’rndnum是一個自定義函數
dim vnum as string=rndnum(4)
session("vnum")=vnum
validatecode(vnum)
end sub
’生成圖象驗證碼函數
sub validatecode(vnum)
dim img as system.drawing.bitmap
dim g as graphics
dim ms as memorystream
dim gheight as integer=int(len(vnum)*11.5)
’gheight為圖片寬度，根據字符長度自動更改圖片寬度
img=new bitmap(gheight，20)
g=graphics.fromimage(img)
g.drawstring(vnum，(new font("arial"，10))，(new solidbrush(color.blue))，3，3)’在矩形內繪制字串（字串，字體，畫筆顏色，左上x.左上y）
ms=new memorystream()
img.save(ms，imageformat.png)
response.clearcontent() ’需要輸出圖象信息 要修改http頭
response.contenttype="image/png"
response.binarywrite(ms.toarray())
g.dispose()
img.dispose()
response.end()
end sub
’--------------------------------------------
’函數名稱:rndnum
’函數參數:vcodenum--設定返回隨機字符串的位數
’函數功能:產生數字和字符混合的隨機字符串
function rndnum(vcodenum)
dim vchar as string="0，1，2，3，4，5，6，7，8，9，a，b，c，d，e，f，g，h，i，j，k，l，m，n，o，p，q，r，s，t，u，w，x，y，z"
dim vcarray() as string=split(vchar，"，") ’將字符串生成數組
dim vnum as string=""
dim i as byte
for i=1 to vcodenum
randomize
vnum=vnum & vcarray(int(35*rnd)) ’數組一般從0開始讀取，所以這里為35*rnd
next
return vnum
end function
＜/script＞

　　那么又應該如何使用該文件生成的圖象驗證碼，看這句代碼:

＜asp:image id="image1" runat="server" imageurl="gif.aspx" /＞

　　這就是用來顯示驗證碼的image控件，你可以把它放在任何你喜歡的地方，下面的給出詳細的使用代碼，你把它保存為validatecode.aspx，并把它和gif.aspx放在同一目錄下，在瀏覽器中打開validatecode.aspx，就可以測試它的效果了:

＜script language="vb" runat="server"＞
sub page_load(sender as object，e as eventargs)
dim vnum as string=session("vnum")
session.abandon()
viewstate("vnum")=vnum
end sub
’下面的事件代碼是用來測試驗證碼，可以根據需要更改

sub btnsubmit_click(sender as object，e as eventargs)
’判斷輸入的驗證碼與所給是否相同
if txtvalidatecode.text=cstr(viewstate("vnum")) then
lblshow.text="＜font color=’red’＞提示:驗證通過＜/font＞"
else
lblshow.text="所填寫的驗證碼與所給的不符"
end if
end sub

＜/script＞
＜html＞
＜body＞
＜form runat="server"＞
＜div align="center"＞
＜table width="750"＞
＜!--dwlayouttable--＞
＜tr＞
＜td width="256" height="46"＞  ＜/td＞
＜td width="9"＞ ＜/td＞
＜td width="88"＞ ＜/td＞
＜td width="87"＞ ＜/td＞
＜td width="100"＞ ＜/td＞
＜td width="68"＞ ＜/td＞
＜td width="97"＞ ＜/td＞
＜/tr＞
＜tr＞
＜td height="21"＞＜/td＞
＜td＞＜/td＞
＜td colspan="3" valign="top"＞＜asp:label id="lblshow" runat="server"＞＜/asp:label＞＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜/tr＞
＜tr＞
＜td height="14"＞＜/td＞
＜td＞＜/td＞
＜td＞＜/td＞
＜td＞＜/td＞
＜td＞＜/td＞
＜td＞＜/td＞
＜td＞＜/td＞
＜/tr＞
＜tr＞
＜td height="21"＞ ＜/td＞
＜td colspan="2" valign="middle"＞驗證碼:＜/td＞
＜td valign="top"＞＜asp:image id="image1" runat="server" imageurl="gif.aspx" /＞＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜/tr＞
＜tr＞
＜td height="20"＞ ＜/td＞
＜td colspan="2" valign="top"＞輸入驗證碼:＜/td＞
＜td valign="top"＞＜asp:textbox id="txtvalidatecode" runat="server" textmode="singleline" /＞＜/td＞
＜td colspan="2" valign="middle"＞＜font color="#ff0000" size="2"＞*注意:區分大小寫＜/font＞＜/td＞
＜td＞ ＜/td＞
＜/tr＞
＜tr＞
＜td height="25"＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜/tr＞
＜tr＞
＜td height="19"＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td valign="top"＞＜asp:button id="btnsubmit" runat="server" text="比較" /＞＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜td＞ ＜/td＞
＜/tr＞
＜/table＞
＜/div＞
＜/form＞
＜/body＞
＜/html＞