基于Web的學(xué)校新聞發(fā)布系統(tǒng)01

1、基于web的校園新聞發(fā)布系統(tǒng)6基于web的校園新聞發(fā)布系統(tǒng)6畢業(yè)設(shè)計(jì)（論文） 1新聞發(fā)布系統(tǒng)概述1. 1基于web的新聞發(fā)布系統(tǒng)設(shè)計(jì)的提出伴隨著網(wǎng)絡(luò)的出現(xiàn)，網(wǎng)頁逐漸融入人們的生活。快速及時(shí)的新聞瀏覽，五彩 繽紛的網(wǎng)上信息，使網(wǎng)絡(luò)與人們的生活息息相關(guān)，于是世界上乂出現(xiàn)了第三媒體 Interneto它打破了地域限制，真正使信息得以共享，改變了人們的工作和 生活方式。制作網(wǎng)頁是企業(yè)和個(gè)人的宣傳自己的重要手段，同時(shí)也是學(xué)習(xí)者獲取 學(xué)習(xí)信息的重要手段。尤其是在教育領(lǐng)域，在素質(zhì)教育與終身教育成為必然的今 天，人們對信息的需求有了更新，更高的要求，而網(wǎng)頁由于本身所具有的信息量 大，傳遞快速，沒有時(shí)空限制等特

2、點(diǎn)恰好滿足這種要求。所以網(wǎng)頁也逐漸成為一 種新興的教育資源。也正是由于網(wǎng)絡(luò)實(shí)現(xiàn)網(wǎng)站的數(shù)據(jù)信息能夠進(jìn)行實(shí)時(shí)交互，保 證網(wǎng)站數(shù)據(jù)的實(shí)時(shí)性。隨著Internet的進(jìn)一步發(fā)展,靜態(tài)Web站點(diǎn)的開發(fā)與維護(hù)變得越來越困難, 一方面信息的不斷增加和變化，使站點(diǎn)維護(hù)人員不得不經(jīng)常修改他們的網(wǎng)頁，特 別是基于數(shù)據(jù)庫驅(qū)動的Web站點(diǎn)更是如此，隨著Internet上信息量的增多和交 互性的加強(qiáng)使HTML顯得越來越難以勝任。另一方面靜態(tài)網(wǎng)頁由于不能與瀏覽者 進(jìn)行有效交互，使人們感到越來越乏味,而不愿意再一次地進(jìn)入同一站點(diǎn)。所以開 發(fā)動態(tài)網(wǎng)頁或動態(tài)內(nèi)容成了越來越多的站點(diǎn)所追求目標(biāo)。所謂動態(tài)內(nèi)容是由每一 個(gè)用戶按照自己的

3、需求發(fā)出請求而特殊制作的Web網(wǎng)頁。網(wǎng)絡(luò)發(fā)展前景無限，及早與網(wǎng)絡(luò)結(jié)合，與信息時(shí)代同步，與高科技匯合，定會給 社會各行各業(yè)的發(fā)展注入新鮮的活力。站在網(wǎng)絡(luò)時(shí)代的前夜，我們清晰地聽到了 網(wǎng)絡(luò)時(shí)代的宣言：誰掌握了網(wǎng)絡(luò)，誰就掌握了未來。隨著計(jì)算機(jī)技術(shù)的發(fā)展，網(wǎng)絡(luò)技術(shù)對我們生活和工作顯得越來越重要，特別 是現(xiàn)在信息高度發(fā)達(dá)的今天，人們對最新信息的需求和發(fā)布迫切的需要及時(shí)性。 而動態(tài)交互式網(wǎng)頁剛好提供了這些功能，本系統(tǒng)就是一個(gè)能夠在網(wǎng)上實(shí)現(xiàn)新聞的 網(wǎng)上多用戶發(fā)布，多欄目管理，實(shí)時(shí)的進(jìn)行行為統(tǒng)計(jì)和記錄的網(wǎng)上交互系統(tǒng)。1. 2新聞發(fā)布系統(tǒng)的需求分析從經(jīng)濟(jì)可行性角度考慮，這時(shí)所說的經(jīng)濟(jì)，并不專指物質(zhì)經(jīng)濟(jì)，當(dāng)然也包

4、括 效益經(jīng)濟(jì)。要運(yùn)行基于WEB的校園新聞發(fā)布系統(tǒng)，當(dāng)然是必須添加一些網(wǎng)絡(luò)及硬 件設(shè)備，這也就必然比傳統(tǒng)信息傳播在物資設(shè)備方面要投入更多財(cái)力。從效益經(jīng) 濟(jì)來看，運(yùn)行這套在線新聞發(fā)布系統(tǒng)，不光可以省去許多信息傳遞時(shí)間，甚至在 信息化的今天為信息及時(shí)更新，信息及時(shí)傳達(dá)等帶來不小的便利。綜合上面論述, 在線新聞發(fā)布系統(tǒng)的開發(fā)與設(shè)計(jì)在經(jīng)濟(jì)角度來說是利大于弊，是非常值得實(shí)施 的。從技術(shù)可行性角度考慮，隨著網(wǎng)絡(luò)技術(shù)的深入發(fā)展，一些網(wǎng)絡(luò)辦公系統(tǒng)，政 府服務(wù)軟件，在線聊天娛樂軟件等等網(wǎng)絡(luò)應(yīng)用軟件也成功開發(fā)并投入運(yùn)營了，在 社會中產(chǎn)生了不小的社會與經(jīng)濟(jì)效益。HTML作為一種樣式語言，隨著Internet 上信息量

