畢業(yè)設(shè)計(jì)（論文）ASP網(wǎng)上購(gòu)物系統(tǒng)設(shè)計(jì)1

1、網(wǎng)站二手前線(xiàn) 目錄一、前言 03二、需求分析03三、方案設(shè)計(jì)03四、系統(tǒng)設(shè)計(jì)04 1、系統(tǒng)結(jié)構(gòu)設(shè)計(jì)04 2、結(jié)構(gòu)圖04 3、模塊劃分05 4、數(shù)據(jù)庫(kù)結(jié)構(gòu)的設(shè)計(jì)05五、系統(tǒng)與實(shí)現(xiàn)061、開(kāi)發(fā)環(huán)境及工具軟件06 2、模塊設(shè)計(jì)說(shuō)明及代碼07六、系統(tǒng)運(yùn)行效果及改進(jìn)意見(jiàn)18結(jié)束語(yǔ)19至謝參考文獻(xiàn)摘要網(wǎng)絡(luò)的發(fā)展，將形成各種文化的共享，極大地豐富人們的文化生活，盡可能多地滿(mǎn)足人們?nèi)找嬖鲩L(zhǎng)的精神文化的需要。如今， 我們利用asp技術(shù)開(kāi)發(fā)的網(wǎng)站二手前線(xiàn)系統(tǒng)，實(shí)現(xiàn)了網(wǎng)站信息的動(dòng)態(tài)管理，使得對(duì)信息的管理更加及時(shí)、高效，提高了工作效率。同時(shí)對(duì)系統(tǒng)的開(kāi)發(fā)原理、系統(tǒng)的功能特點(diǎn)和設(shè)計(jì)方案進(jìn)行了介紹?！娟P(guān)鍵詞】asp 管理

2、數(shù)據(jù)庫(kù)一、前言隨著科學(xué)的發(fā)展，人們的生活水平也在不斷提高。使用電腦也成了部分人們生活必不可小的一部分。與此同時(shí)，我們的網(wǎng)絡(luò)世界也在不斷擴(kuò)大。網(wǎng)絡(luò)世界五花八門(mén)，然而我們上網(wǎng)最大的目的就是從網(wǎng)上獲取更多有利于我們的信息。怎樣才能獲取信息呢？只要我們?cè)谝恍?zhuān)業(yè)的網(wǎng)站上找出我們想要的信息就行了。因此我們就利用asp創(chuàng)建了一個(gè)電子商務(wù)網(wǎng)站名為“二手前線(xiàn)”它主要是提供用戶(hù)一些相關(guān)商品的信息，它可以實(shí)現(xiàn)查找、添加、留言等功能。保證信息的可靠性和新鮮性，它可以給用戶(hù)對(duì)此信息做出靈活的決策，把主動(dòng)權(quán)完全交給用戶(hù)個(gè)人，解決傳統(tǒng)的買(mǎi)賣(mài)麻煩。二、需求分析： 電子商務(wù)有多種類(lèi)型，其中最為常見(jiàn)的是在互聯(lián)網(wǎng)(interne

3、t)上建立虛擬商場(chǎng)，為人們提供一種新的購(gòu)物方式?！岸智熬€(xiàn)”是一個(gè)為用戶(hù)實(shí)現(xiàn)網(wǎng)上購(gòu)物的最好媒體。通過(guò)它用戶(hù)能夠查詢(xún)相關(guān)信息、發(fā)布留言，從而了解市場(chǎng)的最新動(dòng)態(tài)、掌握第一手快訊，這些功能都能在我們的查找、發(fā)布留言和添加信息中實(shí)現(xiàn)。我們還能及時(shí)吸取用戶(hù)的意見(jiàn)，能快速地對(duì)本網(wǎng)站作相應(yīng)的調(diào)整，這一功能也可以在我們?yōu)橛脩?hù)提供的留言板中實(shí)現(xiàn)。具備種種對(duì)用戶(hù)有利的功能才能滿(mǎn)足到用戶(hù)的須要，才能實(shí)現(xiàn)“供求”兩相得益。三、系統(tǒng)設(shè)計(jì)：3.1 系統(tǒng)結(jié)構(gòu)設(shè)計(jì)首先是考慮到用戶(hù)的要求我們的界面設(shè)計(jì)要求明確清晰,操作方便,能給用戶(hù)一看就明。所以導(dǎo)航是很重要的，我們的就把它放在主頁(yè)的中心位置，用一些文字作指示。其次是要操作簡(jiǎn)單

