（3）將資料中的單引號改成兩個單引號，并且在前后加上單引號 

   
  Function SqlStr( data ) 
  SqlStr = "'" & Replace( data,"'", "''" ) & "'" 
  End Function 
  '寫入數(shù)據(jù)庫 
  sql = "Insert Into 內容表 (看板id,主題id,作者id,標題,內容)Values( " 
  sql = sql & SqlStr(topicid) & "," 
  sql = sql & SqlStr(boardid) & "," 
  sql = sql & SqlStr(author) & "," 
  sql = sql & SqlStr(title) & "," 
  sql = sql & SqlStr(content) & ")" 
  conn.Execute sql 
  %＞ 
  ＜ h2＞文章已經(jīng)被發(fā)送到數(shù)據(jù)庫，當板主審閱后就可以看到了＜h2＞ 
  ＜ /body＞ 
  ＜ /html＞ 

  　　到這兒，文章已經(jīng)被保存在數(shù)據(jù)庫中了。但是，它并不能夠立刻被顯示出來，還需要版主的認可才行。下面，就來看看論壇的管理部分的內容。 

   
  　　4、論壇的管理部分 

  　　這兒是我們這個論壇的核心之所在，但它實現(xiàn)起來也沒有什么特別的地方。還是那些老東西：窗體處理，數(shù)據(jù)庫查詢，在用ASP把他們有機的結合起來。當進入了文章審閱模式（前面提到的板務處理）之后，最為首要的內容，應該是對版主的身份進行驗證了。下面來看看版主登陸頁面： 

   
  ＜ % 
  boardid=request("boardid") 

   
  （注：boardid是由進入這個頁面的連接所傳遞過來的，是要進行板務處理的看板的ID。通過它才能知道處理的是那個板的板務。） 
  Set conn = erver.CreateObject("ADODB.Connection") 

  conn.Open "driver={Microsoft AccessDriver (*.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 
  %＞ 

  　　現(xiàn)在得到了版主ID和輸入的密碼，下面就是進行驗證的工作managerloginrest.asp了，它接受上面那個文件中窗體的內容，并進行相關處理： 

   
  ＜ % 
  response.buffer=true 

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

最新評論