温馨提示:代码在线浏览功能只能做为源码浏览参考,如果想更进一步了解该代码请下载:字母\数字\汉字混合的验证码源码
当前文件:
AllInOneValidCode/Default2.aspx[2K,2009-6-12 11:31:38],打开代码结构图
AllInOneValidCode/Default2.aspx[2K,2009-6-12 11:31:38],打开代码结构图1<%@ Page Language="VB" %> 2
<html xmlns="http://www.w3.org/1999/xhtml"> 3
<head> 4
<script language="vb" Runat="Server"> 5
Sub Page_Load(Sender as object,e as eventargs) 6
dim VNum as string=Session("VNum") 7
Session.Abandon() 8
ViewState("VNum")=VNum 9
End Sub 10
'下面的事件代码是用来测试验证码,可以根据需要更改 11
Sub btnSubmit_click(sender as object,e as eventargs) 12
'判断输入的验证码与所给是否相同 13
If txtValidateCode.text=Cstr(ViewState("VNum")) then 14
lblShow.text="<font color='red'>提示:验证通过</font>" 15
Else 16
lblShow.text="所填写的验证码与所给的不符" 17
End If 18
End Sub 19
</script> 20
</head> 21
<body> 22
<form id="Form1" runat="server"> 23
<div align="center"> 24
<table width="750"> 25
<!--DWLayoutTable--> 26
<tr> 27
<td width="256" height="46"> </td> 28
<td width="9"> </td> 29
<td width="88"> </td> 30
<td width="87"> </td> 31
<td width="100"> </td> 32
<td width="68"> </td> 33
<td width="97"> </td> 34
</tr> 35
<tr> 36
<td height="21"></td> 37
<td></td> 38
<td colspan="3" valign="top"><asp:label ID="lblShow" runat="server"></asp:label></td> 39
<td> </td> 40
<td> </td> 41
</tr> 42
<tr> 43
<td height="14"></td> 44
<td></td> 45
<td></td> 46
<td></td> 47
<td></td> 48
<td></td> 49
<td></td> 50
</tr> 51
<tr> 52
<td height="21"> </td> 53
<td colspan="2" valign="middle">验证码:</td> 54
<td valign="top"><asp:Image id="Image1" runat="server" ImageUrl="default.aspx" /></td> 55
<td> 56
<asp:Image ID="Image2" runat="server" ImageUrl="gif.aspx" /></td> 57
<td> </td> 58
<td> </td> 59
</tr> 60
<tr> 61
<td height="20"> </td> 62
<td colspan="2" valign="top">输入验证码:</td> 63
<td valign="top"><asp:textbox ID="txtValidateCode" runat="server" TextMode="SingleLine" /></td> 64
<td colspan="2" valign="middle"><font color="#FF0000" size="2">*注意:区分大小写</font></td> 65
<td> </td> 66
</tr> 67
<tr> 68
<td height="25"> </td> 69
<td> </td> 70
<td> </td> 71
<td> </td> 72
<td> </td> 73
<td> </td> 74
<td> </td> 75
</tr> 76
<tr> 77
<td height="19"> </td> 78
<td> </td> 79
<td> </td> 80
<td valign="top"><asp:button ID="btnSubmit" runat="server" Text="比较" onclick="btnSubmit_click" /></td> 81
<td> </td> 82
<td> </td> 83
<td> </td> 84
</tr> 85
</table> 86
</div> 87
</form> 88
</body> 89
</html>





Sub Page_Load(Sender as object,e as eventargs)
End Sub
