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

首頁 > 學院 > 開發設計 > 正文

實現有管理功能的ASP留言板

2019-11-18 19:58:38
字體:
來源:轉載
供稿:網友

    今天我們來寫一個有管理功能的留言板程序。所謂的管理功能,其實就是每條留言前有一個選擇框,點中要刪除的留言,或者點“刪除所有留言”,就完成了批量刪除。通過這一實例,我們可以初步了解asp中對數據庫的基本操作。
    
  一、建立數據庫(access2000中文版)

myid      文本型   20字節   這是發言的唯一標志
myname    文本型   10字節   這是保存留言人姓名的
nowtime   日期/時間型    這里記錄了留言時間
mytitle   文本型   30字節   這是留言的題目
mybody    備注    留言內容
    
  其中的myid字段是關鍵,它是刪除的唯一標志。
    
  二、管理程序

    manage.asp代碼
    '先定義變量
    dim listrs,conn,cmd
    '可根據實際留言數量修改i的循環次數
    for i=1 to 100
    if request("delit"&i)<>empty then
    '上面這條語句為關鍵部分,檢查第i條留言是否被選中,若被選中,則執行下面的刪除操作
    Set conn = Server.CreateObject("ADODB.Connection")
    sConnection = "PRovider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("guestbook.mdb")&";"
    'mappath函數要用一個參數guestbook.mdb,表示要連接的數據庫,注意路徑問題
    conn.Open sConnection
    '再連接數據表
    set cmd=Server.Createobject("ADODB.Command")
    set cmd.activeconnection=conn
    cmd.commandtext="delete from guest where myid='"&request("delit"&i)&"'"
   '上面的guest是數據表的表名,myid是字段名
   cmd.execute
   set conn=Nothing
   set cmd=Nothing
   '執行SQL指令及釋放對象
   end if
   next
   '輸出表單,注意action屬性指向manage.asp
   response.write ""
   '連接數據庫
   set conn=Server.CreateObject("ADODB.Connection")
   set listrs=server.createobject("ADODB.Recordset")
   sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("guestbook.mdb")&";"
    conn.Open sConnection
    listrs.open "select * from guest",conn,2,2
    '上面打開了數據庫的guest表
    i=1
    '變量i開始記數
    while not listrs.eof
    response.write "來自:"&listrs("myname")&"----"&listrs("mytitle")&"時間:"&listrs("nowtime")&"
"&listrs("mybody")&"
"
    i=i+1
   '上面兩步是關鍵處,輸出每條留言的同時,輸出一個checkbox復選框,此框功能是選中與不選中將返回不同值
    listrs.movenext
    wend
    set listrs=Nothing
   '輸出提交按鈕和表單結束標志
    response.write

三、代碼分析
    
  代碼不太好理解,且聽我說來:
    
  1.程序首次執行時,if request("delit"&i)<>empty then總是返回假值,因為復選框未被選中,接著輸出所有的留言。
    
  2.在選中了要刪除的留言后,按下“刪除按鈕”,重新執行。

  3.刪除全部選中的留言后,再輸出留言板。 


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 平原县| 锡林郭勒盟| 濉溪县| 防城港市| 鹤山市| 措美县| 绥阳县| 南靖县| 吉安市| 仁怀市| 保山市| 尚义县| 潮州市| 鄂州市| 施甸县| 凯里市| 普定县| 洛阳市| 尉氏县| 西青区| 井陉县| 定结县| 七台河市| 永宁县| 建始县| 高淳县| 中方县| 突泉县| 河源市| 乐亭县| 龙口市| 图木舒克市| 习水县| 吴忠市| 固原市| 贵定县| 内乡县| 喀喇沁旗| 神木县| 平远县| 手游|