【文章內(nèi)容簡介】 及到得實體有：管理員、新聞、欄目等實體,各實體的ER圖如下。管理員實體ER如下： 圖33 管理員ER圖新聞實體ER圖如下：圖34 新聞實體ER圖欄目實體ER圖如下：圖35欄目實體ER圖學(xué)校新聞發(fā)布管理系統(tǒng)ER圖如下： 邏輯結(jié)構(gòu)設(shè)計根據(jù)ER圖，可將其抽象為相應(yīng)數(shù)據(jù)庫的關(guān)系模式，則有： 管理員（用戶名、密碼 ） 新聞（新聞編號、新聞標(biāo)題、新聞內(nèi)容、所屬欄目、發(fā)布時間） 欄目（欄目編號、欄目名稱） 物理結(jié)構(gòu)設(shè)計 本系統(tǒng)定義的數(shù)據(jù)庫中包含以下4個表：新聞類別表：Category、新聞基本信息表：News、網(wǎng)友評論信息表：Discuss和用戶信息表：users。1．新聞類別表Category 新聞類別表編號字段名稱數(shù)據(jù)結(jié)構(gòu)說明1CateIdint新聞類別編號2CateNamevarchar (50)新聞類別名稱2．基本新聞表News用來保存網(wǎng)上新聞的基本信息 基本新聞表編號字段名稱數(shù)據(jù)結(jié)構(gòu) 說明1 Idint新聞編號2Titlevarchar(100)新聞標(biāo)題3Contenttext新聞內(nèi)容4PostTimedatetime提交時間5Postervarchar(50)提交人6CateIdint新聞類別編號7Attpicbit是否有圖片標(biāo)記(0沒有；1有)8Readcountint閱讀次數(shù) 3．網(wǎng)友評論信息表Discuss用來保存網(wǎng)友對新聞的評論信息編號字段名稱數(shù)據(jù)結(jié)構(gòu)說明1idint評論編號2UserIdvarchar(20)評論人名稱3Posttimesinaildatetime提交時間4Contentvarchar(4000)評論內(nèi)容5Newsldint新聞編號4．用戶信息表Users用來保存用戶的基本信息 用戶信息表編號字段名稱數(shù)據(jù)結(jié)構(gòu)說明1UserIdint用戶ID號2UserNamevarchar(50)用戶名3UserPwdvarcahr(50)密碼4Enamevarchar(50)用戶姓名5Emailvarchar(50)電子郵箱 View用來統(tǒng)計系統(tǒng)網(wǎng)頁相關(guān)新聞的的瀏覽量 瀏覽量統(tǒng)計表編號字段名稱數(shù)據(jù)結(jié)構(gòu)說明1CateIdint新聞類型ID號2idint新聞ID號3Datadata(50)發(fā)布時間4Timevarchar(20)瀏覽次數(shù)6. 作者信息表author用來保存作者信息 編號字段名稱數(shù)據(jù)結(jié)構(gòu)說明1CateIdint新聞類型ID號2idint新聞ID號3AuIdint作者編號4AuNamevarchar(50)作者名稱5Datadata（20）投稿時間 第4章 系統(tǒng)詳細(xì)設(shè)計 程序流程圖 為了使讀者進一步了解本實例系統(tǒng)的設(shè)計，本小節(jié)將對系統(tǒng)進行流程分析。多用戶系統(tǒng)的工作流程都是從用戶登錄模塊開始，對用戶的身份進行認(rèn)證.。 本系統(tǒng)分為前臺系統(tǒng)和后臺系統(tǒng)兩個部分。前臺系統(tǒng)不需要進行身份認(rèn)證，任何人都可以通過瀏覽器閱讀已經(jīng)發(fā)布的新聞、發(fā)表網(wǎng)友評論。后臺系統(tǒng)的各功能流程分析如圖所示。圖41 添加新聞類別程序流程圖圖42添加新聞流程圖圖43查詢新聞程序流程圖 界面設(shè)計1. 通用模塊的設(shè)計 本實例中包含一些通用模塊，這些模塊以文件的形式保存，可以在其他文件中使用include語句包含這些模塊，使用其中定義的功能。在添加和修改新聞內(nèi)容時，需要對字體、字號、顏色和排列位置等屬性進行設(shè)置。圖41 ，設(shè)置指定的選項，將會在新聞內(nèi)容中生成相應(yīng)的HTML代碼。2 主界面設(shè)計 ，它的功能是顯示新聞類別和每個類別中的10條新聞，并提供進入管理界面()的鏈接。 錄入新聞類別和新聞內(nèi)容后。圖42 3 登陸界面設(shè)計 在對系統(tǒng)進行管理之前，需要通過系統(tǒng)的身份認(rèn)證。，其界面如圖43所示：圖43 登錄界面4 新聞管理界面設(shè)計 管理界面的功能是對新聞類別和新聞提供管理界面，只有有權(quán)限的用戶才能進入管理界面。圖44 新聞管理界面打開新聞類別管理界面，如圖45所示。圖45 新聞類別管理界面5 新聞發(fā)布界面設(shè)計 系統(tǒng)用戶都可以發(fā)布新聞，新聞發(fā)布管理模塊包含以下功能： 添加新聞的運行界面如圖46所示。圖46 ，運行界面如圖所示 圖47 新聞查詢界面第五章 系統(tǒng)實現(xiàn) 本實例中包含一些通用模塊，這些模塊以文件的形式保存，可以在其他文件中使用include語句包含這些模塊，使用其中定義的功能。 ，因為在很多網(wǎng)頁中都有連接數(shù)據(jù)庫的操作，這樣可以避免重復(fù)編程。：%dim Conndim ConnStrset Conn=()ConnStr=driver={SQL Server}。server=(local)。UID=sa。PWD=yourpassword。Database=news ConnStr%在文件中引用此文件作為頭文件就可以訪問數(shù)據(jù)庫，代碼如下：!include File= 因為本實例中有些功能只有Admin用戶才有權(quán)限使用，所以在進入這些網(wǎng)頁之前，需要判斷用戶是否是Admin。，如果不是，則中斷執(zhí)行；如果是，則不執(zhí)行任何操作，直接進入包含它的網(wǎng)頁。：% If Session(UserName) Admin Then (不是Admin用戶，沒有此權(quán)限) End If%在文件中引用此文件作為頭文件，代碼如下:!include File= 在修改和刪除新聞時，除了Admin用戶擁有所有權(quán)限外，其他用戶只能修改自己創(chuàng)建的新聞。所以在修改和刪除新聞時，需要判斷當(dāng)前用戶是否是Admin或指定新聞的作者。，代碼如下：% If Session(UserName) Admin Then NewsId = Request(Id) 39。根據(jù)新聞編號讀取新聞信息 set rsNews = () sql = SELECT * FROM News WHERE Id= amp。 Trim(NewsId) set rsNews=(sql) Set Rs=(sql) If Then 指定新聞不存在 Else 39。判斷用戶權(quán)限，是否可以維護新聞，管理員可以編輯所有新聞，編輯者只能修改自己的新聞 If rsNews(Poster) Session(UserName) Then 不是Admin或新聞的作者，無權(quán)修改！ End If End If End If% ，它的功能是顯示新聞類別和每個類別中的10條新聞，并提供進入管理界面()的鏈接。顯示新聞類別鏈接 ，每個新聞類別只顯示最新的10條新聞。如果新聞類別較多，則網(wǎng)頁會被拉長，給用戶閱讀帶來不便。為了解決這個問題，本實例使用書簽來定義新聞類別的位置，書簽格式為a類別編號。例如，類別編號為1的新聞類別的書簽名稱為al。下面的代碼將在網(wǎng)頁中生成所有新聞類別的鏈接，每個鏈接都指相應(yīng)新聞類別的書簽。這樣，用戶就可以通過單擊鏈接直達新聞類別了。% 39。=====顯示所有新聞類別供點擊，點擊不同類別顯示該類別的新聞===== 39。按順序讀取所有新聞類別，保存在記錄集rsCate中 sql = SELECT * FROM Category ORDER BY CateId Set rsCate = (sql) 39。顯示所有新聞類別鏈接 Do While Not stitle = rsCate(CateName) cid = rsCate(CateId) 39。每個新聞類別標(biāo)題被定義為一個書簽，名為 a類別編號% a href=a%=cid%font style=39。TEXTDECORATION: none。color:black39。%=stitle%/font/a | % Loop% 如果網(wǎng)頁中顯示的內(nèi)容較多，通常需要通過定義書簽的方法使用戶快速到達指定的位置。書簽是網(wǎng)頁中被標(biāo)記的位置或被標(biāo)記的選中文本。在FrontPage中選擇“插入”/“書簽”菜單項，可以在指定位置插入書簽。在本例中，因為書簽位置是動態(tài)變化的，所以需要使用代碼定義，方法如下：a name=書簽名/a“新聞管理”鏈接 系統(tǒng)管理員Admin或其他用戶可以通過“新聞管理”a href=font color=red style=39。TEXTDECORATION: none39。新聞管理/font/a 顯示各新聞類別中的最新新聞 ，并將3天內(nèi)的新聞使用new圖片標(biāo)記。當(dāng)然，如果新聞的內(nèi)容經(jīng)常更新，則可以將3天改為1天。這部分代碼如下:% 39。=====顯示所有新聞類別供點擊，點擊不同類別顯示該類別的新聞===== 39。按順序讀取所有新聞類別，保存在記錄集rsCate中 sql = SELECT * FROM Category ORDER BY CateId Set rsCate = (sql) 39。顯示所有新聞類別鏈接 Do While Not stitle = rsCate(CateName) cid = rsCate(CateId) 39。每個新聞類別標(biāo)題被定義為一個書簽，名為 a類別編號% a href=a%=cid%font style=39。TEXTDECORATION: none。color:black39。%=stitle%/font/a | % Loop%a href=39。39。font color=red新聞查詢/font/a |amp。nbsp。a href=font color=red style=39。TEXTDECORATION: none39。新聞管理/font/a /divtable align=center width=100%