4、，每個(gè)項(xiàng)目或信息就只有一個(gè)與其對(duì)應(yīng)的超鏈接不會(huì)覺(jué)得煩瑣。最后就是我們的后臺(tái)管理，取用了一個(gè)樹(shù)形結(jié)構(gòu)，一共有四個(gè)文件夾，它們分別是：“商品信息管理” 、“最新動(dòng)態(tài)發(fā)布管理”、“站內(nèi)信息管理”、“管理員欄目”。共有12個(gè)基本功能，它們分布在各自的文件夾中：3.2 模塊劃分網(wǎng)站結(jié)構(gòu)圖: 二手前線(xiàn)最新動(dòng)態(tài)新聞管理查看留言查看用戶(hù)信息用戶(hù)留言用戶(hù)發(fā)布信息管理員系統(tǒng)商品信息管理商品大類(lèi)添加商品小類(lèi)添加商品添加商品審查商品刪除新聞發(fā)布管理站內(nèi)信息管理留言管理用戶(hù)管理調(diào)查結(jié)果管理員欄目修改管理員添加管理員供求信息商品需求商品供應(yīng) （圖一）我們網(wǎng)站的模塊主要分為五大部分：“供求信息”、“用戶(hù)留言” 、“最新動(dòng)態(tài)

5、管理”、“查看留言”、“后臺(tái)管理”。，每個(gè)模塊都各有其功能。對(duì)于查看留言模塊，根據(jù)系統(tǒng)的功能分析，它具有的功能應(yīng)該包括管理員查看留言并對(duì)其進(jìn)行修改、刪除功能；一般用戶(hù)只能瀏覽不能刪除。 對(duì)于用戶(hù)留言系統(tǒng)，根據(jù)系統(tǒng)的功能分析，它應(yīng)該具有的功能是用戶(hù)能填寫(xiě)信息、發(fā)布信息。 對(duì)于最新動(dòng)態(tài)模塊,根據(jù)系統(tǒng)的功能分析,它應(yīng)該具有的功能是用戶(hù)只能查看本管理員在本網(wǎng)站公布的最新信息；一般只有管理員才能信息進(jìn)行修改、刪除、和添加。 對(duì)于二手商品管理系統(tǒng)，根據(jù)系統(tǒng)的功能分析，它應(yīng)該包括商品信息管理、站內(nèi)信息管理以及管理員欄目。 對(duì)于管理員模塊，根據(jù)系統(tǒng)的功能分析，它應(yīng)該包括添加管理員、修改管理員密碼、刪除管理員，

6、這些操作只能由管理員進(jìn)行。3.3 后臺(tái)分析：后臺(tái)管理商品信息管理最新動(dòng)態(tài)發(fā)布管理站內(nèi)信息管理管理員欄目 （圖二）對(duì)后臺(tái)的所有操作只有管理員才能實(shí)行。后臺(tái)的每個(gè)文件夾都包括以下功能：“商品信息管理”包涵有：商品大類(lèi)添加、商品小類(lèi)添加、商品添加、商品審查、商品刪除，四項(xiàng)基本功能?！白钚聞?dòng)態(tài)發(fā)布管理”包涵有：增加新聞、修改新聞、新聞?lì)悇e管理，三項(xiàng)基本功能；“站內(nèi)信息管理”包涵有：留言管理、用戶(hù)留言、調(diào)查結(jié)果，三項(xiàng)基本功能。 “站內(nèi)信息管理”包涵有：查看和刪除用戶(hù)留言這項(xiàng)基本功能?！肮芾韱T欄目”它也包涵有：修改管理員、添加管理員，二項(xiàng)基本功能，功能分布清晰可見(jiàn)，這就是我們的方案設(shè)計(jì)3.4 數(shù)據(jù)庫(kù)結(jié)構(gòu)的

