【正文】 /divtablewidth=100%cellpadding=0width=*將指針移至開(kāi)始位置，分別顯示每個(gè)分類中的新聞If=ThenEnd依次顯示每個(gè)新聞?lì)悇e中最新的條新聞DONot==變量用來(lái)記錄t039。table100%39。cellspacing=1顯示新聞?lì)悇e，并設(shè)置書(shū)簽 td bgcolor=ceceffaname=aamp。/aamp。==amp。39。stitleamp。==/td/tr39。width=39。cellspacing=0按提交時(shí)間的降序顯示新聞標(biāo)題sqlSELECTFROMWHEREamp。cidORDERDESC29conn,1DONot計(jì)數(shù)tt139。10t11ndatendateDateAdd(d,3,date())39。 trtd width=39。a onClick=39。39。href=39。++rs(Title)如果新聞中有圖片，則在標(biāo)題中顯示（附圖）IfThen End/a39。天內(nèi)新聞標(biāo)記圖片Ifrs(Posttime),=Then img SRC=39。 ALT=39。border=0/tdEnd顯示新聞提交的時(shí)間width=39。(CStr(rs(Posttime)))/td/trEnd設(shè)置返回頂部鏈接，跳轉(zhuǎn)到書(shū)簽top p align=righta href=top返回頂部/aamp。amp。amp。39。30target=39。?flag=CStr(cid)39。/td/tr/table/td/tableloop%在的開(kāi)始部分添加下面的代碼，這樣在打開(kāi)網(wǎng)頁(yè)時(shí)，程序會(huì)自動(dòng)連接到數(shù)據(jù)庫(kù)，并進(jìn)行身份驗(yàn)證。file=!include將新聞按照分類顯示，每個(gè)新聞?lì)悇e只顯示最新的條新聞。rs,rsCateSet=rsCate()39。iflag,sql_where39。flag=設(shè)置語(yǔ)句，讀取所有的新聞?lì)悇e到=*CategoryBYrsCate(sql)39。flagDONot==?flag=%=cid%39。TEXTDECORATION:none。%=stitle%/font/a%Loop%在調(diào)用時(shí)，參數(shù)表示新聞?lì)悇e。flag=0，則顯示全部新聞，否則顯示指定類別的新聞。用戶管理”和“退出登錄”，只有用戶才能看到“類別管理”和“用戶管理”鏈接。如果為管理員則顯示類別管理和用戶管理If=Thennbsp。nbsp。href=39。fontamp。amp。amp。a39。color=red用戶管理/font/asql_whereElse39。子句的條件sql_whereamp。39。If%Session(”UserName”)中保存著當(dāng)前登錄用戶的用戶名。Session(”UserName”)=”Admin”時(shí)，才能顯示“類別管理”和“用戶管理”超級(jí)鏈接。根據(jù)參數(shù)和變量設(shè)置語(yǔ)句，讀取新聞數(shù)據(jù)If=ThenIf=ThensqlSELECTFROMORDERPosttime=*Newsamp。BYPosttimeIfElseIf=thensqlSELECTFROMWHEREamp。iflagORDERDESCElsesqlSELECTFROMWHEREamp。iflagAndamp。amp。BYDESCEndIf如果記錄集為空，則顯示“目錄還沒(méi)有記錄”IfThen trtd colspan=4 align=center目前還沒(méi)有記錄。設(shè)置分頁(yè)顯示，每頁(yè)顯示條新聞?dòng)涗?039。page，表示當(dāng)前的頁(yè)碼，使用將其轉(zhuǎn)換為長(zhǎng)整型PageCLng(Request(Page))39。Page1Page133IfThen=設(shè)置當(dāng)前頁(yè)碼為=循環(huán)顯示當(dāng)前頁(yè)的記錄For=to如果到達(dá)記錄集結(jié)尾，則跳出循環(huán)ifthenFor%trtda href=?id=%=rs(id)% onClick=returnnewwin()%=rs(title)%/a%Ifthen Endalign=center%=rs(posttime)%/tdtdhref=?id=%=rs(id)%改/a/tdtdtype=checkboxid=%=rs(id)%style=fontsize:value=ON/td/tr%()Next%/table%顯示分頁(yè)頁(yè)碼Ifthenborder=39。trtdb分頁(yè)：/b/tdFor=Totda?flag=amp。amp。amp。i39。[bamp。/b]/a/tdNext34IfEnd以表格的形式顯示新聞?lì)悇e名稱，并在后面顯示修改鏈接和刪除復(fù)選框，代碼如下：pcenter39。style=FONTSIZE:border=0width=90%trtdhref=fonthref=fontbordercolordark=ECF5FFtrtd width=60% align=center bgcolor=FEEC85strong類 別/strong/tdtd width=20% align=center bgcolor=FEEC85strong修 改/strong/tdtd width=20% align=center bgcolor=FEEC85strong選 擇/strong/td/tr%Set=讀取所有的新聞?lì)悇e數(shù)據(jù)到記錄集中sqlSELECTFROMORDERCateIdconn,1IfThenIf=ThensTitle(name)%form name=UFrom method=postaction=?cid=%=Operid%amp。align=centerinputname=sOrgTitletype=textsize=20type=submitvalue=改name=AFormaction=?Oper=adddivtype=textsize=20inputname=Submit添/div/form%Endrs()39。=*CategoryBYrsCate(sql)DONot==value=%=cid%%=stitle%/option%LOOP%下拉菜單名為編輯新聞內(nèi)容表單的定義代碼如下：formmethod=POSTalign=centeronsubmit=returnform_onsubmit()，進(jìn)行數(shù)據(jù)有效性驗(yàn)證，代碼如下:function=if({alert(請(qǐng)選擇新聞?lì)悇e)ValidationPassedfalse。ValidationPassed。=={37alert(請(qǐng)?zhí)顚?xiě)新聞標(biāo)題)。=return}if()ValidationPassedfalse。ValidationPassed。需要將其替換為“[space]border=0[space]width=300/img/div”；空格(””) 空格將被替換為“amp。函數(shù)ChangeChr(str)ChangeChr = Replace( str, [upload],div[space]align=centerimg[space]src=images/)ChangeChr=Replace( ChangeChr, [/upload],[space]border=0[space]width=300/img/div)ChangeChrReplace(amp。)ChangeChrReplace(chr(13),Function下面程序?qū)⒔邮諒膫鬟f來(lái)的數(shù)據(jù)，并將它們轉(zhuǎn)換為能夠保存到數(shù)據(jù)庫(kù)中的格式，代碼如下：Dim新聞標(biāo)題Dim39。category新聞?lì)悇eDim39。語(yǔ)句字符串Dim記錄集變量titleRequest(title)titleReplace(title,39。==替換函數(shù)rqtContentReplace(rqtContent,39。ChangeChr()函數(shù)對(duì)新聞?wù)倪M(jìn)行轉(zhuǎn)換。rs()39。sql*NewsConn,339。AddNewUpdate======attpic=If系統(tǒng)的調(diào)試與測(cè)試；內(nèi)存：8GB；軟件平臺(tái)：操作系統(tǒng)：Windows7；數(shù)據(jù)庫(kù)：Mysql2000；開(kāi)發(fā)工具包：JDK服務(wù)器：；瀏覽器：McroSoft像素。測(cè)試內(nèi)容信息技術(shù)的飛速發(fā)展，使軟件產(chǎn)品應(yīng)用到社會(huì)的各個(gè)領(lǐng)域，軟件產(chǎn)品的質(zhì)量自然成為人們共同關(guān)注的焦點(diǎn)。用戶為了保證自己業(yè)務(wù)的順利完成，當(dāng)然希望選用優(yōu)質(zhì)的軟件。在一些關(guān)鍵應(yīng)用軟件危機(jī)曾經(jīng)是軟件界甚至整個(gè)計(jì)算機(jī)界最熱門的話題。現(xiàn)在人們已經(jīng)逐步認(rèn)識(shí)到所謂的軟件危機(jī)實(shí)際上僅是一種狀況，那就是軟件中有錯(cuò)誤，正是這些錯(cuò)誤導(dǎo)致了軟件開(kāi)發(fā)在成本、進(jìn)度和質(zhì)量上的失控。問(wèn)題在于如何去避免錯(cuò)誤的產(chǎn)生和消除已經(jīng)產(chǎn)生的錯(cuò)誤，使程序中的錯(cuò)誤密度40達(dá)到盡可能低的程度。模擬真實(shí)環(huán)境測(cè)試：有些軟件，特別是面向大眾的商品化軟件，在測(cè)試時(shí)常常需要考察在真實(shí)環(huán)境中的表現(xiàn)。橫向?qū)Ρ葴y(cè)試：利用輔測(cè)試環(huán)境“克隆”出完全一致的測(cè)試環(huán)境，從而保證各個(gè)被測(cè)軟件平等對(duì)比。系統(tǒng)前臺(tái)首頁(yè)測(cè)試讀者和管理員可登入系統(tǒng)首頁(yè)中，查看新聞，系統(tǒng)首頁(yè)顯示效果如圖所示：41圖學(xué)校新聞發(fā)布系統(tǒng)首頁(yè)（2）如果用戶沒(méi)有輸入用戶名和密碼，而單擊“提交”按鈕，系統(tǒng)會(huì)彈出對(duì)話框提示用戶。若用戶信息錯(cuò)誤，則給出提示信息。所示：42圖后臺(tái)管理員登陸界面如果瀏覽者想查看類似的新聞，但又在該系統(tǒng)中未找到想看的新聞，就可以點(diǎn)擊友情鏈接中網(wǎng)站，進(jìn)入其他新聞網(wǎng)站系統(tǒng)進(jìn)行查找。課程設(shè)計(jì)心得體會(huì)經(jīng)過(guò)了近幾個(gè)多月的學(xué)習(xí)和工作，我終于完成了此篇論文。在這段時(shí)間里，我學(xué)到了很多知識(shí)也有很多感受，從對(duì)服務(wù)器知之甚少的狀態(tài)中，對(duì)等相關(guān)技術(shù)很不了解的狀態(tài)，我開(kāi)始了獨(dú)立的學(xué)習(xí)和試驗(yàn)，查看相關(guān)的資料和書(shū)籍，43讓自己頭腦中模糊的概念逐漸清晰，使自己非常稚嫩作品一步步完善起來(lái)，每一次改進(jìn)都是我學(xué)習(xí)的收獲，每一次試驗(yàn)的成功都會(huì)讓我興奮好一段時(shí)間。宣泄自己的情感，表達(dá)自己的感受，并且把自己的想法與他人分享，我也有了一個(gè)屬于自己的博客空間。當(dāng)看著自己的程序，自己成天相伴的系統(tǒng)能夠健康的運(yùn)行，真是莫大的幸福和欣慰。這次做論文的經(jīng)歷也會(huì)使我終身受益，我感受到做論文是要真真正正用心去做的一件事情，是真正的自己學(xué)習(xí)的過(guò)程和研究的過(guò)程，沒(méi)有學(xué)習(xí)就不可能有研究的能力，沒(méi)有自己的研究，就不會(huì)有所突破，那也就不叫論文了。參考文獻(xiàn)[1]信息系統(tǒng)開(kāi)發(fā)實(shí)例精選[M]．北京：機(jī)械工業(yè)出版社，2005.[2]工程應(yīng)用與項(xiàng)目實(shí)踐[M]．北京：機(jī)械工業(yè)出版社，2005.[3]Web張基溫著．Java數(shù)據(jù)庫(kù)開(kāi)發(fā)實(shí)例解析[M].北京：機(jī)械工業(yè)出版社，442006.[6]Hunt,LoftusJ2EEJava清華大學(xué)出版社,Herbert著.參考大全[M].北京：清華大學(xué)出版社，2006．[8]Struts2流行服務(wù)器、框架、工具及整和應(yīng)用[M].北京：人民郵電出版社，2006．[9]Struts2基于的Web電子工業(yè)出版社,孫衛(wèi)琴著．精通對(duì)象持久化技術(shù)詳解[M].北京:2007.[11][M].北京：電子工業(yè)出版社，2007.[12]JohnJava著.程序設(shè)計(jì)導(dǎo)論[M].北京：機(jī)械工業(yè)出版社，2006.[14]著.ENGINEERING[M].北京：清華大學(xué)出版社，20074