欢迎光临
我们一直在努力

一個簡單的驗証碼-ASP教程,ASP应用

建站超值云服务器,限时71元/月

网站上有很多登陸都用到了驗証碼,看著好玩自己也寫了個簡單了(好點的就要把驗証碼寫到圖片上去了,有點難度,還沒研究過)先搞個簡單的.

sub page_load(sender as object,e as eventargs)

if not ispostback then

dim rannum as random=new random

將生成的隨机數寫到label中

lblrannum.text=rannum.next(1111,9999).tostring

end if

end sub

sub btnok_click(sender as object,e as eventargs)

dim strtemp as string=lblrannum.text.tostring

檢查在textbox中輸入的數字和產生的驗証碼是否一致,一致就ok,否則就error

if strtemp=trim(txtnumber.text) then

lblmessage.text=”ok!”

lblrannum.text=rannum.next(1111,9999).tostring 如果不寫這句,則產生的驗証碼就一直是葉面第一次加載時生成的驗証碼

else

lblmessage.text=”error!”

lblrannum.text=rannum.next(1111,9999).tostring

end if

end sub

<html>

<body>

<form runat=”server”>

<asp:textbox id=”txtnumber” runat=”server”></asp:textbox>

<asp:button id=”btnok” runat=”server” text=”ok”></asp:button>

<asp:label id=”lblrannum” runat=”server”></asp:label>

<asp:label id=”lblmessage” runat=”server”></asp:label>

</form>

</body>

</html>

————————————————————————-

這個驗証碼的安全性不是很好.网站上一般都是將驗証碼寫到圖片上的,那樣的安全性好很多,即使被黑客截獲看到的也是亂碼.

但是我不會寫…還要慢慢研究!不好意思

赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » 一個簡單的驗証碼-ASP教程,ASP应用
分享到: 更多 (0)

相关推荐

  • 暂无文章