7、設(shè)計(jì) 數(shù)據(jù)的結(jié)構(gòu)將影響整個(gè)信息管理系統(tǒng)的應(yīng)用，所以我們應(yīng)先建立一個(gè)完善的數(shù)據(jù)庫(kù)，它匯聚了查詢(xún)、添加和檢索等功能。access作為關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同是擁有桌面數(shù)據(jù)庫(kù)的便利和關(guān)系數(shù)據(jù)庫(kù)的強(qiáng)大功能。這里我們選用了microsoft access構(gòu)建數(shù)據(jù)庫(kù)作為本網(wǎng)站的后臺(tái)數(shù)據(jù)庫(kù)。本網(wǎng)站的后臺(tái)數(shù)據(jù)庫(kù)有兩個(gè)：第一個(gè)數(shù)據(jù)庫(kù)是th9c45_data.mdb它包涵有以下幾張表：1、 book表示(留言板)它包涵有7個(gè)字段:id用戶(hù)編號(hào)name用戶(hù)名email用戶(hù)電子郵件homepage用戶(hù)個(gè)人網(wǎng)站地址title主題content留言的內(nèi)容time留言時(shí)間2、 class_1表示（

8、商品大類(lèi)）它包涵有3個(gè)字段：id商品大類(lèi)編號(hào)class_1_name商品大類(lèi)名class_1_regtime商品大類(lèi)添加時(shí)間3、class_2表示（商品小類(lèi)）它包涵有3個(gè)字段：id商品編號(hào)class_2_name商品小類(lèi)名class_2_regtime商品添加時(shí)間4、manage_user表示（管理員）它包涵有3個(gè)字段：id管理員編號(hào)username管理員名password管理員密碼4、 product表示（商品）它包涵有11個(gè)字段：product_id商品的編號(hào)product_name商品名class_1所在的商品大類(lèi)名class_2所在的商品小類(lèi)名mail電子郵箱地址product_sho

9、w提供者p_pic商品圖片p_oldprice商品價(jià)格look_count查看次數(shù)regtime提交信息時(shí)間tel聯(lián)系電話(huà)第二個(gè)數(shù)據(jù)庫(kù)是news.mdb包涵有兩張表：1、 category表示（新聞?lì)悇e）它包涵有2個(gè)字段：id類(lèi)別編號(hào)title題目2、 news表示（新聞內(nèi)容）它包涵有個(gè)字段：id 新聞編號(hào)cataid所屬的類(lèi)別addtime添加時(shí)間specal是否特別報(bào)道hits點(diǎn)擊次數(shù)content五、系統(tǒng)與實(shí)現(xiàn)5.1 開(kāi)發(fā)環(huán)境與工具開(kāi)發(fā)環(huán)境：我們?nèi)∮昧藈inxp+iis5.0作為服務(wù)器，accress2002作為數(shù)據(jù)庫(kù)的開(kāi)發(fā)工具，用dreamweaver mx作為網(wǎng)頁(yè)編輯器,利用phot

10、oshop 和 flash mx制作logo和動(dòng)態(tài)畫(huà)面。做動(dòng)態(tài)網(wǎng)站的技術(shù)有各種各樣，這里我們只利用了asp動(dòng)態(tài)網(wǎng)頁(yè)技術(shù)來(lái)開(kāi)發(fā)"二手前線(xiàn)"。默認(rèn)腳本語(yǔ)言，我們選擇vbscript。什么是asp動(dòng)態(tài)網(wǎng)頁(yè)呢？asp技術(shù) asp（active server pages動(dòng)態(tài)網(wǎng)頁(yè)）是微軟公司推出的一種用以取代cgi（common gateway interface通用網(wǎng)關(guān)接口）的技術(shù)。目前，internet上的許多基于windows平臺(tái)的web站點(diǎn)已開(kāi)始應(yīng)用asp來(lái)替換cgi。 簡(jiǎn)單地講，asp是一個(gè)位于服務(wù)器端的腳本運(yùn)行環(huán)境，通過(guò)這種環(huán)境，用戶(hù)可以創(chuàng)建和運(yùn)行動(dòng)態(tài)的交互式web服務(wù)器應(yīng)

