程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> ASP入門教程 >> ASP進階教程Ⅳ:加入精彩留言

ASP進階教程Ⅳ:加入精彩留言

編輯:ASP入門教程
當有一天你在你的留言簿的留言記錄中看到了一條十分精彩的留言,為了介紹給你的網友們,你是否會考慮將這些留言用單獨的頁面顯示,讓更多的上網者更容易地看到呢?假如真如我所說這樣,那麼只要你看完這一章的內容即可使你如願以償。
  要給留言簿加添“加入精彩留言”功能,同樣可以通過三個步驟來實現。  
步驟一:首先,在留言數據庫中新建一專門用來存放精彩留言的數據表(如perfect).
因為用來存放精彩留言的數據表的結構與存放留言的數據表的結構是相同的,因此創建perfect數據表最簡單的方法是COPY留言數據表guestbook的結構,然後粘貼、確定後即可。如下圖:
       
步驟二:編寫“加入精彩留言”的留言處理程序(wonderful.ASP).
< !--#include file="adovbs.inc" -->
< !--#include file="post.ASP" -->
< % ID = Request.Querystring("ID") %>
< %
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("book2.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql ="DELETE * FROM perfect WHERE (ID = " & Request.QueryString("id") & ")" Set rs = conn.Execute( sql )
sql="insert into perfect select * from guestbook where (ID = " &        Request.QueryString("id") & ")"
Set rs = conn.Execute( sql )
%>
'為了避免當我們在操作“加入精彩留言”的過程中,連續對某條留言重復了該項操作而引發的錯誤,我們可以不理它三七二十一,先將perfect數據表中凡是ID = " & Request.QueryString("id") & "的留言記錄刪除,再將留言數據表guestbook中ID = " & Request.QueryString("id") & "的留言插入到數據表perfect中。
步驟三:設計留言被加入到精彩留言數據表之後轉入的頁面(post.ASP)。  
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved