【正文】 頁面制作新聞，維護工作將十分繁瑣。 【 關鍵字 】 新聞 發(fā)布 管理 Abstract:Nowdays reading news online has been part of everyday famous websites such as Sohu set up news column,They publish a great deal of news every they have to publish news everyday,the frequency was high and the amount was they use static page to make news,there were many trifles in defending managerial personnal of the system have to spend a lot of time and energy in making news and management system can help them reduce workload,issue news dynamicly and simplify news publish and mannagement to improve work efficiency. The design and development of news publishing and management system covers the following aspects: News category management,including recording inquiry,modification and caceling of news category. News publishing management,including recording,modification and canceling of news. Picture disposing,including sending,storing modifying,canceling and browsing 2 of photographs and documents. News inquiry can be divided into two submodels。 制作網(wǎng)頁是企業(yè)和個人的宣傳自己的重要手段，同時也是學習者獲取學習信息的重要手段 。 隨著 Inter 的 進一步 發(fā)展 ,靜態(tài) Web 站點的開發(fā)與維護變得越來越困難 ,一方面信息的不斷增加和變化 ,使站點維護人員不得不經(jīng)常修改他們的網(wǎng)頁 ,特別是基于數(shù)據(jù)庫驅動的 Web 站點更是如此 ，隨著 Inter 上信息量的增多和交互性的加強使 HTML 顯得越來越難以勝任。 網(wǎng)絡發(fā)展前景無限，及早與網(wǎng)絡結合， 與 信息時代同步，與高科技匯合，定會給 社會各行各業(yè)的 發(fā)展注入新鮮的活力。我們也可以將 ASP 理解為一種特殊的 CGI。它具備一個服務器端的腳本執(zhí)行環(huán)境，用它可產(chǎn)生和執(zhí)行動態(tài)的、交互的、高性能的 Web服務器應用程序 。當用戶從瀏覽器向 Web 服務器提出請求時， Web服務器會自動將 ASP 的程序解釋為標準的 HTML 格式的主頁內(nèi)容，用戶端只要使用常規(guī)可執(zhí)行 HTML 程序的瀏覽器，就可瀏覽 ASP 所設計的主頁內(nèi)容，因此與瀏覽器無關，并且保證了 ASP 的源程序代碼不會外漏。 此外， ASP 技術的另一個重要特點是 ，程序員可以利用 Java、 Visual Basic、 Visual C++等語言制作適應自己特殊需要的 ActiveX服務器組件來擴充 ASP的功能，使自己的動態(tài)網(wǎng)頁幾乎具有無限的擴充能力，這是傳統(tǒng)的 CGI 程序所不及的。 ASP 的特點 ASP 主要特點表現(xiàn)如下： ▲ 使用 VBScript 、 JavaScript 等簡單易懂的腳本語言，結合 HTML 代碼，即可快速地開發(fā)網(wǎng)站的應用程序。 ▲ ASP 程序運行環(huán)境與瀏覽器無關。 ▲ ASP 的源程序由于只在服務器上運行，不會被傳到客戶端瀏覽器，因而可以避免所寫的源程序被他人剽竊，也提高了程序的安全性。將 ASP 與數(shù)據(jù)庫集成可以開發(fā)出功能強大的交互式動態(tài)網(wǎng)站。 ASP 的運行環(huán)境 ASP 程序運行在支持 ASP 的 Web 服務器上，由于 ASP 與 Windows 操作系統(tǒng)都是微軟的產(chǎn)品，所以安裝 Windows操作系統(tǒng)的 Web服務器對 ASP的支持是最好的，這種優(yōu)良的支持表現(xiàn)在兼容性、穩(wěn)定性、功能擴展、速度等方面。 Server2021 簡介 SQL Server 是一個關系數(shù)據(jù)庫管理系統(tǒng)它最初是由 Microsoft Sybase 和AshtonTate三家公司共同開發(fā)的于 1988 年推出了第一個 OS/2 版本在 Windows NT 推出后 Microsoft 與 Sybase 在 SQL Server 的開發(fā)上就分道揚鑣了Microsoft 將 SQL Server 移植到 Windows NT 系統(tǒng)上專注于開發(fā)推廣 SQL Server 的 Windows NT 版本 Sybase 則較專注于 SQL Server 在 UNIX 操作系統(tǒng)上的應用在本書中介紹的是 Microsoft SQL Server 以后簡稱為 SQL Server 或 MS SQL Server。無論從管理方面，還是從商業(yè)角度來看，Inter 都可以帶來無限生機。具體實現(xiàn)這種手段的支持環(huán)境，那就是 HTML 超文本標識語言。 然而采用這種超鏈技術存在有一定的缺陷，那就是它只能提供一種靜態(tài)的信息資源，缺少動態(tài)的客戶端與服務器端的交互。 JavaScript 的出現(xiàn)，它可以使得信息和用戶之間不僅只是一種顯示和瀏覽的關系，而是實現(xiàn)了一種實時的、動態(tài)的、可交式的表達能力。它是眾多腳本語言中較為優(yōu)秀的一種，它與 WWW 的結合有效地實現(xiàn)了網(wǎng)絡計算和網(wǎng)絡計算機的藍圖。使用它的目的是與 HTML 超文本標記語言、 Java 腳本語言（ Java 小程序）一起實現(xiàn)在一個 Web 頁面中鏈接多個對象，與 Web 客戶交互作用。像其它腳本語言一樣 ,JavaScript 同樣已是一種解釋性語言，它提供了一個易的開發(fā)過程。 基于對象的語言 JavaScript 是一種基于對象的語言，同時以可以看作一種面向對象的。其次它的變量類型是采用弱類型，并未使用嚴格的數(shù)據(jù)類型。它對用戶的反映響應，是采用以事件驅動的方式進行的。 跨平臺性 JavaScript 是依賴 于瀏覽器本身，與操作環(huán)境無關，只要能運行瀏覽器的計算機，并支持 JavaScript 的瀏覽器就可正確執(zhí)行。 綜合所述 JavaScript 是一種新的描述語言，它可以被箝入到 HTML 的文件之中。 第三章 開發(fā)環(huán)境及需求分析 、開發(fā)目 的 隨著計算機技術的發(fā)展，網(wǎng)絡技術對我們生活和工作顯得月來越重要，特別是現(xiàn)在信息高度發(fā)達的今天，人們對最新信息的需求和發(fā)布迫切的需要及時性。 2. 系統(tǒng)平臺 采用 Browser/Server 體系結構，服務器端采用 Microsoft Windows 作為網(wǎng)絡操作系統(tǒng)， Web 服務器軟件采用 （ Inter Information Server）。 4. 運行需求 11 正常使用時不應出錯，若運行時遇到不可恢復的系統(tǒng)錯誤，也必須保證數(shù)據(jù)完好無損，對數(shù)據(jù)的精確度、時間特性、適應性等都有一定要求，要求系統(tǒng)運行時能夠保證正確性、可靠性、高效性、完整性、易使用性、可維護 性、可測試性、復用性、安全保密性、可移植性、互聯(lián)性。用戶管理功能模塊的關系，如圖 3 所示。 本系統(tǒng)的前臺部分不需要進行身份驗證 ，任何人都可以游覽已發(fā)布的新聞并發(fā)表評論。首先用戶創(chuàng)建 一個名為news 的數(shù)據(jù)庫，保存新聞發(fā)布及管理系統(tǒng)的所有數(shù)據(jù)。 新聞類別表 Category 新聞類別表用來保存新聞類別數(shù)據(jù)，其結構如表 1所示。在精確度要求不高的情況下使用 smalldatetime 數(shù)據(jù)類型就足夠了。 ? 存儲網(wǎng)頁中的圖片文件。Server=(local)。如果是，則進入包含它的網(wǎng)頁；如果不是，則中斷執(zhí)行。如果當前用戶是 Admin，則不做任何操作。根據(jù)新聞編號讀取新聞信息 set rsNews = () sql = SELECT * FROM News WHERE Id= amp。 文件的內(nèi)容如下： 字體 SELECT onChange=var c=[].value。font[space]face=39。/font39。39。FONTSIZE: 9pt39。 [].value 表示選擇下拉菜單的值，保存在變量“ C”中。在其他文件中需要顯示控制模板的位置使用include 引用此文件。類 FileInfo 的主要功能是取得文件信息。定義 Stream對象 set tStream = () set Data_5xsoft = () 39。 chrB(10) sStart = MidB(RequestData,1, InStrB(iFormStart,RequestData,vbCrlf)1) iStart = LenB (sStart) iFormStart=iFormStart+iStart+1 while (iFormStart + 10) iFormEnd iInfoEnd = InStrB(iFormStart,RequestData,vbCrlf amp。取得文件名 iFindStart = InStr(iFindEnd,sInfo,filename=,1)+10 iFindEnd = InStr(iFindStart,sInfo,1) sFileName = Mid (sinfo,iFindStart,iFindEndiFindStart) =getFileName(sFileName) =getFilePath(sFileName) 39。sFormValue else sFormName,sFormValue end if end if iFormStart=iFormStart+iStart+1 wend RequestData= set tStream =nothing End Sub Private Sub Class_Terminate if 0 then set objForm=nothing set objFile=nothing set Data_5xsoft =nothing end if End Sub Private function GetFilePath(FullPath) If FullPath Then GetFilePath = left(FullPath,InStrRev(FullPath, \)) Else GetFilePath = End If End function Private function GetFileName(FullPath) If FullPath Then GetFileName = mid(FullPath,InStrRev(FullPath, \)+1) Else GetFileName = End If End function End Class 22 Class FileInfo dim FormName,FileName,FilePath,FileSize,FileType,FileStart Private Sub Class_Initialize FileName = FilePath = FileSize = 0 FileStart= 0 FormName = FileType = End Sub Public function SaveAs(FullPath) dim dr,ErrorChar,i SaveAs=true if trim(fullpath)= or FileStart=0 or FileName= or right(fullpath,1)=/ then exit function set dr=CreateObject() =3 =1 =FileStart dr,FileSize FullPath,2 set dr=nothing SaveAs=false end function