11、用程序，如交互式動(dòng)態(tài)網(wǎng)頁(yè)，包括使用html表單收集和處理信息，上傳與下載等等。asp與常見(jiàn)的在client端實(shí)現(xiàn)動(dòng)態(tài)主頁(yè)的技術(shù)如java applet、activex control、vbscript、javascript等不同，asp中的命令和script語(yǔ)句都是由服務(wù)器來(lái)解釋執(zhí)行的，執(zhí)行結(jié)果產(chǎn)生動(dòng)態(tài)生成的web頁(yè)面并送到瀏覽器；而client端技術(shù)的script命令則是由瀏覽器來(lái)解釋執(zhí)行。由于asp是在服務(wù)器端解釋執(zhí)行，開(kāi)發(fā)者可以不必考慮瀏覽器是否支持asp；同時(shí)由于它在服務(wù)器端執(zhí)行，開(kāi)發(fā)者也不必?fù)?dān)心別人下載程序從而竊取編程邏輯。asp比較網(wǎng)關(guān)及服務(wù)器擴(kuò)展模式有著以下優(yōu)點(diǎn)：(1)完全與ht

12、ml文件融合在一起；(2)容易創(chuàng)建，不需要其它編譯、鏈接程序；(3)面向?qū)ο蟮牟⑼ㄟ^(guò)activex server對(duì)象可擴(kuò)展。目前asp只適用于下列web server；· microsoft iis 5.0 on windows2000 professional. winxp professional,windows2000 server,windows2000 advanced server.· microsorf iis 4.0 on nt workstation, nt server.· microsorf personal web server windo

13、ws95, windows98, windows me.· microsorf iis 6.0 on windows.net(windows server 2003)asp的主要目的就是用來(lái)建立交互式的網(wǎng)頁(yè),像是訪(fǎng)問(wèn)留言板、在線(xiàn)投票、二手市場(chǎng)及搜索引擎等等。5.2 具體模塊說(shuō)明：這里我們具體說(shuō)明“最新動(dòng)態(tài)”這一模塊。其工作流程為：用戶(hù)登錄通過(guò)權(quán)限判斷，普通用戶(hù)只能瀏覽、閱讀和查詢(xún)信息，管理員除了可以完成普通用戶(hù)的操作外，還可以進(jìn)入新聞管理模塊進(jìn)行信息錄入、修改和刪除的操作。管理員除系統(tǒng)管理員外只能對(duì)自己錄入的信息進(jìn)行刪改操作。主要程序代碼為：這段代碼是實(shí)現(xiàn)數(shù)據(jù)庫(kù)連接的代碼。conn.

14、asp<% dim conn dim connstron error resume nextconnstr="dbq="+server.mappath("data/th9c45_data.asp")+"defaultdir=;driver=microsoft access driver (*.mdb);" set conn=server.createobject("adodb.connection") if err then err.clear else conn.open connstr if err th

15、en err.clear end if end if%>（這是創(chuàng)建沒(méi)有odbc的數(shù)據(jù)庫(kù)連接，這種方法的好處是，程序移植到別的服務(wù)哭器上后，馬上就可以使用，這種方法的缺點(diǎn)是：要注要數(shù)據(jù)庫(kù)文件的路徑問(wèn)題。）這是實(shí)現(xiàn)高級(jí)查找的代碼。search.asp選擇商品的種類(lèi),系統(tǒng)就會(huì)自動(dòng)查找出與被選種類(lèi)相同的所有商品信息。<%spxl=request("spxl")set rs=server.createobject("adodb.recordset")sqltext="select * from product" if request

