六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網(wǎng)中心:是一個(gè)免費(fèi)提供流行視頻軟件教程、在線學(xué)習(xí)分享的學(xué)習(xí)平臺(tái)!

ASP技術(shù)在論壇中的使用(6)(吐血推薦!!!!)

[摘要]文章發(fā)表模塊只有兩個(gè)頁面,一個(gè)是前面提到的用來提供輸入表單的submit.asp,還有一個(gè)是用來處理表單輸入的subresult.asp。前面的那個(gè)頁面很簡(jiǎn)單,基本上就是一個(gè)HTML表單,沒有什么好講的,下面來看看subresult.asp的內(nèi)容:      < ...
    文章發(fā)表模塊只有兩個(gè)頁面,一個(gè)是前面提到的用來提供輸入表單的submit.asp,還有一個(gè)是用來處理表單輸入的subresult.asp。前面的那個(gè)頁面很簡(jiǎn)單,基本上就是一個(gè)HTML表單,沒有什么好講的,下面來看看subresult.asp的內(nèi)容:

  

  < html>

  < head>

  < title>發(fā)表文章< /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中提交的表但內(nèi)容,放在相應(yīng)的變量中。

  

  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()

  

  '檢查權(quán)限

  if rs.eof or rs.bof then

  response.write "< h3>你還沒有注冊(cè),請(qǐng)先< a href=register.htm>注冊(cè)< /a>後在來發(fā)表文章< /h3>"

  response.write "< /body>< /html>"

  response.end

  end if

  

  if password< > rs("密碼") then

   response.write "< h2>密碼錯(cuò)誤,請(qǐng)檢查密碼是否正確< /h2>"

  response.write "< /body>< /html>"

  response.end

  end if

  

  這一段是對(duì)作者權(quán)限進(jìn)檢查,對(duì)于賬號(hào)不存在或者密碼錯(cuò)誤做出相應(yīng)的錯(cuò)誤處理。在這兒可以看到response.end的用法,它是用來結(jié)束當(dāng)前ASP腳本。結(jié)合if語句,可以對(duì)程序中的預(yù)期錯(cuò)誤進(jìn)行處理。在一個(gè)好的WEB應(yīng)用中,錯(cuò)誤處理是必不可少的。

  

  ' 將數(shù)據(jù)中的單引號(hào)改成兩個(gè)單引號(hào),并且在前后加上單引號(hào)

  Function SqlStr( data )

   SqlStr = "'" & Replace( data, "'", "''" ) & "'"

  End Function

  

  '寫入數(shù)據(jù)庫

  sql = "Insert Into 內(nèi)容表 (看板id,主題id,作者id,標(biāo)題,內(nèi)容) 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ù)庫,當(dāng)板主審閱后就可以看到了< h2>

  < /body>

  < /html>

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


主站蜘蛛池模板: 手机看片自拍自拍自拍自视频 | 青草视频在线观看免费视频 | 色综合区 | 日韩欧美一区二区三区久久 | 色综综| 日韩毛片在线免费观看 | 日本大蕉香蕉大视频在线观看 | 午夜视频h| 天堂18 | 在线观看视频国产 | 色噜噜网站 | 四虎影院免费看 | 亚洲 欧美 日韩中文字幕一区二区 | 色狠狠色综合久久8狠狠色 色狠狠色综合吹潮 | 天天摸日日添狠狠添婷婷 | 欧洲真实呦女网站 | 日本午夜小视频 | 任我爽在线视频精品凹凸精品分类 | 欧美亚洲一区二区三区导航 | 亚洲国产成人精品一区91 | 午夜免费观看 | 一级女性全黄久久生活片免费 | 热综合一本伊人久久精品 | 日韩大片在线播放 | 日本亚洲欧美 | 青青99| 一级α片视频 | 亚洲人成综合在线播放 | 四虎国产精品免费久久影院 | 偷窥综合网 | 中文字幕欧美日韩在线不卡 | 欧美亚洲国产精品第一页 | 日韩成人免费视频 | 青青青青手机在线观看 | 四虎国产精品永久地址48 | 亚洲综合精品一二三区在线 | 青青草国产精品久久久久 | 一级一片一a一片 | 日韩观看| 天天搞天天干 | 人人干人人舔 |