5、的增多和交互性的加強(qiáng)使HTML顯得越來越難以勝任的情況之下，在ASP 編程語言高度發(fā)展的形式下，我們開始了對新聞發(fā)布系統(tǒng)的開發(fā)。運(yùn)用現(xiàn)在軟件 業(yè)流行的技術(shù)成熟的ASP.JSP等開發(fā)語言，以及高效率，易操作Visual InterDev 等開發(fā)工具，再借鑒別人成功開發(fā)的寶貴經(jīng)驗(yàn)，在線新聞發(fā)布系統(tǒng)是完全可以開 發(fā)出來的。1. 3新聞發(fā)布系統(tǒng)的開發(fā)環(huán)境1. 3.1硬件條件服務(wù)器兩臺，一臺為數(shù)據(jù)庫服務(wù)器，一臺為Web服務(wù)器：客戶端計(jì)算機(jī)若干; 網(wǎng)絡(luò)通訊設(shè)備，主要包括網(wǎng)卡、集線器、MODEM等。1.3.2系統(tǒng)平臺采用Browser/Server體系結(jié)構(gòu)，服務(wù)器端采用Microsoft Windows N

6、T4. 0 作為網(wǎng)絡(luò)操作系統(tǒng)，Web服務(wù)器軟件采用IIS3. 0 ( Internet Information Server)o客戶端軟件，包括單機(jī)操作系統(tǒng)和瀏覽器軟件，分別選用Windows 2000 和Internet Explorer,數(shù)據(jù)庫系統(tǒng)采用Microsoft Access有利于方便操作。 1. 3. 3開發(fā)工具基于Web的系統(tǒng)開發(fā)工具應(yīng)使開發(fā)者使用各種各樣的技術(shù)來創(chuàng)建動態(tài)的Web 應(yīng)用程序，并且應(yīng)是一個(gè)可視化的工具。我們采用了 DreamweaverMX進(jìn)行開發(fā)， 它是用來快速創(chuàng)建數(shù)據(jù)驅(qū)動Web應(yīng)用程序的基于團(tuán)隊(duì)的開發(fā)環(huán)境，支持ASP,以 ODBC連接數(shù)據(jù)庫，腳本語言為簡單易學(xué)

7、的javascript或VBScripto 1.3.4運(yùn)行需求正常使用時(shí)不應(yīng)出錯，若運(yùn)行時(shí)遇到不可恢復(fù)的系統(tǒng)錯誤，也必須保證數(shù)據(jù) 完好無損，對數(shù)據(jù)的精確度、時(shí)間特性、適應(yīng)性等都有一定要求，要求系統(tǒng)運(yùn)行 畢業(yè)設(shè)計(jì)（論文）1畢業(yè)設(shè)計(jì)（論文）1時(shí)能夠保證正確性、可靠性、高效性、完整性、易使用性、可維護(hù)性、可測試性、 復(fù)用性、安全保密性、可移植性、互聯(lián)性。畢業(yè)設(shè)計(jì)（論文）1畢業(yè)設(shè)計(jì)（論文）1基于web的校園新聞發(fā)布系統(tǒng)6 2 系統(tǒng)總體設(shè)計(jì)2. 1新聞發(fā)布系統(tǒng)功能分析2.1.1前臺新聞顯示可以根據(jù)網(wǎng)站的需要，進(jìn)行各種方式的插入，自動更新.如顯示欄目導(dǎo)航, 顯示某欄目的最新 條新聞等.使用新聞文章管理系統(tǒng)

8、制作動態(tài)網(wǎng)頁時(shí)，可在需 要的地方插入相應(yīng)的代碼，即可以多種形式顯示新聞文章的欄目或內(nèi)容。例如： 一級欄目列表、二級欄目列表、欄目導(dǎo)航列表、某一欄目的最新新聞（文章）顯示 條數(shù)、某一欄目的熱門文章可任意調(diào)整。該系統(tǒng)也可經(jīng)后繼開發(fā)，使之生成JS代 碼,在一個(gè)主機(jī)上維護(hù)新聞文章，在其他靜態(tài)網(wǎng)頁中插入代碼后顯示相應(yīng)的新聞 文章。1.2后臺管理.新聞欄目管理：增加，修改，刪除一級,二級新聞文章欄目。.新聞文章添加：按不同欄目添加新聞文章、支持文本、HTM格式或源代碼顯 示。.新聞文章刪除：刪除舊的文章。.新聞文章刪除：在后臺管理系統(tǒng)中上傳一些文章、o.管理員管理：新聞管理系統(tǒng)的管理員設(shè)置。2. 2新聞發(fā)