16、("product_name")<>"" then sqltext=sqltext &" where product_name like '%"& request("product_name") &"%' " else sqltext=sqltext &" where product_name like '%"& "" &"%' " end if

17、 if request("product_class")<>"" then sqltext=sqltext &" and class_1 like '%"& request("product_class") &"%' " end ifrs.open sqltext,conn,1,1dim maxperpagemaxperpage=5'取得頁(yè)數(shù),并判斷用戶(hù)輸入的是否數(shù)字類(lèi)型的數(shù)據(jù)，如不是將以第一頁(yè)顯示dim text,checkpaget

18、ext="0123456789" rs.pagesize=maxperpagefor i=1 to len(request("page") checkpage=instr(1,text,mid(request("page"),i,1) if checkpage=0 then exit for end ifnextif checkpage<>0 then if not isempty(request("page") then currentpage=cint(request("page"

19、;) if currentpage < 1 then currentpage = 1 if currentpage > rs.pagecount then currentpage = rs.pagecount else currentpage= 1 end if if not rs.eof then rs.absolutepage = currentpage end ifelse currentpage=1end if%><%'假如沒(méi)有商品時(shí)出的內(nèi)容if rs.eof and rs.bof then response.write "<td>

20、<p align='center'><font color='#ff0000'>沒(méi)有找到符合條件的商品資料</font></p></td>" response.endend if %>這是一句包含連接數(shù)據(jù)庫(kù)的代碼，使用include語(yǔ)句可以使程度更簡(jiǎn)潔。<!-#include file="conn.asp" ->這是從表class_1中查出相應(yīng)的大類(lèi)信息<%set rs_class_1=server.createobject("adodb.

21、recordset")sqltext2="select * from class_1 "rs_class_1.open sqltext2,conn,1,1%>這是從表class_2中查出相應(yīng)的小類(lèi)信息<% while not rs_class_1.eof set rs_class_2=server.createobject("adodb.recordset") sqltext3="select * from class_2 where class_1_name='" & rs_class_1(&q

22、uot;class_1_name") & "'" rs_class_2.open sqltext3,conn,1,1 %> 這是用戶(hù)發(fā)布信息的相關(guān)代碼：通過(guò)它用戶(hù)可以發(fā)布相關(guān)信息提供給其它用戶(hù)參考。<script language=javascript id=clienteventhandlersjs><!-function form1_onsubmit() if(document.form1.p_name.value.length<1) alert("您必須輸入商品名稱(chēng)!"); document.

23、form1.p_name.focus(); return false; if(document.form1.newprice.value.length<1) alert("您必須輸入會(huì)員價(jià)!"); document.form1.newprice.focus(); return false; if(document.form1.oldprice.value.length<1) alert("您必須輸入市場(chǎng)價(jià)!"); document.form1.oldprice.focus(); return false; if(document.form1.

24、p_intro.value.length<1) alert("您必須輸入商品簡(jiǎn)介!"); document.form1.p_intro.focus(); return false; if(document.form1.p_show.value.length<1) alert("您必須輸入商品說(shuō)明!"); document.form1.p_show.focus(); return false; if(document.form1.p_pic.value.length<1) alert("您必須輸入商品圖片連接!");

25、document.form1.p_pic.focus(); return false; if (fucchecknum(document.form1.newprice.value)=0) )alert ("會(huì)員價(jià)有非法字符，請(qǐng)?zhí)顚?xiě)正確會(huì)員價(jià)。");document.form1.newprice.focus();return false;if (fucchecknum(document.form1.oldprice.value)=0) )alert ("市場(chǎng)價(jià)有非法字符，請(qǐng)?zhí)顚?xiě)正確市場(chǎng)價(jià)。");document.form1.oldprice.focus()

26、;return false;/-></script>新聞發(fā)布管理模塊說(shuō)明這個(gè)模塊包含有三大部分：增加新聞、修改新聞、新聞?lì)悇e管理。主要程序代碼為：這是增加一條新聞時(shí)輸入的相關(guān)內(nèi)容的代碼news_addnews.asp<%function htmlencode(str)if request("special")="true" thenhtmlencode=replace(replace(str,chr(13),"<br>"),"'","")elsehtm

27、lencode=server.htmlencode(str)htmlencode=replace(replace(htmlencode,chr(13),"<br>"),"'","")end ifend functiondim rs,sqlset rs=server.createobject("adodb.recordset")if request.querystring="add" thenif request("title")=""

28、or request("content")="" thenresponse.write "<center>沒(méi)有填寫(xiě)完必須的內(nèi)容！新聞沒(méi)有保存.</center>" 如果題目或容輸入不完整的返回信息elsesql="select * from news where id is null"rs.open sql,conn,1,3rs.addnewrs("cataid")=request("cataid")rs("title")=requ

29、est("title")if request("linktitle")<>"" then rs("linktitle")=request("linktitle")if request("linkurl")<>"" then rs("linkurl")=request("linkurl")if request("image")<>"" then

30、 rs("image")=request("image")rs("addtime")=now()rs("content")=htmlencode(request("content")rs("hits")=1if request("special2")<>"" then rs("special")=request("special2")rs.updaters.closeresponse.

31、write "<center>新聞已經(jīng)成功保存了.</center>"end ifend if%>這是檢驗(yàn)用戶(hù)權(quán)限的代碼<% if not session("userclass")>=1 then response.redirect "login.htm"end if%> 如果不是管理員請(qǐng)返回login.htm重新登陸這是利用javascript語(yǔ)句作變量調(diào)出數(shù)據(jù)庫(kù)中存有的記錄代碼 news_admin.asp如下：<script language="javascript

32、">function view(id)var id;window.open('view.asp?id='+id,'_blank','status=no,scrollbars=yes,top=20,left=110,width=580,height=420'); </script>這是利用javascript語(yǔ)句作變量刪除相應(yīng)記錄的代碼<script language="javascript">function cdel(id,cata,page)var id;if (confirm(&q

33、uot;你真的要?jiǎng)h除這條新聞嗎？")document.location.href="news_delete.asp?action=del&id="+id+"&cataid="+cata+"&pageno="+page;</script>這是如果沒(méi)有新聞就不作顯示記錄信息 <%if cataid="" thensql="select * from news order by id desc"elsesql="select * from

34、news where cataid='"&catid&"' order by id desc"end ifrs.open sql,conn,1,1rcount=rs.recordcountif pmcount="" or isempty(pmcount) or pmcount<1 then pmcount=25end ifrs.pagesize=pmcount '設(shè)置每頁(yè)數(shù)mpage=rs.pagecount '得到總頁(yè)數(shù)pageno=request("pageno")i

35、f isempty(pageno) or cint(pageno)<1 or cint(pageno)>mpage thenpageno=1end ifif rs.bof and rs.eof thenresponse.write "<tr><td colspan='5'><div align='center'>沒(méi)有新聞</div></td></tr>"elsers.absolutepage=pageno'將指針移至指定頁(yè)的第一條記錄loopno=pm

36、countdo while not rs.eof and loopno>0%> <%if cint(pageno)>1 then%> 如果頁(yè)碼數(shù)大于1<a href='news_admin.asp?cataid=<%=cataid%>&pageno=<%=pageno-1%>'>上一頁(yè)</a> 顯示上一頁(yè)，并連接數(shù)據(jù)到上一頁(yè)的數(shù)據(jù)庫(kù)內(nèi)容<%end ifif cint(pageno)<cint(mpage) then%><a href='news_admin.as

37、p?cataid=<%=cataid%>&pageno=<%=pageno+1%>'>下一頁(yè)</a> 顯示下一頁(yè)，并連接數(shù)據(jù)到下一頁(yè)的數(shù)據(jù)庫(kù)內(nèi)容 <%end if%>共<%=cstr(pageno)&"/"&cstr(mpage)&"頁(yè) "&cstr(rcount)%>條新聞</td> 顯示一共有幾條新聞這是修改相應(yīng)的新聞?dòng)涗浀拇anews_editnew.asp<%function htmlencode(str)if re

38、quest("special")="true" thenhtmlencode=replace(replace(str,chr(13),"<br>"),"'","")elsehtmlencode=server.htmlencode(str)htmlencode=replace(replace(htmlencode,chr(13),"<br>"),"'","")end ifend functionfu

39、nction htmldecode(str)htmldecode=replace(replace(str,"<br>",chr(13),"","'")end function'on error resume nextdim rs,sqlset rs=server.createobject("adodb.recordset")if request.querystring="save" thenif request("title")="&qu

40、ot; or request("content")="" thenresponse.write "<center>沒(méi)有填寫(xiě)完必須的內(nèi)容！新聞沒(méi)有保存.</center>"elsesql="select * from news where id ="&request("id")rs.open sql,conn,1,3rs("cataid")=request("cataid")rs("title")=requ

41、est("title")if request("linktitle")<>"" then rs("linktitle")=request("linktitle")if request("linkurl")<>"" then rs("linkurl")=request("linkurl")if request("image")<>"" then

42、 rs("image")=request("image")rs("content")=htmlencode(request("content")if request("special2")<>"" then rs("special")=request("special2")rs.updaters.closeresponse.write "<center>新聞已經(jīng)成功保存了.</center>

43、"end ifend ifif request("id")="" then response.redirect "addnews.asp"elsesql="select * from news where id="&request("id")rs.open sql,conn,1,1'response.write err.descriptioncataid=rs("cataid")title=rs("title")linktitle

44、=rs("linktitle")linkurl=rs("linkurl")image=rs("image")content=rs("content")special=rs("special")rs.closeend if%>這是保存修改按鈕的代碼<form name="form1" method="post" action="news_editnews.asp?save">這是關(guān)閉數(shù)據(jù)庫(kù)的代碼<% rs.clos

45、e set rs=nothing endconnection %>news_addcata.asp這是新聞?lì)悇e管理的代碼添加保存新聞?lì)悇e代碼：<%dim rs,sql,actionset rs=server.createobject("adodb.recordset")action=request("action")select case actioncase "add"if request("title")="" thenresponse.write "<cente

46、r>沒(méi)有填寫(xiě)完必須的內(nèi)容！沒(méi)有保存.</center>"elsesql="select * from category where id is null"rs.open sql,conn,1,3rs.addnewrs("title")=request("title")rs.updaters.closeresponse.write "<center>已經(jīng)成功保存了.</center>"end ifcase "modify"if request(&

47、quot;title")="" thenresponse.write "<center>沒(méi)有填寫(xiě)完必須的內(nèi)容！沒(méi)有保存.</center>"elsesql="select * from category where id="&cstr(request("id")rs.open sql,conn,1,3oldtitle=rs("title")rs("title")=request("title")rs.updater

48、s.closesql="update news set cataid='"&request("title")&"' where cataid='"&oldtitle&"'"conn.execute sqlresponse.write "<center>已經(jīng)成功保存了.</center>"end ifcase "del"sql="select * from category whe

49、re id="&cstr(request("id")rs.open sql,conn,1,1cata=rs("title")rs.closesql="delete from category where id="&cstr(request("id")conn.execute sqlsql="delete from news where cataid='"&cata&"'"conn.execute sqlresponse

50、.write "<center>已經(jīng)成功刪除了.</center>"case "error"response.write "<center>用戶(hù)名/密碼錯(cuò)！沒(méi)有保存.</center>"end select%>如果當(dāng)前無(wú)有新聞?lì)悇e則將顯于的代碼為： <%sql="select * from category"rs.open sql,conn,1,1if rs.bof and rs.eof thenresponse.write "<tr><td>沒(méi)有類(lèi)別</td&g