【導(dǎo)讀】也充當(dāng)了一個重要的新聞媒介的功能.現(xiàn)在信息高度發(fā)達(dá)的今天，人們對最新信息的需求和發(fā)布迫切的需要及時性。上多用戶發(fā)布，多欄目管理，實(shí)時的進(jìn)行行為統(tǒng)計和記錄的網(wǎng)上交互系統(tǒng)。息化手段改造傳統(tǒng)產(chǎn)業(yè)，提高工作效率已是不可爭辯的事實(shí)。當(dāng)今時代的兩個顯著特點(diǎn)就是世界經(jīng)濟(jì)一體化和以計算機(jī)為代表的信息技術(shù)。一個組織要在激烈的競爭中保持優(yōu)勢和不斷發(fā)展，必須對迅速變化。的環(huán)境靈敏地做出有效地反應(yīng)。信息管理系統(tǒng)的應(yīng)用能夠提供這種有效的決策支。對新聞的錄入、修改、刪除等操作，都將立即在主頁。的對應(yīng)欄目顯示出來，實(shí)現(xiàn)“即時發(fā)布、即時見效”。用戶單擊某個新聞標(biāo)題，就能夠查看新聞的詳細(xì)內(nèi)容。件進(jìn)行新聞查找。聞的所有評論信息。判斷所登錄的人員是否為管理員，如果不是，拒絕登錄，是的話判斷其權(quán)限。

　　