9、布系統(tǒng)數(shù)據(jù)庫的設(shè)計(jì)2. 2.1數(shù)據(jù)庫的搭建數(shù)據(jù)只有用數(shù)據(jù)庫來管理才能有自動化管理的可能。數(shù)據(jù)的結(jié)構(gòu)將影響整個(gè) 管理機(jī)制的應(yīng)用，而且一但建立以后要修改常會出現(xiàn)麻煩。所以一開始就要仔細(xì) 慎重地搭建一個(gè)完整而合理的結(jié)構(gòu)。Microsoft Access數(shù)據(jù)庫相對其它的數(shù)據(jù) 庫來說要簡單容易操作些，本新聞發(fā)布系統(tǒng)中的數(shù)據(jù)庫文件就是Access類型的 數(shù)據(jù)庫，數(shù)據(jù)庫中共有五張表如下圖：2. 2. 2新聞發(fā)布系統(tǒng)數(shù)據(jù)庫的連接以下是本系統(tǒng)與數(shù)據(jù)庫建立連接的ASP源代碼2. 2. 3數(shù)據(jù)類型本系統(tǒng)的數(shù)據(jù)字典如下圖表一:字段類型含義Id數(shù)值型序號Admin文本型用戶名Password文本型密碼Aleave邏輯型

10、權(quán)限基于web的校園新聞發(fā)布系統(tǒng) #基于web的校園新聞發(fā)布系統(tǒng) 表二:字段類型含義Bigclassid數(shù)值型一級新聞序號Bigclassname文本型一級新聞標(biāo)題Admin文本型發(fā)布者表三:字段類型含義Id數(shù)值型新聞序號title文本型新聞標(biāo)題Content文本型新聞內(nèi)容User文本型發(fā)布者Infotime日期型發(fā)布時(shí)間表四:字段類型含義Pinglun Id數(shù)值型評論序號pinglunname文本型評論標(biāo)題Pinglun data日期型評論發(fā)表日期pingluncontent文本型評論內(nèi)容表五:字段類型含義smalllclassid數(shù)值型二級新聞序號smallclassname文本型二級新聞

11、標(biāo)題Admin文本型發(fā)布者畢業(yè)設(shè)計(jì)（論文） 畢業(yè)設(shè)計(jì)（論文） #2. 3功能模塊圖2. 3.1新聞發(fā)布系統(tǒng)前臺模塊設(shè)計(jì)圖:數(shù)據(jù)庫基于web的校園新聞發(fā)布系統(tǒng) #基于web的校園新聞發(fā)布系統(tǒng) 2. 3.2新聞發(fā)布系統(tǒng)后臺模塊設(shè)計(jì)圖:后臺管理欄目分類管理一級欄分類管理二級欄分類管理添加,刪除.修改留言管理數(shù)據(jù)庫訪問層數(shù)據(jù)庫畢業(yè)設(shè)計(jì)（論文） 畢業(yè)設(shè)計(jì)（論文） #3新聞發(fā)布系統(tǒng)各模塊功能設(shè)計(jì)3. 1前臺新聞顯示可以根據(jù)網(wǎng)站的需要，進(jìn)行各種方式的插入，自動更新.如顯示欄目導(dǎo)航，顯 示某欄目的最新N條新聞等.使用新聞文章管理系統(tǒng)制作動態(tài)網(wǎng)頁時(shí)，可在需要 的地方插入相應(yīng)的代碼，即可以多種形式顯示新聞文章的欄

12、目或內(nèi)容。例如： 一級欄目列表、二級欄目列表、欄目導(dǎo)航列表、某一欄目的最新新聞（文章）顯示 條數(shù)、某一欄目的熱門文章可任意調(diào)整。該系統(tǒng)也可經(jīng)后繼開發(fā)，使之生成JS代 碼，在一個(gè)主機(jī)上維護(hù)新聞文章，在其他靜態(tài)網(wǎng)頁中插入代碼后顯示相應(yīng)的新聞 文章。2后臺管理.新聞欄目管理：增加，修改，刪除一級,二級新聞文章欄目。.新聞文章添加：按不同欄目添加新聞文章、支持文本、HTM格式或源代碼顯 示、支持圖片上傳和附件上傳。.新聞文章刪除：刪除舊的文章。.新聞文章刪除：在后臺管理系統(tǒng)中上傳一些文章、上傳圖片等、在前臺查詢 這些文章。.管理員管理：新聞管理系統(tǒng)的管理員設(shè)置。.基本項(xiàng)目管理：統(tǒng)計(jì)數(shù)據(jù)管理、系統(tǒng)初始化

