国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

ASP技術在論壇中的運用(七)（吐血推薦?。。。。?/h1>
2019-11-18 22:40:30
字體：大 中 小
來源：轉載
供稿：網友
    這兒或許是我們這個論壇的核心之所在，但它實現起來也沒有什么特別的地方。還是那些老東西：表單處理，數據庫查詢，在用asp把他們有機的結合起來。

　　當進入了文章審閱模式（前面提到的板務處理）之后，最為首要的內容，應該是對斑竹的身份進行驗證了。下面來看看斑竹登陸頁面：

　　< %

　　boardid=request("boardid")

　　boardid是由進入這個頁面的鏈接所傳遞過來的，是要進行板務處理的看板的ID。通過它才能知道處理的是那個板的板務。

　　

　　Set conn = Server.CreateObject("ADODB.Connection")

　　conn.Open "driver={Microsoft access Driver (*.mdb)};dbq=" & Server.MapPath("bbssystem.mdb")

　　Set cmd = Server.CreateObject("ADODB.Command")

　　Set cmd.ActiveConnection = conn

　　cmd.CommandText = "板主密碼查詢"

　　 ReDim param(0) ' 聲明

　　param(0) = CLng(boardid) ' CLng 不可忽略

　　Set rs = cmd.Execute( ,param )

　　boardmanager=rs("板主")

　　set cmd=nothing

　　%>

　　< html>

　　< head>

　　< title>Untitled Document< /title>

　　< meta http-equiv="Content-Type" content="text/html; charset=gb2312">

　　< /head>

　　< body bgcolor="#FFFFFF">

　　< p>只有板主< %=boardmanager%>才能夠進入這個地方< /p>

　　 < p>請輸入驗證密碼, 并且為了保持身份驗證，請打開瀏覽器的Cookies。< /p>

　　< form method="post" action="managerloginrest.asp">

　　 < input type="passWord" name="password">

　　 < input type="hidden" name="boardid" value=< %=boardid%>>

　　 < input type="submit" name="Submit" value="確定">

　　< /form>

　　這個頁面僅僅是用來登陸用的，它得到斑竹輸入的密碼后，并不能進行驗證，而是將驗證的工作放到下一個頁面中進行。實際上，密碼輸入和驗證的工作是可以放在一個頁面中完成的，只不過代碼的結構安排上有點麻煩。

　　< /body>

　　< /html>

　　< %

　　set rs=nothing

　　conn.close

　　set conn=nothing

　　%>

　　 現在得到了斑竹ID和輸入的密碼，下面就是進行驗證的工作managerloginrest.asp了，它接受上面那個文件中表單的內容，并進行相關處理：

　　< %

　　response.buffer=true

　　把緩沖區設置為允許使用。這一條一般來說，是應該加在每個ASP頁面的首部的，這樣能夠提高ASP頁面的性能。在打開了緩沖區后，ASP中還有一些相應的特殊用法，在后面會提及。

　　boardid=request("boardid")

　　password=request("password")

　　Set conn = Server.CreateObject("ADODB.Connection")

　　conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("bbssystem.mdb")

　　Set cmd = Server.CreateObject("ADODB.Command")

　　Set cmd.ActiveConnection = conn

　　cmd.CommandText = "板主密碼查詢"

　　 ReDim param(0) ' 聲明

　　param(0) = CLng(boardid) ' Cint 不可忽略

　　Set rs = cmd.Execute( ,param )

　　boardmanager=rs("板主")

　　if password< > rs("密碼") then %>

　　< html>

　　< head>

　　< title>身份驗證< /title>

　　< meta http-equiv="Content-Type" content="text/html; charset=gb2312">

　　< /head>

　　< body bgcolor="#FFFFFF">

　　密碼錯誤

　　< /body>

　　< /html>

　　< %

　　else

　　session("beenthere")=boarded

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板： 阳高县| 灯塔市| 寻乌县| 高雄县| 苏州市| 高州市| 雷山县| 佛山市| 丹阳市| 榆社县| 龙海市| 萍乡市| 武胜县| 分宜县| 新巴尔虎右旗| 通城县| 长丰县| 治多县| 安阳市| 辽阳市| 舞阳县| 廊坊市| 辉县市| 和政县| 彰武县| 洪江市| 客服| 铜川市| 望江县| 洮南市| 旌德县| 城步| 平定县| 昆明市| 商水县| 区。| 普陀区| 衡阳市| 平和县| 平武县| 平昌县|