版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)
文檔簡介
1、0 / 46 文檔可自由編輯打印貴貴州航天州航天職業(yè)職業(yè)技技術(shù)術(shù)學(xué)院學(xué)院 計算機科學(xué)系A(chǔ)SPASP 程序設(shè)計課程設(shè)計報告程序設(shè)計課程設(shè)計報告課題名稱:課題名稱: 新聞發(fā)布系統(tǒng) 姓姓 名:名: 伍 俊 學(xué)學(xué) 號:號: A083G*0211 專業(yè)班級:專業(yè)班級: 08 軟件(2)班 系系 (院):院): 計算機科學(xué)系 指導(dǎo)老師:指導(dǎo)老師: xxxxxxxxxx 設(shè)計時間:設(shè)計時間: 2009-2010 學(xué)年第 1 學(xué)期 設(shè)計地點:設(shè)計地點: 六樓機房 1 / 46 文檔可自由編輯打印摘摘 要要 伴隨著網(wǎng)絡(luò)的出現(xiàn),網(wǎng)頁逐漸融入人們的生活??焖偌皶r的新聞瀏覽,五彩繽紛的網(wǎng)上信息,使網(wǎng)絡(luò)與人們的生活息息
2、相關(guān)。它打破了地域限制,真正使信息得以共享,改變了人們的工作和生活方式。網(wǎng)站新聞發(fā)布系統(tǒng),是將網(wǎng)站上需要經(jīng)常變動的信息,類似公司動態(tài)、企業(yè)新聞、新產(chǎn)品發(fā)布、促銷活動和行業(yè)動態(tài)等更新信息集中管理,并通過信息的某些共性進行分類,最后系統(tǒng)化、標(biāo)準(zhǔn)化發(fā)布到網(wǎng)站上的一種網(wǎng)站應(yīng)用程序。本系統(tǒng)采用 ASP 作為開發(fā)環(huán)境,ACCESS 2000 作為數(shù)據(jù)庫服務(wù)器,IIS 作為測試服務(wù)器,實現(xiàn)了對新聞類別無限級分類設(shè)置、動態(tài)新聞的發(fā)布修改刪除,前臺頁面的模板自定義和生成,以及后臺管理員權(quán)限和數(shù)據(jù)庫的備份收縮等一系列的功能,完成了一個動態(tài)新聞發(fā)布系統(tǒng)的所有功能。系統(tǒng)捕獲了絕大多數(shù)的異常情況,具有較好的容錯性。 【
3、關(guān)鍵詞】 ASP、ACCESS、IIS、新聞發(fā)布、信息管理、模板2 / 46 文檔可自由編輯打印目目 錄錄摘 要.1目 錄.20 引 言 .31 新 聞 發(fā) 布 系 統(tǒng) 簡 介.41.1 新聞發(fā)布系統(tǒng).41.2 新聞發(fā)布系統(tǒng)的特點.41.3 新聞發(fā)布系統(tǒng)的分類.42 系 統(tǒng) 分 析.62.1 需求分析.62.2 可行性分析.63 總 體 設(shè) 計.63.1 項目規(guī)劃.63.2 系統(tǒng)模塊以及功能結(jié)構(gòu)圖.74 系 統(tǒng) 設(shè) 計.84.1 邏輯結(jié)構(gòu)設(shè)計.85 網(wǎng) 站 總 體 架 構(gòu).85.1 模塊功能介紹.85.2 網(wǎng)站首頁的運行結(jié)果.86 系 統(tǒng) 部 分 重 要 功 能 及 其 代 碼.106.1 導(dǎo)
4、航區(qū).106.2 用戶登錄注冊修改.156.3 首頁主體內(nèi)容區(qū).246.4 友情鏈接區(qū).336.5 總體框架.336.6 新聞發(fā)表.42總 結(jié).48附錄A 參 考 文 獻 .49附錄B 數(shù) 據(jù) 表 .503 / 46 文檔可自由編輯打印0 0 引引 言言隨著中國加入 WTO 及全球經(jīng)濟一體化進程的加快,世界經(jīng)濟已由工業(yè)化經(jīng)濟逐步進入網(wǎng)絡(luò)信息化時代。在信息時代來臨之季,各企業(yè)都緊跟時代的腳步,轉(zhuǎn)變著企業(yè)的經(jīng)營模式、管理模式,從傳統(tǒng)的人工管理體制,向信息自動化管理體制過渡。與此同時,企業(yè)的傳統(tǒng)式的辦公管理模式也在逐步向自動化辦公管理模式轉(zhuǎn)變。網(wǎng)絡(luò)自動化辦公系統(tǒng)就是在這樣的大背景下應(yīng)運而生的。信息時
5、代的到來讓人們嘗到了“信息爆炸”的滋味,信息的大量擁入讓企業(yè)在信息處理方便應(yīng)接不暇,傳統(tǒng)的辦公模式、對信息的處理方法,早已不能滿足企業(yè)對信息快速、準(zhǔn)確的處理的要求。一個企業(yè)對信息數(shù)據(jù)的掌握程度、處理能力,體現(xiàn)了一個企業(yè)對市場的敏感程度,數(shù)據(jù)的真實性、準(zhǔn)確性直接決定著企業(yè)的發(fā)展方向。從傳統(tǒng)的辦公模式向自動化辦公管理模式轉(zhuǎn)變,提高企業(yè)的信息處理能力,以增強企業(yè)的市場競爭力,成了企業(yè)發(fā)展過程中的首要問題伴隨著網(wǎng)絡(luò)的出現(xiàn),網(wǎng)頁逐漸融入人們的生活??焖偌皶r的新聞瀏覽,五彩繽紛的網(wǎng)上信息,使網(wǎng)絡(luò)與人們的生活息息相關(guān),于是世界上又出現(xiàn)了第三媒體Internet。它打破了地域限制,真正使信息得以共享,改變了人
6、們的工作和生活方式。制作網(wǎng)頁是企業(yè)和個人的宣傳自己的重要手段,同時也是學(xué)習(xí)者獲取學(xué)習(xí)信息的重要手段。尤其是在教育領(lǐng)域,在素質(zhì)教育與終身教育成為必然的今天,人們對信息的需求有了更新,更高的要求,而網(wǎng)頁由于本身所具有的信息量大,傳遞快速,沒有時空限制等特點恰好滿足這種要求。所以網(wǎng)頁也逐漸成為一種新興的教育資源。也正是由于網(wǎng)絡(luò)實現(xiàn)網(wǎng)站的數(shù)據(jù)信息能夠進行實時交互,保證網(wǎng)站數(shù)據(jù)的實時性。隨著 Internet 的進一步發(fā)展,靜態(tài) Web 站點的開發(fā)與維護變得越來越困難,一方面信息的不斷增加和變化,使站點維護人員不得不經(jīng)常修改他們的網(wǎng)頁,特別是基于數(shù)據(jù)庫驅(qū)動的Web 站點更是如此,隨著 Internet
7、上信息量的增多和交互性的加強使 HTML 顯得越來越難以勝任。另一方面靜態(tài)網(wǎng)頁由于不能與瀏覽者進行有效交互,使人們感到越來越乏味,而不愿意再一次地進入同一站點。所以開發(fā)動態(tài)網(wǎng)頁或動態(tài)內(nèi)容成了越來越多的站點所追求目標(biāo)。所謂動態(tài)內(nèi)容是由每一個用戶按照自己的需求發(fā)出請求而特殊制作的 Web 網(wǎng)頁。網(wǎng)絡(luò)發(fā)展前景無限,及早與網(wǎng)絡(luò)結(jié)合,與信息時代同步,與高科技匯合,定會給社會各行各業(yè)的發(fā)展注入新鮮的活力。站在網(wǎng)絡(luò)時代的前夜,我們清晰地聽到了網(wǎng)絡(luò)時代的宣言:誰掌握了網(wǎng)絡(luò),誰就掌握了未來。4 / 46 文檔可自由編輯打印1 1 新新 聞聞 發(fā)發(fā) 布布 系系 統(tǒng)統(tǒng) 簡簡 介介1.1 新聞發(fā)布系統(tǒng)新聞發(fā)布系統(tǒng)(N
8、ews Release System or Content Management System)又叫做內(nèi)容管理系統(tǒng),是一個基于新聞和內(nèi)容管理的全站管理系統(tǒng),新聞發(fā)布系統(tǒng)是基于 B/S 模式的WEBMIS 系統(tǒng),本系統(tǒng)可以將雜亂無章的信息(包括文字、圖片和影音)經(jīng)過組織,合理有序地呈現(xiàn)在大家面前。當(dāng)今社會是一個信息化的社會,新聞作為信息的一部分有著信息量大,類別繁多,形式多樣的特點,新聞發(fā)布系統(tǒng)的概念就此提出。新聞發(fā)布系統(tǒng)的提出使電視不再是唯一的新聞媒體,從此以后網(wǎng)絡(luò)也充當(dāng)了一個重要的新聞媒介的功能。簡單地說,新聞發(fā)布系統(tǒng)就是充當(dāng)一個網(wǎng)絡(luò)新聞媒介的功能,主要實現(xiàn)對新聞的分類、上傳、審核、發(fā)布,模
9、擬了一般新聞媒介的新聞發(fā)布的過程,通過不同權(quán)限的賬號分別實現(xiàn)以上所說功能,當(dāng)然這些功能也可以是某一個賬號全部具有。1.2 新聞發(fā)布系統(tǒng)的特點與一般的信息系統(tǒng)相比較,新聞發(fā)布系統(tǒng)具有以下特征:1 是基于 B/S 模式下的 WEB 信息系統(tǒng),數(shù)據(jù)庫邏輯相對簡單,但數(shù)據(jù)量一般比較龐大;2 用戶數(shù)量大,服務(wù)器壓力大,是系統(tǒng)設(shè)計中必須考慮的問題之一,而一般的信息系統(tǒng)相對壓力要少了很多;3 是一個開放式的系統(tǒng),前臺瀏覽無須驗證。1.3 新聞發(fā)布系統(tǒng)的分類1. 前臺動態(tài)顯示的新聞發(fā)布系統(tǒng)其主要特點是前臺采用編程語言動態(tài)讀取數(shù)據(jù)庫的內(nèi)容,隨時更新,該類系統(tǒng)設(shè)計簡單,適合大多數(shù)中小企業(yè)建站需要,通用性不強,一般
10、需要量身定做,不適合大型新聞?wù)军c,當(dāng)用戶過多時,編程語言動態(tài)讀取數(shù)據(jù)庫就勢必消耗大量的服務(wù)器資源,造成系統(tǒng)運行緩慢,甚至崩潰,同時由于前臺新聞是動態(tài)從數(shù)據(jù)庫中讀取,導(dǎo)致前端用戶直接接觸到數(shù)據(jù)庫,很容易造成一些不安全的因素,例如:SQL Injection。2.前臺靜態(tài)顯示的新聞發(fā)布系統(tǒng)其主要特點為:前臺新聞全部生成 HTML 靜態(tài)文件,前臺無須讀取數(shù)據(jù)庫,瀏覽器5 / 46 文檔可自由編輯打印只需要直接下載 HTML 文件即可瀏覽新聞,瀏覽速度得到提高,同時也大大減輕了數(shù)據(jù)庫服務(wù)器的壓力,該系統(tǒng)后臺設(shè)計復(fù)雜需要處理復(fù)雜的模板標(biāo)簽和個模板之間的邏輯,一般采用三層模式實現(xiàn),該類系統(tǒng)靈活性大,可以通
11、過模板自定義實現(xiàn)界面復(fù)雜的前臺頁面,一般不需要為某一個企業(yè)而定做,該系統(tǒng)具有良好的通用性,適合各類新聞?wù)军c,同時,系統(tǒng)把前端用戶和數(shù)據(jù)庫分割開來,系統(tǒng)的安全性得到大大的提高。3.基于文本的新聞發(fā)布系統(tǒng)該系統(tǒng)在市場上占有很少的一部分,主要是把前面的數(shù)據(jù)庫換成了 TXT 格式的文本文件,該系統(tǒng)主要缺點是文本文件是無序的,管理起來非常麻煩,而且安全性不高,很容易造成數(shù)據(jù)冗余,因此,目前還沒有見到該類系統(tǒng)的商業(yè)版本,一般都作為個人用戶使用。4. 基于 XML 數(shù)據(jù)島的新聞發(fā)布系統(tǒng) 該系統(tǒng)是新聞發(fā)布系統(tǒng)的一個發(fā)展趨勢,它用 XML 數(shù)據(jù)島代替了數(shù)據(jù)庫,XML 是一個有序的數(shù)據(jù)文件,比數(shù)據(jù)庫的讀取速度更快
12、,但操作起來沒有數(shù)據(jù)庫這么方便,但是由于開發(fā)技術(shù)難度大,該類系統(tǒng)現(xiàn)在市場很少見到。2 2 系系 統(tǒng)統(tǒng) 分分 析析2.1 需求分析通過調(diào)查,要求系統(tǒng)需要有以下功能:1.將新聞、信息欄目和業(yè)界動態(tài)等信息集中起來發(fā)布、管理、查詢等2.網(wǎng)站的操作和控制可以由無 ASP 基礎(chǔ)的人員來操作!3.無論企業(yè)網(wǎng)站管理人員身處何地,只要能夠上網(wǎng)就能對網(wǎng)站信息進行更新及維護。4.所有的操作可以通過瀏覽器完成,不需要掌握其他應(yīng)用軟件,用戶不需培訓(xùn)。5.管理系統(tǒng)用戶,由于該系統(tǒng)的使用對象多,要求有較好的權(quán)限管理。一般用戶可以注冊和發(fā)布新聞。 6.系統(tǒng)管理員為網(wǎng)站信息管理系統(tǒng)中的最高權(quán)限(即具備從后臺輸入、修改、刪除新聞
13、的權(quán)限),其他人員只能具備新聞查看權(quán)限7.信息檢索模塊,可按關(guān)鍵字、標(biāo)題、作者、來源、發(fā)布時間。8.數(shù)據(jù)計算自動完成,盡量減少人工干預(yù)。9.系統(tǒng)退出。2.2 可行性分析1,經(jīng)濟性網(wǎng)站新聞管理系統(tǒng),又稱為信息管理系統(tǒng),廣泛應(yīng)用于大型專業(yè)網(wǎng)站、政府網(wǎng)站、企業(yè)網(wǎng)站等幾乎所有的網(wǎng)站上,是將新聞、信息欄目和業(yè)界動態(tài)等信息集中起來發(fā)布、管理、查詢等的一種網(wǎng)站應(yīng)用程序通過網(wǎng)站對新聞信息進行快速,有效的全面的管理,大大提高了新聞的的快速發(fā)布。6 / 46 文檔可自由編輯打印通過系統(tǒng)可對新聞的數(shù)據(jù)進行全面的管理和統(tǒng)計。2,技術(shù)性無論企業(yè)網(wǎng)站管理人員身處何地,只要能夠上網(wǎng)就能對網(wǎng)站信息進行更新及維護。所有的操作可
14、以通過瀏覽器完成,不需要掌握其他應(yīng)用軟件,用戶不需培訓(xùn)。網(wǎng)絡(luò)化的辦公管理,使企業(yè)管理更加規(guī)范,實現(xiàn)了通過網(wǎng)絡(luò)對信息進行發(fā)布、傳遞、接收等一系列功能。系統(tǒng)中設(shè)置的個人辦公管理模塊,為個人辦公提供了一個更為方便的管理平臺,大大提高個人辦公的工作效率,進而提高整個企業(yè)的辦公效率。3 3 總總 體體 設(shè)設(shè) 計計3.1 項目規(guī)劃辦公自動化管理系統(tǒng)是一個典型的數(shù)據(jù)庫開發(fā)應(yīng)用程序,由日常管理模塊、業(yè)務(wù)管理模塊、用戶管理模塊組成,規(guī)劃系統(tǒng)功能模塊如下:1.日常管理模塊該模塊包括收文管理模塊、發(fā)文管理模塊、批示管理模塊、會議管理模塊、公共信息管理模塊、個人辦公管理模塊、人事管理模塊。2.業(yè)務(wù)管理模塊該模塊包括生
15、產(chǎn)報表模塊、采購計劃模塊、庫存管理模塊、指標(biāo)情況模塊。3.用戶管理模塊該模塊主要包括用戶發(fā)表新聞。4.系統(tǒng)員管理模塊該模塊主要包括網(wǎng)站管理員管理用戶和新聞。3.2 系統(tǒng)模塊以及功能結(jié)構(gòu)圖表 3-2-1 模塊功能設(shè)計表模塊詳細功能描述新聞管理添加新聞:主要是用于發(fā)布新聞(包含新聞)編輯新聞:對已發(fā)布的新聞進行修改、刪除等操作模板管理模板綁定:對主頁、欄目、新聞瀏覽分別綁定模板,便于生成模板管理:修改、刪除 HTML 模板(已經(jīng)綁定模板不能刪除)增加模板:增加新的模板系統(tǒng)數(shù)據(jù)新聞附件管理:對隨新聞發(fā)布的附件進行有效的管理,刪除無用的附件新聞分類管理:對新聞的欄目進行增加發(fā)布、修改、刪除,支持無限級
16、分類根據(jù)系統(tǒng)需求分析,設(shè)計系統(tǒng)總體結(jié)構(gòu)大致如下圖所示:7 / 46 文檔可自由編輯打印圖 3-2-2 系統(tǒng)總體結(jié)構(gòu)圖工作流程為:打開該網(wǎng)站,普通瀏覽者能瀏覽、閱讀和搜索新聞,能進行注冊,注冊后為新聞輸入員,登錄進入新聞后臺管理區(qū), 只有添加新聞的權(quán)限;如登錄時為新聞管理員,其不但有添加新聞的權(quán)限,還有審核和管理新聞的權(quán)限。在發(fā)布新聞的時候,用戶必須要注冊后才能進行發(fā)布新聞,否則你進入發(fā)布新聞頁面則顯示你還沒有登錄的提示畫面,發(fā)布的新聞只要標(biāo)題,分類,內(nèi)容等方面,如果有寫錯,可以根據(jù)點擊重寫按鈕重新輸入內(nèi)容,等到全部寫完無誤后,就可以點擊發(fā)表按鈕發(fā)布了!你發(fā)布的新聞就在你所選擇分類的那一類下面。
17、管理新聞功能包括對任一條新聞內(nèi)容可作相應(yīng)修改,也可刪除任何一條不再需要保留的新聞。管理新聞分類包括對新聞分類名稱作修改,也可將任一分類名刪除,刪除后其分類下的所有新聞也將被刪除。添加用戶時,用戶等級可為管理員、或者輸入員之一,管理用戶包括修改用戶名、密碼和用戶等級,也可將任一用戶刪除。4 4 系系 統(tǒng)統(tǒng) 設(shè)設(shè) 計計4.1 邏輯結(jié)構(gòu)設(shè)計本系統(tǒng)數(shù)據(jù)庫采用 Microsoft Access2003 數(shù)據(jù)庫,系統(tǒng)數(shù)據(jù)庫名稱為 user.mdb。數(shù)據(jù)庫user.mdb 中包含 9 張表。數(shù)據(jù)庫中的數(shù)據(jù)表請參見附錄 B。8 / 46 文檔可自由編輯打印5 5 網(wǎng)網(wǎng) 站站 總總 體體 架架 構(gòu)構(gòu)5.1 模塊
18、功能介紹系統(tǒng)主要包括以下功能模塊:1.主頁瀏覽模塊:主要用于新聞的發(fā)布。2.新聞專欄模塊:主要把新聞詳細的分欄顯示給用戶,用戶已好根據(jù)自己的意愿去訪問他關(guān)心的新聞內(nèi)容。3.后臺管理模塊:主要包括網(wǎng)站的全體的新聞發(fā)布,修改,和相關(guān)的網(wǎng)站管理。4.用戶管理模塊:主要包括超級用戶、普通用戶兩種登錄情況。超級用戶包括用戶添加、用戶修改(所有用戶)、用戶注銷 3 部分;普通用戶包括用戶修改(個人信息進行修改)、用戶注銷 2 部分。5.2 網(wǎng)站首頁的運行結(jié)果首頁:主要功能是顯示最熱門、最新和推薦的新聞,顯示新聞搜索功能、頁面風(fēng)格設(shè)置、新聞分類、滾動新聞圖片和網(wǎng)站公告等;如圖 5-2-1 所示:圖 5-2-
19、19 / 46 文檔可自由編輯打印為了方便閱讀將網(wǎng)站頁面的各部分說明以列表形式給出,表 5-2-2表 5-2-2 網(wǎng)站首頁解析區(qū)域名稱說明對應(yīng)文件1導(dǎo)航區(qū)用于顯示網(wǎng)站的標(biāo)識、標(biāo)題top.asp2用戶登陸和廣告時事區(qū)主要用于用戶和系統(tǒng)管理員登陸,以及 廣告 日常最新新聞的顯示right.asp3主體內(nèi)容區(qū)主要用于把最新新聞 分欄的顯示在 主頁上面body.asp4友情鏈接版權(quán)說明區(qū)用于友情鏈接和 相關(guān)鏈接區(qū)down.asp5總體框架主要實現(xiàn)把上面的模塊應(yīng)用在一個網(wǎng)頁上Index.asp6 6 系系 統(tǒng)統(tǒng) 部部 分分 重重 要要 功功 能能 及及 其其 代代 碼碼6.1 導(dǎo)航區(qū)1.導(dǎo)航區(qū)的運行結(jié)果
20、圖 6-1-12.導(dǎo)航區(qū)網(wǎng)頁分析區(qū)域名稱說明對應(yīng)文件1導(dǎo)航標(biāo)簽區(qū)用于顯示網(wǎng)站的標(biāo)識、標(biāo)題,專欄top.asp2文章收索區(qū)主要用于用戶對站內(nèi)文章的收索top.asp3用戶登錄區(qū)主要用于用戶的登錄Top.asp(denglu.asp)表 6-1-210 / 46 文檔可自由編輯打印3.導(dǎo)航區(qū)網(wǎng)頁代碼.這里給出 top.asp 的主要代碼 下面是主要給出了框架代碼,收索區(qū)代碼。 A,top.asp 主要框架代碼。 設(shè)為首頁 加入收藏 發(fā)表新聞 后臺管理 2 下面是 top.asp 主要收索區(qū)的 代碼 標(biāo)題 作者 來源 發(fā)布時間 11 / 46 文檔可自由編輯打印 6.2 用戶登錄注冊修改用戶登錄注冊
21、修改首頁解析 如表 6-2-1區(qū)域名稱說明對應(yīng)文件1登陸界面用于用戶的登陸right.asp2注冊主界面用于用戶的注冊頁面和導(dǎo)航的框架Zhuce zhuceindex.asp3注冊表單頁面主要用于用戶填寫表單數(shù)據(jù)Zhuce zhucebody.htm4注冊信息處理頁面用于注冊信息的處理Zhuce zhuce.htm3信息修改表單頁面主要用于用戶填寫修改表單的數(shù)據(jù)Zhuce xiugai.asp4信息修改處理頁面主要用于用戶修改信息數(shù)據(jù)的處理Zhuce zhuce1.asp系統(tǒng)登錄模塊主要用于驗證用戶登錄系統(tǒng)時輸入的用戶名、密碼、驗證碼是否正確,如果正確用戶進入系統(tǒng),否則將不能進入此系統(tǒng)。系統(tǒng)登
22、錄頁面的設(shè)計效果;如圖 6-2-2 所示圖 6-2-2 系統(tǒng)登錄頁面的設(shè)計效果系統(tǒng)登錄頁面所采用的是動態(tài)顯示功能!系統(tǒng)登錄頁面所涉及到的程序代碼如下:denglubody.asp1,登錄表單代碼!%session(userlabel)=0session(user)=guestunm=request.Form(user)pwd=request.Form(pwd)if request.QueryString(lb)=1 then12 / 46 文檔可自由編輯打印response.Redirect index.aspend ifif unm and pwd then%sql=select * fro
23、m user where 用戶名=&unm& and 密碼=&pwd&set user1=cnn.execute(sql) if not user1.eof then session(userlabel)=1 session(user)=unm session(name)=user1(真實姓名) response.Redirect index.asp else response.Write 賬號或密碼錯誤 response.Write 返回 end ifelseresponse.Write 輸入不能為空response.Write 返回 end if%2,登錄處理頁面%session(user
24、label)=0session(user)=guestunm=request.Form(user)pwd=request.Form(pwd)if request.QueryString(lb)=1 thenresponse.Redirect index.aspend ifif unm and pwd then%sql=select * from user where 用戶名=&unm& and 密碼=&pwd&set user1=cnn.execute(sql)if not user1.eof thensession(userlabel)=1session(user)=unmsession(n
25、ame)=user1(真實姓名)response.Redirect index.aspelseresponse.Write 賬號或密碼錯誤13 / 46 文檔可自由編輯打印response.Write 返回end ifelseresponse.Write 輸入不能為空response.Write 返回end if%3,管理員登錄頁面:admin.asp 如圖:6-2-3 所示 返回首頁4,管理員登錄頁面處理:admindenglu.asp%session(userlabel)=0session(user)=guestunm=request.form(user)pwd=request.
26、form(pwd)if unm and pwd then%14 / 46 文檔可自由編輯打印%sql=select * from admin where 用戶=&unm& and 密碼=&pwd&set user1=cnn.execute(sql)if not user1.eof thensession(userlabel)=2session(user)=unmsession(name)=user1(真實姓名)response.Write 登陸成功response.Write 進入管理頁面response.Write 返回首頁else判別登陸的用戶密碼錯誤response.Write 用戶名或
27、密碼錯誤response.Write 返回重新登陸response.Write 返回首頁end ifelseresponse.Write 輸入不能為空response.Write 返回end if%5,系統(tǒng)注冊頁面的效果;如圖 6-2-4 所示圖 6-2-4 系統(tǒng)注冊頁面運行效果用戶注冊頁面是用于普通用戶的注冊,因為本新聞系統(tǒng)注冊用戶可以發(fā)布新聞,這樣可以減輕網(wǎng)站管理員的發(fā)表新聞的負擔(dān)。15 / 46 文檔可自由編輯打印所涉及到的程序代碼如下:1.注冊表單頁面代碼:zhuce/zhucebody.htm用戶注冊 用戶名:*密碼:*重復(fù)密碼:*昵稱:*出生日期:*性別:男女*所在地址:國家:中國
28、省份:北京上海貴州廣東河北山西陜西安徽福建江西*個人愛好:驗證碼:img src=./image/.GIF16 / 46 文檔可自由編輯打印img src=./image/.GIFimg src=./image/.GIFimg src=./image/.GIF輸入驗證碼* 2.注冊數(shù)據(jù)處理頁面代碼: zhuce/zhuce.asp%If request.Form(user)= or request.Form(pwd1)= or request.Form(nichen)= or request.Form(shengri)= thenresponse.
29、write 輸入不能為空!返回重新填寫!end ifif request.Form(user) and request.Form(pwd1) and request.Form(nichen) and request.Form(shengri) thenset cnn=server.createobject(adodb.connection)sqrcnn=Dbq=& server.MapPath(./user.mdb)&;Driver=Microsoft Access Driver (*.mdb)cnn.open sqrcnndim gn,sqlsql=select * from user wh
30、ere 用戶名=& trim(request.Form(user) &set gn=cnn.execute(sql)if gn.eof thensql=insert into user(用戶名,密碼,昵稱,出生日期,性別,所在地址,個人愛好) values(&request.Form(user)&,&request.Form(pwd1)&,&request.Form(nichen)&,&request.Form(shengri)&,&request.Form(xb)&,&request.Form(dizhi)&-&request.Form(shengfen)&,&request.Form(ai
31、hao)&)cnn.execute sqlresponse.Write 注冊成功!點擊返回首頁elseresponse.write 該用戶名已經(jīng)被注冊!返回重新注冊!end ifend if%17 / 46 文檔可自由編輯打印4.用戶信息修改表單主要用于或得用戶信息,然后方便用戶更改相關(guān)信息,該頁面主要用到了注冊頁面的代碼,不同的就是多了個查詢用戶的相關(guān)信息操作。 頁面代碼:zhucexiugai.asp 上面是查詢得到的結(jié)果 然后通過方式顯示在表單里面,這樣用戶就可以根據(jù)以前的相關(guān)信息更改。5.用戶信息修改處理頁面代碼:zhucexiugai1.asp說明:該頁面最開始的想法是用更新的方法及
32、 recodeset 方法完成,但不知道數(shù)據(jù)庫的什么原因所以 就 用把原來用戶的記錄刪除掉,然后重新插入,主要 SQL 語句如下。set cnn=server.createobject(adodb.connection)sqrcnn=Dbq=& server.MapPath(./user.mdb)&;Driver=Microsoft Access Driver (*.mdb)cnn.open sqrcnndim gn,sqlsql=select * from user where 用戶名=& trim(request.Form(user) &set gn=cnn.execute(sql)if
33、gn.eof thensql=insert into user(用戶名,密碼,昵稱,出生日期,性別,所在地址,個人愛好) values(&request.Form(user)&,&request.Form(pwd1)&,&request.Form(nichen)&,&request.Form(shengri)&,&request.Form(xb)&,&request.Form(dizhi)&-&request.Form(shengfen)&,&request.Form(aihao)&)cnn.execute sqlresponse.Write 注冊成功!點擊返回首頁elsesql=delete
34、 * from user where 用戶名=& trim(request.Form(user) &cnn.execute(sql)sql=insert into user(用戶名,密碼,昵稱,出生日期,性別,所在地址,個人愛好) values(&request.Form(user)&,&request.Form(pwd1)&,&request.Form(nichen)&,&request.Form(shengri)&,&request.Form(xb)&,&request.Form(dizhi)&-&request.Form(shengfen)&,&request.Form(aihao)&)
35、cnn.execute sqlresponse.Write 修改成功!點擊返回首頁end if18 / 46 文檔可自由編輯打印end if%6.3 首頁主體內(nèi)容區(qū)1.首頁主體的運行結(jié)果 如圖 6-3-12. 主體網(wǎng)頁分析區(qū)域說明對應(yīng)文件2用于顯示站內(nèi)文章和用戶的相關(guān)信息,還有就是站內(nèi)的最新文章及動畫新聞。Body1.asp3站內(nèi)的相關(guān)推薦新聞及網(wǎng)站說明Body2.asp4主要用于把站內(nèi)所有的最新新聞例舉出來Down1.aspDown2.asp3.每個網(wǎng)頁的代碼:該頁面主要顯示用戶的統(tǒng)計信息和網(wǎng)站的最新動態(tài)。a.下面主要的統(tǒng)計用戶的相關(guān)信息代碼 %dim sumpeople19 / 46 文檔
36、可自由編輯打印sumpeople=0sql=select * from firstlink where 賬戶=&trim(session(user)&set rs=cnn.execute(sql)游客訪問統(tǒng)計if session(user)=guest thensession(guestlast)=session(guestlast)+1end ifif not rs.eof then last=rs(訪問次數(shù))+1lastIP=rs(IP)lasttime=rs(上次訪問時間)elsesql=insert into firstlink(賬戶,IP,上次訪問時間,訪問次數(shù)) values(&s
37、ession(user)&,&request.servervariables(local_addr)&,&now()&,1) cnn.execute(sql)last=1lastIP=request.servervariables(local_addr)lasttime=0end ifsql1=select * from firstlink set rs1=cnn.execute(sql1)do while not rs1.eof 統(tǒng)計訪問人數(shù)sumpeople=sumpeople+rs1(訪問次數(shù))rs1.movenextloopset rs1=nothing統(tǒng)計站內(nèi)文章sql=select
38、 count(*) from newsdata set rs2=cnn.execute(sql)sunnews=rs2(0)if sunnews 0 thensunnews=0end if今天的新聞統(tǒng)計sql=select count(*) from newsdata where 發(fā)布時間=&cstr(date()&response.Write cstr(date()set rs2=cnn.execute(sql)sun=rs2(0)if sun 0 thensun=0end if統(tǒng)計你發(fā)表的新聞數(shù)量sql=select count(*) from newsdata where 賬號=&ses
39、sion(user)&response.Write cstr(date()20 / 46 文檔可自由編輯打印set rs2=cnn.execute(sql)yousuns=rs2(0)if yousuns 24 小時 %新聞點擊排行sql=select top 12 編號,標(biāo)題,瀏覽次數(shù) from newsdata order by 編號 desc response.Write cstr(date() set rs=cnn.execute(sql)21 / 46 文檔可自由編輯打印 i=0do while not rs.eof and i a
40、 href=liulanindex.asp?id=() B,下面代碼主要是統(tǒng)計最新動態(tài)。 %新聞發(fā)表最多者sql=select 標(biāo)題,count(*) from pinglun group by 標(biāo)題 order by count(*) desc set rs=cnn.execute(sql) i=0do while i () %22 / 46 文檔可自由編輯打印 rs.movenext end ifif i : : : : : 網(wǎng)站說明地方 相關(guān)說明及新聞相關(guān)說明及新聞相關(guān)說明及新聞 % sub go_onclick response.Write fdsfdsf end sub
41、if request(cat) then response.Redirect searchindex.asp?cat=&request(cat) end if % a href=liulanindex.asp?id= 24 / 46 文檔可自由編輯打印 a href=liulanindex.asp?id= %if i=2 thenresponse.Write i=0end ifi=i+1rs.movenextloop% a href=liulanindex.asp?id= %if i=2 thenrespon
42、se.Write i=0end ifi=i+1rs.movenextloop% 25 / 46 文檔可自由編輯打印 a href=liulanindex.asp?id= %if i=2 thenresponse.Write i=0end ifi=i+1rs.movenextloop% a href=liulanindex.asp?id= %if i=2 thenresponse.Write i=0end ifi=i+1rs.movenextloop% 26 / 46 文檔可自由編輯打印6.4 友情鏈接區(qū)1. 友情鏈接區(qū)的運行結(jié)果 如圖 6-4-1 所示2. 網(wǎng)頁分析一般
43、新聞網(wǎng)頁都有友情鏈接 這樣可以拉動網(wǎng)頁的流動量,所以為了該模塊的擴展。所以該區(qū)域方便以后好更改 所以該區(qū)域用單引入網(wǎng)頁的方式。該網(wǎng)頁現(xiàn)在還沒制作。只是策劃了個模塊在這里!3. 友情鏈接區(qū)網(wǎng)頁代碼:聯(lián)系郵箱: 在線 QQ:85868179Copyright 2009, 版權(quán)所有 Only 憔悴6.5 總體框架1. 運行結(jié)果即為上面的首頁效果,該網(wǎng)頁的作用是 把前面零散的網(wǎng)頁引入到一個網(wǎng)頁來! 因為這樣可以方便以后代碼的修改??傮w框架主要實現(xiàn)把上面的模塊應(yīng)用在一個網(wǎng)頁上Index.asp2. 網(wǎng)頁代碼: 28 / 46 文檔可自由編輯打印3. 專欄網(wǎng)頁制作a. 專欄網(wǎng)頁分析專欄是為了這個新聞系統(tǒng)不
44、止一個類別的新聞,所以設(shè)計了多個專欄。這里就用的一個最新動態(tài)展覽的代碼!然后分頁顯示。b. 專欄網(wǎng)頁代碼. 最新動態(tài) % sql=select top 10 編號,標(biāo)題 from newsdata order by 發(fā)布時間 desc set rs=cnn.execute(sql) i=0 do while not rs.eof and i a href=liulanindex.asp?id=29 / 46 文檔可自由編輯打印 推薦- % sql=select top 30 編號,標(biāo)題,瀏覽次數(shù) from newsdata order by 瀏覽次數(shù) desc set rs=cnn.execu
45、te(sql) i=1 do while not rs.eof and i a href=liulanindex.asp?id=. % i=1 do while not rs.eof and i a href=liulanindex.asp?id=. 30 / 46 文檔可自由編輯打印 最有影響力的文章- % sql=select 標(biāo)題,count(*) from pinglun group by 標(biāo)題 order by count(*) desc set rs=cnn.execute(sql) i=1 do while not rs.eof and i a href=liulanindex.
46、asp?id= () % i=1 do while not rs.eof and i a href=liulanindex.asp?id=31 / 46 文檔可自由編輯打印 () 4. 新聞瀏覽頁面a. 新聞瀏覽頁面分析該網(wǎng)頁用于顯示相關(guān)新聞的詳細內(nèi)容!這里只需回去新聞的 ID 即可,本模塊里面還搭配到網(wǎng)頁評論一起,方便用戶評論新聞。b. 新聞瀏覽網(wǎng)頁代碼.%btid=trim(request.querystring(id)標(biāo)題 IDif session(user)guest thenusername=session(name)控制沒有登陸的用戶評論elseusername=過路游客end i
47、fif btid= then 修改文章后的查看btid=session(wenzhangid)end if% %if btid then%32 / 46 文檔可自由編輯打印來源:,發(fā)表者:發(fā)表時間:;本文章由:提供:有人觀看過該文章%if rs(圖片) then%img src=a href=index.asp?page=返回 相關(guān)評論:%do while not pinglun.eof response.Write &pinglun(用戶)&的評論:response.Write &pinglun(評論)&response.Write 評論時間:&pinglun(評論時間)&pinglun.m
48、ovenextloop%33 / 46 文檔可自由編輯打印 發(fā)表評論:% -提交評論if request.Form(text) and session(user) then%當(dāng)前用戶: 登陸重新登陸5. 信息檢索模塊a. 信息檢索模塊可按關(guān)鍵字、標(biāo)題、全文、作者、來源、發(fā)布時間段等檢索信息。b. 信息檢索模塊網(wǎng)頁代碼.%biaoti=trim(request.Form(cat)ziduan1=trim(request.Form(ziduan)if biaoti and ziduan1 then% 查詢結(jié)果如下 %dim ii=0do while not rs.eof and i % respo
49、nse.Write response.Write &rs(標(biāo)題)& response.Write if session(userlabel)=2 thenresponse.Write 編輯 response.Write 刪除end ifrs.moveNexti=i+1loop%For i=1 to Rs.PageCount 顯示分頁頁碼 if i=Cpage_no then Response.write i & elseResponse.write & i & end if Next35 / 46 文檔可自由編輯打印 % 6.6 新聞發(fā)表1. 新聞發(fā)布不同用
50、戶都用新聞發(fā)表權(quán),但是只有系統(tǒng)管理員才能夠具有編輯和修改新聞的權(quán)限 新聞發(fā)表網(wǎng)頁代碼: % if session(userlabel)0 thenresponse.Write date()發(fā)表內(nèi)容數(shù)據(jù)tb=trim(request.Form(whatnew)發(fā)表類型bt=trim(request.Form(biaoti)發(fā)布標(biāo)題ly=trim(request.Form(laiyuan)來源yzz=trim(request.Form(zuozhe)原作者tj=request.Form(bjk)發(fā)表內(nèi)容tupian=request.Form(picfile)照片if tj and bt theni
51、f ly= then 如果來源為空就設(shè)為本網(wǎng)站ly=小小新聞網(wǎng)end ifif yzz= then 如果原作者那么為用戶的名字yzz=session(name)end if%tj=s_html(tj)sql=select * from newsdata where 標(biāo)題=&bt& and 類型=&tb&set rs=cnn.execute(sql)if rs.eof thensql=insert into newsdata(標(biāo)題,作者,來源,發(fā)布時間,瀏覽次數(shù),內(nèi)容,類型,發(fā)表者,賬號,圖片) values(&bt&,&yzz&,&ly&,&date()&,0,&tj&,&tb&,&sessi
52、on(name)&,&session(user)&,&tupian&)cnn.execute(sql) 36 / 46 文檔可自由編輯打印 response.Write sql response.Write 發(fā)表成功!再來一篇?插入數(shù)據(jù)到數(shù)據(jù)庫!elseresponse.Write 這個標(biāo)題已被使用!end ifend if% 標(biāo)題: 國內(nèi) 網(wǎng)頁 程序 平面網(wǎng)絡(luò)軟件 來源: 原作者: input type=text name=zuozhe size=20 maxlength=20 value= 請選擇上傳相片: 返回首頁| 現(xiàn)在時間: 請輸入內(nèi)容! %else response.Write 你
53、還沒有登錄response.Write 返回登錄end if37 / 46 文檔可自由編輯打印%2. 新聞修改 a. 新聞修改網(wǎng)頁分析該專欄現(xiàn)在只做到讓系統(tǒng)管理員能夠修改!后面準(zhǔn)備具體的讓發(fā)表者已能對所發(fā)表的新聞進行更改。b. 新聞修改網(wǎng)頁代碼.新聞發(fā)表!% response.Write session(btid)tbid=request.QueryString(id)if tbid thensession(btid)=tbid% 標(biāo)題: input type=text name=biaoti size=20 maxlength=20 value= 國內(nèi) 網(wǎng)頁 程序 平面網(wǎng)絡(luò)軟件 來源: in
54、put type=text name=laiyuan size=20 maxlength=20 value= 原作者: input type=text name=zuozhe size=20 maxlength=20 value= 現(xiàn)在時間:38 / 46 文檔可自由編輯打印 3. 新聞刪除處理. %tbid=request.QueryString(id)if tbid thensql=delete from newsdata where 編號=&tbidresponse.Write sql%39 / 46 文檔可自由編輯打印總總 結(jié)結(jié)本新聞系統(tǒng)是一個最新的新聞發(fā)布系統(tǒng),在很多功能方面都很不足
55、。比如代碼的規(guī)范話,程序的可移植性,因為很多地方缺少那方面的知識、同樣已沒那個條件測試。通過一個學(xué)期對 ASP 的系統(tǒng)學(xué)習(xí),學(xué)會了很多 ASP 相關(guān)知識。但是在實際應(yīng)用中的時候方才發(fā)覺知識是那么的少,完全的不夠使用。在網(wǎng)上收索到其他相關(guān)的網(wǎng)頁代碼, 發(fā)覺什么才是專業(yè)的!自己的很多地方都不足。在很多地方都要通過學(xué)習(xí),不斷的學(xué)習(xí),這樣才能更好的把事情做得更好。做不到完美,因為完美這個概念對于現(xiàn)階段的自己來說很遙遠。即使知識很好已不會做到?jīng)]完美。學(xué)無止境學(xué)無止境至無完美至無完美40 / 46 文檔可自由編輯打印附錄 B 數(shù) 據(jù) 表數(shù)據(jù)庫名:user.mdb(1)user(用戶信息表)用戶信息表主要用
56、于保存用戶賬戶及個人信息。該表結(jié)構(gòu)如表 B.1 所示。表 B.1 表 user 結(jié)構(gòu)字段名數(shù)據(jù)類型主鍵否描述編號自動編號是自動編號用戶名文本否密碼文本否昵稱文本否出生日期文本否性別文本否所在地址文本否個人愛好文本否(2)guonei(國內(nèi)專欄新聞),chengxu(程序?qū)谛侣劊?wangluo(網(wǎng)絡(luò)專欄新聞),wangye(網(wǎng)頁專欄新聞),soft(常用軟件專欄新聞),pingmian(平面專欄新聞)數(shù)據(jù)表的結(jié)構(gòu)如表 B.2 所示。表 B 表結(jié)構(gòu)字段名數(shù)據(jù)類型主鍵否描述編號自動編號是自動編號標(biāo)題文本否新聞標(biāo)題作者文本否作者來源文本否發(fā)布時間文本否發(fā)布日期瀏覽次數(shù)文本否內(nèi)容OLE 對象否新聞內(nèi)
57、容類型文本否發(fā)表者文本否賬號文本否圖片文本否照片OLE 對象否41 / 46 文檔可自由編輯打?。?)pinglun(儲存用戶對新聞的評論)表主要用于保存用戶對新聞的評論。該數(shù)據(jù)表的結(jié)構(gòu)如表 B.3 所示表 B.3 表 pinglun 結(jié)構(gòu)字段名數(shù)據(jù)類型主鍵否描述編號自動編號是自動編號標(biāo)題文本否被評論的新聞名稱評論文本否評論內(nèi)容用戶文本否那個用戶評論的(4)admin(儲存管理員賬號密碼)該數(shù)據(jù)表的結(jié)構(gòu)如表 B.4 所示表 B.4 表 admin 結(jié)構(gòu)字段名數(shù)據(jù)類型主鍵否描述用戶文本否密碼文本否真實姓名文本否編號自動編號是自動編號(5)firstlink(儲存用戶的訪問情況)該數(shù)據(jù)表的結(jié)構(gòu)如表
58、 B.5 所示表 B.5 表 firstlink 結(jié)構(gòu)字段名數(shù)據(jù)類型主鍵否描述賬戶文本IP文本否上次訪問時間文本否訪問次數(shù)文本否編號自動編號是42 / 46 文檔可自由編輯打印附附錄錄A A 參參 考考 文文 獻獻1ASP 程序設(shè)計 -中國水利水電出版社 (主編:葉潮流)g an employment tribunal claimEmployment tribunals sort out disagreements between employers and employees.You may need to make a claim to an employment tribunal if:
59、you dont agree with the disciplinary action your employer has taken against youyour employer dismisses you and you think that you have been dismissed unfairly.For more information about dismissal and unfair dismissal, see Dismissal.You can make a claim to an employment tribunal, even if you havent a
60、ppealed against the disciplinary action your employer has taken against you. However, if you win your case, the tribunal may reduce any compensation awarded to you as a result of your failure to appeal.Remember that in most cases you must make an application to an employment tribunal within three mo
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 二零二五年度車庫門自動開閉系統(tǒng)維修合同3篇
- 英杰電氣:2024年半年度報告
- 2025年度石油鉆井平臺打眼鉆孔放炮合同4篇
- 二零二五年度斷橋鋁窗戶安裝與節(jié)能補貼申請合同3篇
- 2025年個人收入證明標(biāo)準(zhǔn)范本合同編制4篇
- 2025年度個人住房貸款延期還款及利率調(diào)整協(xié)議4篇
- 二零二五年度航空航天產(chǎn)業(yè)園廠房租賃及研發(fā)合同3篇
- 二零二五年度車庫車位租賃與停車場綠化美化合同4篇
- 玉溪云南玉溪易門縣教育體育系統(tǒng)面向2025年畢業(yè)生招聘教師6人筆試歷年參考題庫附帶答案詳解
- 玉溪2025年云南玉溪市江川區(qū)審計局招聘公益性崗位工作人員筆試歷年參考題庫附帶答案詳解
- 5G+教育5G技術(shù)在智慧校園教育專網(wǎng)系統(tǒng)的應(yīng)用
- 服務(wù)人員隊伍穩(wěn)定措施
- 大連理工大學(xué)信封紙
- VI設(shè)計輔助圖形設(shè)計
- 淺談小學(xué)勞動教育的開展與探究 論文
- 2023年全國4月高等教育自學(xué)考試管理學(xué)原理00054試題及答案新編
- 河北省大學(xué)生調(diào)研河北社會調(diào)查活動項目申請書
- JJG 921-2021環(huán)境振動分析儀
- 中藥炮制學(xué)-第五、六章
- 小兒高熱驚厥精品課件
- 兩段焙燒除砷技術(shù)簡介 - 文字版(1)(2)課件
評論
0/150
提交評論