13、、網(wǎng)站資料管理、服務(wù)器信息等。3. 3功能說明3. 3. 1前臺顯示說明如圖所示基于web的校園新聞發(fā)布系統(tǒng)6基于web的校園新聞發(fā)布系統(tǒng)6.首頁的最頂部排列顯示大類新聞，用戶可以直接點(diǎn)擊查看各項(xiàng)大類新聞里面 的各項(xiàng)小類新聞，直到閱讀每條詳細(xì)信息。.今日導(dǎo)讀，焦點(diǎn)新聞，推薦新聞，熱點(diǎn)新聞等各個(gè)欄目，后臺可以控制是否 顯示，或顯示條數(shù)設(shè)置。.專題顯示可以任意排序，而且可以直接點(diǎn)擊查看相關(guān)專題新聞。.可以按不同條件進(jìn)行新聞搜索。.公告欄顯示最新發(fā)布的各項(xiàng)新聞信息，進(jìn)入二級目錄還可以閱讀更多信息。.具有新聞評論功能，從首頁、大小類、專題、到每條新聞，都可以有自己的 評論。3. 3. 2管理員的管理管

14、理員可以通過后臺登陸界面登陸到系統(tǒng)的后臺并進(jìn)行管理，后臺登陸頁面 為adminlogin, asp打開頁面以后輸入用戶名和密碼通過驗(yàn)證后即可進(jìn)入系統(tǒng)， 管理員進(jìn)入系統(tǒng)后可以對已經(jīng)發(fā)表的新聞進(jìn)行修改，刪除，和發(fā)表新的新聞等權(quán) 利，除此之外管理員還可以修改管理員密碼和添加新管理員。管理界面如下圖：畢業(yè)設(shè)計(jì)（論文） 畢業(yè)設(shè)計(jì)（論文） #3. 3.3 一級新聞管理3. 3. 3.1從管理首頁的大類管理進(jìn)入，可以進(jìn)入大類的一級目錄管理界面。3. 3. 3. 2管理員可以任意的添加、修改、刪除一級新聞，可以對一級新聞進(jìn)行 初始化上拉下拉等操作以及對新聞屬性的各種設(shè)置。3. 3. 3. 3通過對一級新聞屬性

15、的設(shè)置可以使新聞在首頁顯示或不顯示，是否以列表的形式顯示在首頁等。3. 3. 3. 4一級新聞管理界面以下是一級新聞添加的部分源代碼sql=select * from BigClass” rs. open sql, conn, 3, 3do while not rs. eofif rs (/zBigClassnamez，) =typenameSet rs = Server. CreateObject (Z/ADODB. Recordset)sql=select * from BigClass”rs. open sql, conn, 3, 3rs. addnew rs(BigClassname)

16、=typenamers (，zBigClassType/z) =BigClassTypeif BigClassType=O thenrs (z/BigClassView，z) =0 else 基于web的校園新聞發(fā)布系統(tǒng)6基于web的校園新聞發(fā)布系統(tǒng)6rs (BigClassView)二lend ifrs(BigClassID)=howmany+lrs (BigClassmaster)二無rs. updaters. closeset rs=nothingconn, closeset conn=nothingresponse, redirect /zadmin_BigClassMana. asp

17、%3. 3.4二級新聞管理3. 3. 4.1二級新聞管理也類似于一級新聞管理，從管理首頁的二級新聞管理進(jìn) 入，可以進(jìn)入二級新聞的一級目錄管理界面。3. 3. 4. 2管理員可以任意的添加、修改、刪除小類新聞，可以對二級新聞進(jìn)行 初始化上拉下拉等操作以及對新聞屬性的各種設(shè)置。3. 3. 4. 3通過對二級新聞屬性的設(shè)置可以使新聞是否以列表的形式顯示在新 聞列表中。3. 3. 4. 4在添加二級新聞目錄時(shí).，必須選種一項(xiàng)一級新聞目錄下才能添加二級新 聞目錄。3. 3. 4. 5二級新聞管理界面畢業(yè)設(shè)計(jì)（論文） 畢業(yè)設(shè)計(jì)（論文） #3. 3.5用戶管理以下是實(shí)現(xiàn)管理員添加的源代碼：form meth

18、od=post action=admin_AdniinSave. asp”這個(gè)form對象是指當(dāng)提交添加資料時(shí)就會調(diào)用admin_AdminSave. asp這個(gè)文 件把信息添加到數(shù)據(jù)庫。title校園新聞發(fā)布管理系統(tǒng)/titlelink rel=stylesheet“ href=./css. css type二text/csstable width=100% border二0 cellspacing二0 cellpadding二0table width=90% border=0 align二center cellpadding二0”基于web的校園新聞發(fā)布系統(tǒng) 基于web的校園新聞發(fā)布系統(tǒng)

19、cellspacing=1 bgcolor=#000000td width=15% height=24 IDtd width=15%用戶td width=20%密碼(font color=”#666666“加密) 權(quán)限td width=15%修改td width=15%”刪除td height=22X%=rs(“id)X/tdtda href=，/admin_AdminModify. asp?id=， 修改tda href=，zadmin_AdminDel. asp?id=， 刪除table width=300border二0align=centercellpadding二4”cellspac

