• <label id="pxtpz"><meter id="pxtpz"></meter></label>
      1. <span id="pxtpz"><optgroup id="pxtpz"></optgroup></span>

        當前位置:雨林木風下載站 > 技術開發教程 > 詳細頁面

        用ASP技術編制隱藏用戶密碼程序

        用ASP技術編制隱藏用戶密碼程序

        更新時間:2022-05-16 文章作者:未知 信息來源:網絡 閱讀次數:

        Internet(或Intranet)上帶權限的查詢,只有“合法用戶”才能進入。這種機制是通過Web程序實現的。在訪問過程中,如果程序設計得不好,就會將用戶口令暴露在地址欄里(舉一個例子:http://www.mmm.nnn/default.asp ?superusername=john&passwd=john123,用戶名john和密碼john123全露出來了),這樣系統就無保密和安全性可言了。怎樣避免這種現象的發生呢?本文將用一段ASP(Active Server pages)程序,來說明隱藏用戶名和口令的方法。

            ASP是Microsoft公司處理動態網絡數據庫的最新技術之一,它可由Windows NT 平臺上的Web Server IIS4.0(Microsoft Internet Information Server4.0)解釋并發布信息,用活動數據對象ADO(ActiveX Data Object)組件并通過ODBC(Open Database Connectivity)訪問多種數據庫(后臺)。本文中用到的數據庫為ORACLE8,下邊這段ASP程序(名字為DEFAULT.ASP)所實現的功能是對數據庫的查詢操作,僅取其隱藏用戶名和密碼的一部分進行說明。

        <% WEB_USER =Request("WEB_USER") 'WEB用戶名 %>

        <% WEB_USER_PASSWD =Request("WEB_USER_PASSWD") 'WEB用戶的密碼 %>

        <% '將WEB用戶名和密碼加密,方法是,將變量值從左至右每個字符的ASCII碼加32,生成新的字符串,當執行到此時,地址行上顯示出的,是“加密”以后的用戶名和密碼,而不是真正的用戶名和密碼,達到保密目的% >

        <% TEMP1="" % >

        <% For i=1 To Len(WEB_USER) %>

        <% TEMP2=Mid(WEB_USER,i,1) %>

        <% TEMP2=Chr(Asc(TEMP2)+32) %>

        <% TEMP1=TEMP1&TEMP2 %>

        <% Next %>

        <% WEB_USER=TEMP1 %>

        <% TEMP1="" %>

        <% For i=1 To Len(WEB_USER_PASSWD) %>

        <% TEMP2=Mid(WEB_USER_PASSWD,i,1) %>

        <% TEMP2=Chr(Asc(TEMP2)+32) %>

        <% TEMP1=TEMP1&TEMP2 %>

        <% Next %>

        <% WEB_USER_PASSWD=TEMP1 %>

        <%'建立和數據庫的連接,定義ODBC名字(odbcname)、ORACLE用戶名(orauser)及口令(orauser_passwd)%>

        <%Set Conn = Server.CreateObject("ADODB.Connection")

        Conn.Open "odbcname","orauser","orauser_passwd"

        %>

        <% '建立查詢語句-SQL語句%>

        <%

        var_sql="SELECT * FROM verifytab,dw_tab where verifytab.user_pd='"&WEB_USER_PASSWD&"'"

        Set RS = Conn.Execute(var_sql) ’符合條件的記錄生成于RS之中%>

        <%'將用戶名和口令翻譯成正確的 ,但此時地址欄里顯示不出來,達到了保密要求%>

        <% TEMP1="" %>

        <% For i=1 To Len(WEB_USER) %>

        <% TEMP2=Mid(WEB_USER,i,1) %>

        <% TEMP2=Chr(Asc(TEMP2)-32) %>

        <% TEMP1=TEMP1&TEMP2 %>

        <% Next %>

        <% WEB_USER=TEMP1 %>

        <% TEMP1="" %>

        <% For i=1 To Len(WEB_USER_PASSWD) %>

        <% TEMP2=Mid(WEB_USER_PASSWD,i,1) %>

        <% TEMP2=Chr(Asc(TEMP2)-32) %>

        <% TEMP1=TEMP1&TEMP2 %>

        <% Next %>

        <% WEB_USER_PASSWD=TEMP1 %>

        <% '驗證輸入的WEB用戶名和口令是否正確,若是,往下進行,否則,返回到default.htm調用,它是IIS默認的調用文件%>〈〉

        <%If WEB_USER="superuser" and WEB_USER_PASSWD="superuserpd" Then

        else

        If RS.EOF Then

        Response.Redirect("default.htm")

        End If

        End If

        %>

        <%'下邊是用FRONTPAGE 98 設計的FORM界面,內容省略%>

        <html>

        <head>

        ……

        大家不妨試一下,瀏覽器端無任何不安全信息,保密效果很好。

        溫馨提示:喜歡本站的話,請收藏一下本站!

        本類教程下載

        系統下載排行

        主站蜘蛛池模板: 国产亚洲无线码一区二区| 亚洲精品亚洲人成人网| 亚洲综合激情五月色一区| 久久精品免费一区二区| 久久亚洲日韩看片无码| 色欲国产麻豆一精品一AV一免费 | 亚洲AV永久无码区成人网站| 激情小说亚洲图片| 亚洲Aⅴ无码一区二区二三区软件| 日本无卡码免费一区二区三区| 亚洲日韩人妻第一页| 午夜肉伦伦影院久久精品免费看国产一区二区三区| 蜜桃视频在线观看免费网址入口| 国产精品亚洲mnbav网站 | 国产色爽免费视频| 亚洲人成色777777精品| 香蕉高清免费永久在线视频| 亚洲熟妇AV乱码在线观看| 精品无码国产污污污免费| 牛牛在线精品观看免费正| 国产亚洲AV手机在线观看| 免费无码VA一区二区三区 | 久久精品亚洲视频| 最近新韩国日本免费观看| 亚洲婷婷第一狠人综合精品| 在线a毛片免费视频观看| 国产精品亚洲色婷婷99久久精品| 99re免费99re在线视频手机版| avtt亚洲天堂| 午夜免费福利片观看| 色偷偷亚洲女人天堂观看欧| 日韩免费高清一级毛片在线| 国产综合免费精品久久久| 亚洲成综合人影院在院播放| 国产成人综合久久精品免费| 免费久久人人爽人人爽av| 亚洲一卡一卡二新区无人区| 亚洲一级片免费看| 国产免费的野战视频| 一级毛片在线完整免费观看| 亚洲美女视频网址|