ASP技術在論壇中的運用。(六) (建論壇的完整程式,吐血推薦!!!!)

來源:互聯網
上載者:User
文章發表模組只有兩個頁面,一個是前面提到的用來提供輸入表單的submit.asp,還有一個是用來處理表單輸入的subresult.asp。前面的那個頁面很簡單,基本上就是一個HTML表單,沒有什麼好講的,下面來看看subresult.asp的內容:
  
  < html>
  < head>
  < title>發表文章< /title>
  < meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  < /head>
  < body bgcolor="#FFFFFF">
  
  < %
  author=request("author")
  password=request("password")
  topicid=request("topicid")
  boardid=request("boardid")
  content=request("content")
  title=request("title")
  
  這一段取出在submit.asp中提交的表但內容,放在相應的變數中。
  
  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 = "select * from 作者表 where id='" & author &"'"
  Set rs = cmd.Execute()
  
  '檢查許可權
  if rs.eof or rs.bof then
  response.write "< h3>你還沒有註冊,請先< a href=register.htm>註冊< /a>後在來發表文章< /h3>"
  response.write "< /body>< /html>"
  response.end
  end if
  
  if password< > rs("密碼") then
   response.write "< h2>密碼錯誤,請檢查密碼是否正確< /h2>"
  response.write "< /body>< /html>"
  response.end
  end if
  
  這一段是對作者許可權進檢查,對於帳號不存在或者密碼錯誤做出相應的錯誤處理。在這兒可以看到response.end的用法,它是用來結束當前ASP指令碼。結合if語句,可以對程式中的預期錯誤進行處理。在一個好的WEB應用中,錯誤處理是必不可少的。
相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.