20、ing二1 bgcolor=”#000000td colspan=2添加管理員：tr bgcolor=，F(xiàn)FFFFF，td align=right height=22”管理帳號： td align=right）管理權(quán)限:select name二aleave class=input”option value二super selected超級管理員option value二check普通管理員/option管理密碼：基于web的校園新聞發(fā)布系統(tǒng)6基于web的校園新聞發(fā)布系統(tǒng)6tr bgcolor#CCCCCCtd colspan二2 align=center”input type=submit“

21、name=Submit value二確 定input type二hidden“ name二act value二add3. 3. 6新聞錄入管理點(diǎn)擊管理首頁的新聞添加進(jìn)入新聞所屬大類欄目，和小類欄目的選擇，確定 進(jìn)入新聞內(nèi)容添加界面如下圖：1.新聞添加界面設(shè)有一系列添加新聞時(shí)需要選擇和填寫的屬性:畢業(yè)設(shè)計(jì)(論文) 畢業(yè)設(shè)計(jì)(論文) #在界面的開頭顯示新聞添加的位置，主要是新聞所屬的大類和小類名稱。.添加的新聞可以選擇屬于哪個(gè)專題，也可不屬于任何專題。.可以注明所添加新聞的來源和作者。.還設(shè)有新聞編輯框，可進(jìn)行可視化新聞添加，可以粘貼網(wǎng)頁任意圖片、表格、 文字，就象WORD一樣方便，可以選擇HTM

