人人做人人澡人人爽欧美,国产主播一区二区,久久久精品五月天,羞羞视频在线观看免费

當前位置:蘿卜系統(tǒng)下載站 > 技術(shù)開發(fā)教程 > 詳細頁面

ASP技術(shù)在論壇中的運用(7)(吐血推薦。。。。

ASP技術(shù)在論壇中的運用(7)(吐血推薦!。。。

更新時間:2022-09-03 文章作者:未知 信息來源:網(wǎng)絡(luò) 閱讀次數(shù):

    這兒或許是我們這個論壇的核心之所在,但它實現(xiàn)起來也沒有什么特別的地方。還是那些老東西:表單處理,數(shù)據(jù)庫查詢,在用ASP把他們有機的結(jié)合起來。

  當進入了文章審閱模式(前面提到的板務(wù)處理)之后,最為首要的內(nèi)容,應(yīng)該是對斑竹的身份進行驗證了。下面來看看斑竹登陸頁面:

  < %

  boardid=request("boardid")

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

  

  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>

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

  < /body>

  < /html>

  < %

  set rs=nothing

  conn.close

  set conn=nothing

  %>

   現(xiàn)在得到了斑竹ID和輸入的密碼,下面就是進行驗證的工作managerloginrest.asp了,它接受上面那個文件中表單的內(nèi)容,并進行相關(guān)處理:

  < %

  response.buffer=true

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

  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

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

本類教程下載

系統(tǒng)下載排行

網(wǎng)站地圖xml | 網(wǎng)站地圖html
主站蜘蛛池模板: 剑川县| 甘泉县| 德惠市| 信宜市| 娱乐| 滕州市| 连平县| 化德县| 临猗县| 玉龙| 瑞金市| 本溪市| 潜山县| 原平市| 石阡县| 石首市| 高淳县| 丰台区| 宁明县| 淮安市| 南华县| 德化县| 永胜县| 海门市| 福州市| 涟源市| 临洮县| 蒙自县| 嘉峪关市| 虎林市| 朝阳区| 忻州市| 出国| 香港| 新巴尔虎右旗| 抚顺县| 尼玛县| 施甸县| 伊金霍洛旗| 芮城县| 东明县|