【正文】 的字符串。變量 patrn 是一個正則表達(dá)式，正則表達(dá)式是由普通字符以及特殊字符組成的文 字模式。該模式描述在查找文字主體時待匹配的一個或多個字符串。正則表達(dá)式作為一個模板，將某個字符模式與所搜索的字符串進(jìn)行匹配。正則表達(dá)式中的 Execute 方法對指定的字符串執(zhí)行正則表達(dá)式搜索。 /^表示正則表達(dá)式的開始， $/表示正則表達(dá)式的結(jié)束， [0． 9]表示以 0～ 9的數(shù)字為開始和結(jié)束， 1,20 表示長度為 1～ 20。 3． IsInt 函數(shù) IsInt 函數(shù)的功能是判斷指定的字符串是否是整型數(shù)據(jù)，代碼如下： function isInt theStr var flag true。 if isEmpty theStr flag false。 else for var i 0。 i 。 i++ if isDigit i,i+1 false flag false。 break。 return flag 。 參數(shù) theStr 表示要判斷的字符串。如果 theStr 為空，則返回 false；否則對 theStr 中的每個字符進(jìn)行判斷，如果有一個字符不是數(shù)字類型 使用IsDigital 函數(shù)判斷 則 返回 false。如果上述情況都沒有返回 false，則返回true。 4． IsBetween 函數(shù) IsBetween 函數(shù)的功能是判斷指定數(shù)據(jù)是否在兩個數(shù)字之間，代碼如下： function isBetween val, lo, hi if val lo || val hi return false 。 else return true 。 參數(shù) val 表示要比較的數(shù)值，參數(shù) lo 表示比較范圍的下限，參數(shù) hi 表示比較范圍的上限。程序?qū)?val 與 lo、 hi 進(jìn)行比較 ，如果 val 的值不在它們之間，則返回 false，否則返回 true。 5． IsIDate 函數(shù) IsDate 函數(shù)的功能是判斷指定數(shù)據(jù)是否是日期型數(shù)據(jù)，代碼如下： function isDate theStr var the1st 39。39。 。 var the2nd 39。39。 。 if the1st the2nd return false 。 else var y 0,the1st 。 var m the1st+1,the2nd 。 var d the2nd+1, 。 var Days 31。 if isInt m false || isInt d false || isInt y false return false 。 else if 4 return false 。 else if !isBetween m, 1, 12 return false 。 else if m 4 || m 6 || m 9 || m 11 Days 30。 else if m 2 if y % 4 0 Days 28。 else if y % 100 0 amp。amp。 y % 400 0 Days 28。 else Days 29。 if isBetween d, 1, Days false return false 。 else return true 。 可以看到前面定義的函數(shù)都是為了實(shí)現(xiàn) Isdate 函數(shù)的功能。 在 中，定義“開始”按鈕的代碼如下： input type submit value 開始 language javascript name tijiao onclick return button2_onclick 當(dāng)用戶單擊“開始”按鈕時，將觸發(fā) onclick 事件，并執(zhí)行。 Button2_onclick 函數(shù)，代碼如下： function button2_onclick // 字段不能都為空，如果發(fā)布日期為空，則查詢條件不能空 if fe amp。amp。fe amp。amp。 alert 查詢條件不能都為空！ 。 。 return false 。 // 檢查日期格式是否正確 if 0 if !isDate fe alert 開始日期 格式不正確，請重新輸入！ 。 fs 。 return false 。 if 0 if !isDate fe alert 截至日期格式不正確，請重新輸入！ 。 fs 。 return false 。 這段程序?qū)⑴袛嘤脩糨斎氲牟樵儣l件是否為空，并使用自定義函數(shù) IsDate 驗(yàn)證日期是否有效。 下面介紹 的實(shí)現(xiàn)方法。它的主要功能是根據(jù)用戶提交的查詢條件生成 SELECT語句，并以表格的形式顯示 查詢結(jié)果。在 中，定義了一個函數(shù) GetUserName ，它的功能是根據(jù)用戶名返回用戶的真實(shí)姓名，代碼如下： % 39。根據(jù)用戶名讀取用戶姓名 Function GetUserName UserId Dim RsUser,sql Set RsUser sql SELECT * FROM Users WHERE UserName 39。 amp。 Trim UserId Set rsUser sql If NOT Then GetUserName rsUser Ename Else GetUserName 無名 End If End Function % 這里使用 GetuserName 函數(shù)的作用是取得新聞提交人的姓名，并在查詢結(jié)果中顯示。 6 調(diào)試 服務(wù)器配置 下面介紹新聞發(fā)布系統(tǒng)的服務(wù)器配置過程。本系統(tǒng)使用了 Microsoft 的 IIS 作為系統(tǒng)服務(wù)器。如果使用的是 Windows2020 以上版本的操作系統(tǒng)，那么添加 服務(wù)器非常簡單，只需要打開“控制面板”里面的“添加 /刪除程序”選項，然后選擇“添加 /刪除 Windows 組件”，最后選中彈出對話框“ Inter信息服務(wù)（ IIS）選項”，如圖 所示，按照系統(tǒng)的提示進(jìn)行安裝既可。 圖 IIS 配置 因?yàn)樵诰€新聞發(fā)布系統(tǒng)的各個系統(tǒng)模塊里都使用的 ASP 的 Session（會話）對象和 Application（應(yīng)用程序）對象。這樣，就必須創(chuàng)建一個 ASP 應(yīng)用程序來處理用戶登錄次數(shù)信息 。 一個 ASP 應(yīng)用程序必須使用一個公用的目錄結(jié)構(gòu)，該目錄包含了網(wǎng)站使用的所有頁面。頁面的具體位置并不重要，但要讓這些頁面都位于一個公用的目錄結(jié)構(gòu)里。 創(chuàng)建 ASP 應(yīng)用程序的具體步驟為： 打開 IIS 服務(wù)器，進(jìn)入 Web 根目錄。單擊鼠標(biāo)右鍵，選擇“屬性”命令，彈出如圖 所示的屬性對話框，在應(yīng)用程序設(shè)置里，創(chuàng)建 ASP 應(yīng)用程序。名稱與Web 根目錄同名。這樣我們就創(chuàng)建了一個 ASP 應(yīng)用程序。 圖 詳細(xì)配置 使用 軟件 AWS 即 Asp Web Server 的縮寫，是一款功能極為強(qiáng)大卻僅有 數(shù)百 KB 大小的純綠色軟件，同時也是一款基于 box 開發(fā)的 asp web 服務(wù)器，其功能強(qiáng)大，基本上能夠取代 IIS 成為廣大 Asp 程序員和網(wǎng)站開發(fā)者的利器和必備武器之一。 簡介： AspWebServer 服務(wù)器 顧名思義，此軟件是一款小巧輕盈的 Asp Web 服務(wù)器，它能幾乎非常完美的支持 ASP。只要將此服務(wù)器復(fù)制到源代碼目錄下，運(yùn)行就可以了，默認(rèn)主頁： 。 。 等等。 如果不使用 IIS 就可以選擇這種簡單的方法。 總 結(jié)經(jīng) 過三個多月的努力，畢業(yè)設(shè)計和論文終于做完了，在此期間有過很多失敗和快樂的心情，學(xué)習(xí)到了許多以前沒有學(xué)好的知識。此次網(wǎng)上系統(tǒng)設(shè)計和實(shí)現(xiàn)，使我學(xué)習(xí) ASP。學(xué)習(xí)并實(shí)踐了網(wǎng)頁制作、 Web 服務(wù)器安裝、網(wǎng)絡(luò)數(shù)據(jù)庫操作、程序設(shè)計等多種實(shí)用技術(shù)，成功設(shè)計出一個功能基本齊全的系統(tǒng)。由親身體驗(yàn)軟件設(shè)計、開發(fā)的過程，個人覺得收獲頗豐。在這次中讓我看到了現(xiàn)代科技在生活中的重要地位，技術(shù)在不斷的日新月異。也讓我看到了自己知識的欠缺，我會在今后的生活中努力學(xué)習(xí)，不斷的充實(shí)自己。 致謝感謝 參考文獻(xiàn) [1] 藏楊秦東 李育龍 ASP 軟件工程案例精解 []. 電子工業(yè)出版社 [2] 李陶深網(wǎng)絡(luò)數(shù)據(jù)庫 [] . 重慶大學(xué)出版社 [3] 孟凡奇 陳慶平 呂偉 ASP 程序設(shè)計基礎(chǔ)[]. 上海交通大學(xué)出版社 [4] 頊宇峰 ASP +Access典型網(wǎng)站建設(shè)案例 []. 清華大學(xué)出版社 [5] 明日科技 ASP程序開發(fā)范例 []. 人民郵電出版社 [6] 明日科技 ASP 數(shù)據(jù)庫系統(tǒng)開發(fā)案例精選 []. 人民郵電出版社 [7] 于鵬 VBScript/ASP 網(wǎng)頁設(shè)計語言教程 []. 電子工業(yè)出版社 [8] 劉好增 ASP 動態(tài)網(wǎng)站開發(fā)實(shí)踐教程 []. 清華大學(xué)出版社 [9] 龍馬工作室 ASP + Access 網(wǎng)站開發(fā)實(shí)例精講 []. 人民郵電出版社 [10] 尚俊杰 秦衛(wèi)中網(wǎng)絡(luò)程序設(shè)計 ASP案例教程 []. 清華大學(xué)出版社 [11] 趙松濤 ASP動態(tài)網(wǎng)站開發(fā)實(shí)錄 []. 電子工業(yè)出版社 [12] 叢書編委會 ASP 動態(tài)網(wǎng)頁編程 []. 清華大學(xué)出版社 [13] 郭瑞軍 李杰 初曉 ASP 數(shù)據(jù)庫開發(fā)實(shí)例精粹 []. 電子工業(yè)出版社 [14] 薛小龍 ASP 典型系統(tǒng)實(shí)戰(zhàn)與解析 []. 電子工業(yè)出版社 [15] 張海蕃軟件工程導(dǎo)論 []. 清華大學(xué)出版社 I 新聞發(fā)布及管理系統(tǒng) 新聞類別管理 新聞發(fā)布及管理 新聞查 看瀏覽 新聞查詢模塊 網(wǎng)友評論模塊 系統(tǒng)用戶管理 發(fā)表網(wǎng)友評論 新聞查詢管理 新聞信息修改 基本信息發(fā)布 數(shù)據(jù)庫 新聞類別管理 后臺系統(tǒng) 前臺系統(tǒng) 普通用戶 Admin 用戶 修改自身信息 創(chuàng)建、修改、刪除普通用戶信息 修改 Admin 用戶密碼碼 系統(tǒng)用戶信息管理 普通用戶 Admin 管理自己的信息 新聞發(fā)布，自己發(fā)布的新聞的管理 管理所有用戶的信息 管理新聞類別，發(fā)布信息，所有新聞信息的管理 失敗重試 用戶登錄 開始