22、L語法書寫。.可以設(shè)定相關(guān)新聞，以及添加新聞的性質(zhì)，如可以選擇此新聞在焦點(diǎn)新聞、 推薦新聞、熱點(diǎn)新聞等首頁欄目顯示，并且可以使此條新聞固定的顯示于最新新 聞列表中。.添加新聞的同時(shí)可根據(jù)你的需要上傳你的一個(gè)或多個(gè)圖片，可以上傳新聞附 件。3.3.7整體新聞管理此版快可以對所有發(fā)表過的文章進(jìn)行編輯和刪除其中編輯的代碼為：，/scripts”)mimageNum = Request. form(imageNunT)基于web的校園新聞發(fā)布系統(tǒng)6基于web的校園新聞發(fā)布系統(tǒng)6first ImageName = trim (Request. form(，zeditFirstImageName) use

23、r=request(user)ok=request(ok)set rs=server. createobject(adodb recordset)sql二select * from NEWS where id=&newsidrs. open sql, conn, 1, 3rs(title)二titlers(content)=mcontentrs(user)=userrs(BigClassName)=BigClassNamers (z/SmallClassNamezz)=SmallClassNameif ok then rs(ok) = okif mimageNum/z/z then rs (i

24、mageNunT) = mimageNumif firstImageNameO，z/ then rs (firstlmageName) = firstImageName rs. updaters. closeset rs=nothingresponse, write & chr (13) response, write alert (新聞修改成功！ )； & Chr (13) response, write“window. document, location, href=admin_info. asp ;&Chr(13) response, write /script & Chr(13)Re

25、sponse. Endend if%script language = JavaScript”)var onecount;subcat = new Array();subcat = new Array (z，,駕二 trim(rs (，BigClassName，/) )%，z,，z%= trim(rs (SmallClassName) )%”)；onecount=;function changelocation(locationid)(document. addNEWS. SmallClassName. length = 1;var locationid=locationid;var i;fo

26、r (i=0;i onecount; i+)(if (subcati1 = locationid)基于web的校園新聞發(fā)布系統(tǒng) 基于web的校園新聞發(fā)布系統(tǒng) document. addNEWS. SmallClassName. optionsdocument. addNEWS. SmallClassNa me. length = new Option(subcati0, subcati2);)function CheckFormO( TOC o 1-5 h z document. addNEWS. cnWords. value=document, frames. cnEditBox. getH

27、TML(true);document. addNEWS. imageNum. value=document.frames. cnEditBox. document, all(editlmageNum). value;document. addNEWS. editFirstlmageName. value二document, frames. cnEditBox. document, all(editFirstlmageName) value;if (document. addNEWS. title, value, length = 0) alert (新聞標(biāo)題沒有填寫.)；document. a

28、ddNEWS. title, focus ();return false;if (document. addNEWS. user, value, length = 0) alert (新聞發(fā)布人沒有填寫)；document. addNEWS. user, focus ();return false;return true;)畢業(yè)設(shè)計(jì)（論文） 畢業(yè)設(shè)計(jì)（論文） link href=./css. css rel二stylesheet“ type二text/css(title添加新聞/titlestrong修改新 聞/strongtd width=“20% height=24 align=right

29、 bgcolor=#FFFFEEXfont color二#FF0000*新聞標(biāo)題：td width=80% valign=top bgcolor=#FFFFEE畢業(yè)設(shè)計(jì)（論文）1畢業(yè)設(shè)計(jì)（論文）1基于web的校園新聞發(fā)布系統(tǒng)6input name二title“type=textclass=input”value=， size=30tdheight =24align =rightbgcolor=#FFFFEEXfontcolor-#FF0000”*/font新聞類別：td valign二top bgcolor=#FFFFEE”%if session(aleave)=check thenrespo

30、nse, write rso (/zBigClassName，z) &，zoption value=，z % end if if session(aleave)=check” thenresponse, write rso(zzSmallClassNamez，) &，zoption value= %if rso(SmallClassName)二then response, write selected%不指定小類option 畢業(yè)設(shè)計(jì)（論文）1畢業(yè)設(shè)計(jì)（論文）1基于web的校園新聞發(fā)布系統(tǒng)6value=，/*新聞內(nèi)容：“WIDTH= 100%HEIGHT=330X/IFRANEX/td蚊0成發(fā)

31、布人：td valign二top bgcolor=#FFFFEE”input name=user type二text class二input“ size=30value=/是否設(shè)為首頁圖片新聞：input type二radio value=True” %if rso(ok)二True thenResponse. Write checked%) name二ok是input type=z/radioz， value=False name=ok否 選擇此項(xiàng)時(shí)請注意文章中是否添加有圖 片！ td height=35 colspan二2 bgcolor=#FFFFEE”input type二hidden

32、 name=newsld value=!一獲取EditBox的內(nèi)容一 input name=imageNum type=hidden ID二imageNunT value=，z/z。一獲取EditBox的內(nèi)容一刪除使用的代碼為：基于web的校園新聞發(fā)布系統(tǒng) #基于web的校園新聞發(fā)布系統(tǒng) & chr (13)response, write alert (成功刪除！ )； & Chr (13)response, write“window, document, location, href=admin_info. asp ; z/&Chr (13)response, write & Chr (13

33、)Response. End%3. 3. 8發(fā)表評論用戶可以對新聞發(fā)表自己的評論:實(shí)現(xiàn)此模塊的代碼為:%dim id,actionid=request. QueryString(id)act ion=request. QueryString(action)if action=save” thenset rs=server. CreateObject(adodb recordset) rs. open select * from shop_pinglunz/, conn, 1, 3 rs. addnewrs(id)二id畢業(yè)設(shè)計(jì)（論文）1畢業(yè)設(shè)計(jì)（論文）1rs (，zpinglunnamez/)

34、 =HTMLEncode2 (trim (request (pinglunname)rs (，zpingluncontentzz) =HTMLEncode2 (trim (request (，pingluncontent，/)rs (pinglundate)=now()rs. updaters. closeset rs=nothingresponse, write z，response, write 您的評論已成功提交！ ！ 關(guān)閉窗n/aX/div formname=pinglunformmethod=post”action=，/pinglun. asp?action=save&id=，ztd

35、 bgcolor=#F5F5F5tr bgcolor=#F5F5F5”您的姓名：str = str +;)return (str = checkstr);)function check()(if (checkspace(document, pinglunform. pinglunname. value) document, pinglunform. pinglunname. focus();alert(請?zhí)顚懩男彰?;return false;)if(checkspace(document, pinglunform. pingluncontent. value) document, pin

36、glunform. pingluncontent. focus();alert (請?zhí)顚懺u論正文！“);return false;)/基于web的校園新聞發(fā)布系統(tǒng)6畢業(yè)設(shè)計(jì)（論文）14系統(tǒng)設(shè)計(jì)中遇到的問題與解決方法在開發(fā)新聞發(fā)布系統(tǒng)中，我參考了ASP應(yīng)用開發(fā)和ASP編程基礎(chǔ)及應(yīng) 用實(shí)例兩本書，這兩本書給了我很大的啟發(fā)。首先，ASP應(yīng)用開發(fā)一書簡要介紹了 ASP的基礎(chǔ)知識，她的每一章由章、 任務(wù)、功組成，每一章由一到兩個(gè)具體的任務(wù)開始，然后是實(shí)現(xiàn)這一任務(wù)的各種 不同的方案。每一攻由攻簡介、源代碼、程序執(zhí)行以及技術(shù)背景組成，每章包含 的知識點(diǎn)舊穿插在每個(gè)攻的技術(shù)背景中。這種“給出任務(wù)一一分析問題一

37、一方案 實(shí)現(xiàn)一一技術(shù)背景”的編排模式，非常符合一般人的認(rèn)識規(guī)律；在心理上，這種 由具體到抽象、由個(gè)別到一般、由提出問題、解決問題到總結(jié)經(jīng)驗(yàn)、掌握規(guī)律的 學(xué)習(xí)方法也是比較容易接受的。這本書介紹了 ASP的組成結(jié)構(gòu)、基本原理和基本特征；同時(shí)對ASP最重要的 六個(gè)內(nèi)置對象(Application Objectcontext、Request、Response、Response、 Sever和Session)進(jìn)行了詳細(xì)的介紹，還有在Active Sever Pages文件中使 用ActiveX組件。這里不僅給出了使用ActiveX組件的一般辦法，而且詳細(xì)地討 論了 ASP Web服務(wù)器本身所附帶的幾個(gè)A

38、ctiveX組件對象的功能、作用和使用情 況。使用ADO進(jìn)行數(shù)據(jù)庫的連接和操作。詳細(xì)討論了微軟自推出IlSWeb服務(wù)器 以來所提供的兩種數(shù)據(jù)庫連接技術(shù)一一早期的IDC技術(shù)以及現(xiàn)在的ADO技術(shù)。對 在使用ASP開發(fā)數(shù)據(jù)庫有關(guān)應(yīng)用程序過程中，經(jīng)常使用的數(shù)據(jù)庫語言SQL進(jìn)行了 詳盡的討論。并針對SQL Sever和Acess這量種常使用的數(shù)據(jù)庫，具體介紹了如 何利用不同的數(shù)據(jù)庫的特有函數(shù)和處理功能，以及標(biāo)準(zhǔn)的SQL來開發(fā)ASP數(shù)據(jù)庫 應(yīng)用程序，以及兩種最常使用的ASP腳本語言 Vbscript和Javascript的有 關(guān)內(nèi)容，包括它們的語法基礎(chǔ)、應(yīng)用環(huán)境以及具體用法?？梢酝ㄟ^內(nèi)容提要、本 書導(dǎo)讀以

39、及目錄了解全書的內(nèi)容結(jié)構(gòu)和編排體系。在開始學(xué)習(xí)腳本語言之前，你應(yīng)該理解一些簡單的概念一變量、進(jìn)程。所 謂變量是計(jì)算機(jī)內(nèi)存中已命名的存儲位置，其中包含了數(shù)字或字符串等數(shù)據(jù)，它 使用戶便于理解腳本操作的名稱，為用戶提供了一種存儲、檢索和操作數(shù)據(jù)的途 徑。程序是由一個(gè)或多個(gè)進(jìn)程組成的，在VBScript中，進(jìn)程就是“指令塊”， 通常意義上的進(jìn)程，如Sub,只是為了簡單的數(shù)據(jù)處理。在VBScript中，嚴(yán)格的來講變量是不用聲明的，如：然而，即使在使用變量前不需要去聲明變量，也應(yīng)養(yǎng)成在編程時(shí)聲明變量的 良好習(xí)慣，因?yàn)檫@樣有助于防止錯誤發(fā)生。聲明一個(gè)變量意味著告訴腳本引擎， 有一個(gè)特定名稱的變量，這樣就可

40、以在腳本中引用該變量。在VBScript中聲明 一個(gè)變量可以使用“Dim”語句，如下：script language=VBScript” !Option Explicit要求在腳本中聲明所有的變量Dim MystringMystring=This is my string” /script變量的作用域即生命期，決定哪些腳本命令可訪問變量。在過程內(nèi)部聲明的 變量具有局部作用域。每執(zhí)行一次過程，變量就被創(chuàng)建然后消亡。而過程外部的 任何命令都不能訪問它。在過程外部聲明的變量具有全局作用域，其值能被ASP 頁上的任何腳本命令訪問和修改。聲明變量時(shí)，局部變量和全局變量可以有相同 的名稱。而改變其中一個(gè)的

41、值并不會改變另一個(gè)的值。如果沒有聲明變量，則可 能不小心會改變一個(gè)全局變量的值。例如，以下腳本命令返回值1,雖然有兩個(gè) 名為Y變量：%Dim YY = ICall SetLocalVariableResponse. Write YSub SetLocalVariableDim Y= 2End Sub % 由于變量沒有顯式聲明，以下的腳本命令將返回2。當(dāng)過程調(diào)用將Y設(shè)置 為2時(shí)，腳本引擎認(rèn)為該過程是要修改全局變量：然而，全局變量僅在單個(gè)ASP頁中可用，要使它在單個(gè)ASP頁之外可用， 就必須為變量賦予會話或應(yīng)用程序作用域。會話作用域變量對一個(gè)用戶所請求的 ASP應(yīng)用程序中的所有頁都是可用的。應(yīng)用程

42、序作用域變量也如此。對單個(gè)用戶 來說，會話變量是存儲信息的最佳途徑，例如，用戶首選項(xiàng)、用戶名或用戶的標(biāo) 識。對于一個(gè)特殊應(yīng)用程序的所有用戶，應(yīng)用程序作用域是存儲信息的最佳途徑, 例如，應(yīng)用程序特定的問候語或應(yīng)用程序所需的初始值。ASP提供兩個(gè)內(nèi)建對象 來讓您存儲變量：Session對象和Application對象,這將在今后的ASP內(nèi)建 對象中著重討論。讓我們再來看看常量的定義，常量是用來代替一個(gè)數(shù)或字符串的名稱，它在 整個(gè)腳本中保持不變。您可以使用Const語句在VBScript中創(chuàng)建用戶自定義 常數(shù)。使用Const語句可以創(chuàng)建名稱具有一定含義的字符串型或數(shù)值型常數(shù)， 并給它們賦原義值。例如

43、：如：請注意字符串文字包含在兩個(gè)引號（ ）之間。這是區(qū)分字符串型常數(shù)和 數(shù)值型常數(shù)的最明顯的方法。日期文字和時(shí)間文字包含在兩個(gè)井號（護(hù)之間。 例如：% Const CutoffDate = #6-1-97# % 在理解了常量和變量之后，我們來看看什么是過程。它是一組能執(zhí)行指定任 務(wù)且具有返回值的腳本命令。您可以定義自己的過程，然后在腳本中反復(fù)調(diào)用它 們。您可以將過程定義放在調(diào)用過程的.asp文件中，也可以將通用過程放在一 個(gè)共享的.asp文件中，然后用SSI include指令將其包含進(jìn)其他調(diào)用其過程 的.asp文件中。您還可選擇另一種方法，即把這些功能打包在ActiveX組件 中。過程定義可

44、出現(xiàn)在 SCRIPT和標(biāo)記內(nèi)部且必須遵循聲明 腳本語言的規(guī)則。如果過程所用的語言與主腳本語言不同，則要使用（SCRIPT） 元素。主腳本語言中的過程用腳本分界符和%分隔。用HTML 標(biāo)記時(shí)，必須使用兩個(gè)屬性來保證服務(wù)器端能夠處理腳本。使用標(biāo)記的語法如下：SCRIPT RUNAT二SERVER LANGUAGE二JSCRIPT procedure definition/SCRIPT 這里的RUNAT二SERVER屬性通知Web服務(wù)器在服務(wù)器上處理腳本。若不設(shè) 置該屬性，腳本將由客戶端瀏覽器處理。LANGUAGE屬性決定此腳本塊所用的腳 本語言。您可以指定任何一種具有腳本引擎的語言。請使用VBSC

45、RIPT指定 VBScript：用JSCRIPT指定JScripto若不設(shè)置LANGUAGE屬性，將用主腳本 語言解釋此腳本塊。在VBScript中，過程被分為兩類：Sub過程和Function過程。Sub過程 是包含在Sub和End Sub語句之間的一組VBScript語句，執(zhí)行操作但不返回 值。Sub過程可以使用參數(shù)（由調(diào)用過程傳遞的常數(shù)、變量或表達(dá)式）。如果Sub 過程無任何參數(shù)，則Sub語句必須包含空括號（）。Function過程是包含在Function和End Function語句之間的一組 VBScript語句。Function過程與Sub過程類似，但是Function過程可以返

46、回值。Function過程可以使用參數(shù)（由調(diào)用過程傳遞的常數(shù)、變量或表達(dá)式）。 如果Function過程無任何參數(shù)，則Function語句必須包含空括號（）。 Function過程通過函數(shù)名返回一個(gè)值，這個(gè)值是在過程的語句中賦給函數(shù)名的。 Function返回值的數(shù)據(jù)類型總是Variant。在下面的示例中Sub過程使用兩個(gè) 固有的（或內(nèi)置的）VBScript函數(shù)，即MsgBox和InputBox,來提示用戶輸入 信息。然后顯示根據(jù)這些信息計(jì)算的結(jié)果。計(jì)算由使用VBScript創(chuàng)建的 Function過程完成，Celsius函數(shù)將華氏度換算為攝氏度。Sub過程 ConvertTemp調(diào)用此函數(shù)時(shí)

47、，包含參數(shù)值的變量被傳遞給函數(shù)。換算結(jié)果返回到 調(diào)用過程并顯示在消息框中。ASP編程基礎(chǔ)一書的特點(diǎn)是理論與實(shí)踐相結(jié)合，在介紹相關(guān)的編程理論 和知識的前提下，利用豐富、實(shí)用的例子來演示ASP的魅力。WEB服務(wù)器上運(yùn)用WEB應(yīng)用程序進(jìn)行的最常見和最實(shí)用的任務(wù)就是訪問服 務(wù)器端的數(shù)據(jù)庫。而ASP內(nèi)建的Database Access組件使得我們能夠輕而易舉 地通過ActiveX Data Objects （ADO）訪問存儲在服務(wù)器端的數(shù)據(jù)庫或其他表格化數(shù)據(jù)結(jié)構(gòu)中的信息。ADO是對當(dāng)前微軟所支持的數(shù)據(jù)庫進(jìn)行操作的最有效和 最簡單直接的方法，它是一種功能強(qiáng)大的數(shù)據(jù)訪問編程模式，從而使得大部分?jǐn)?shù) 據(jù)源可編程的屬性得以直接擴(kuò)展到你的Active Server頁面上?？梢允褂?/p>