【正文】 Info,1) sFileName = Mid (sinfo,iFindStart,iFindEndiFindStart) =getFileName(sFileName) =getFilePath(sFileName) 39。取得表單項(xiàng)目名稱 iFormStart = InStrB(iInfoEnd,RequestData,sStart) iFindStart = InStr(22,sInfo,name=,1)+6 iFindEnd = InStr(iFindStart,sInfo,1) sFormName = lcase(Mid (sinfo,iFindStart,iFindEndiFindStart)) 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。讀取數(shù)據(jù) RequestData = 39。定義 Stream對(duì)象 set tStream = () set Data_5xsoft = () 39。定義 Dictionary對(duì)象 set objForm=() set objFile=() 39。類 FileInfo 的主要功能是取得文件信息。 文件包含 2 個(gè)類； 和FileInfo。在其他文件中需要顯示控制模板的位置使用include 引用此文件。如果不為空，則在兩側(cè)添加字體標(biāo)示 font和 /font。 [].value 表示選擇下拉菜單的值，保存在變量“ C”中。根據(jù)下拉菜單中的選定值的不同，有對(duì)應(yīng)的 JavaScript 代碼。FONTSIZE: 9pt39。/font39。39。font[space]face=39。/font39。39。font[space]face=39。39。 文件的內(nèi)容如下： 字體 SELECT onChange=var c=[].value。判斷用戶權(quán)限，是否可以維護(hù)新聞，管理員可以編輯所有新聞，編輯者只能修改自己的新聞 If rsNews(Poster) Session(UserName) Then 不是 Admin或新聞的作者，無(wú)權(quán)修改！ End If End If End If % 文件 文件的功能是修改新聞的字體、字號(hào)、顏色和排列位置等屬性。根據(jù)新聞編號(hào)讀取新聞信息 set rsNews = () sql = SELECT * FROM News WHERE Id= amp。如果指定新聞不存在或當(dāng)前用戶不是指定新聞的作者， 文件將中斷程序執(zhí)行。如果當(dāng)前用戶是 Admin，則不做任何操作。 代碼如下： % If Session(UserName) Admin Then (不是 Admin用戶，沒(méi)有此權(quán)限 ) End If % 文件 在修改、刪除新聞時(shí)，要判斷當(dāng)前用戶是否為 Admin 用戶或者發(fā)表新聞的作者。如果是，則進(jìn)入包含它的網(wǎng)頁(yè)；如果不是，則中斷執(zhí)行。PWD=ustb。Server=(local)。用戶可以在其他文件中直接使用 include 語(yǔ)句包含這些模塊，使用其定義的功能。 ? 存儲(chǔ)網(wǎng)頁(yè)中的圖片文件。 表 4 Users 表 字段名 字段類型 字段長(zhǎng) 說(shuō)明 UserId int 4 用戶 ID，系統(tǒng)自動(dòng)編號(hào) UserName varchar 50 用戶名 UserPwd varchar 50 密碼 Ename varchar 50 用戶姓名 Email varchar 50 電子郵箱 第六章 目錄結(jié)構(gòu)與通過(guò)用模塊 設(shè)計(jì) 本小節(jié)將介紹新聞發(fā)布管理系統(tǒng)的目錄結(jié)構(gòu)和一些通過(guò)模塊 目錄結(jié)構(gòu) 本系統(tǒng)中的所有 ASP 文件都保存在主目錄下，主目錄名由用戶決定。在精確度要求不高的情況下使用 smalldatetime 數(shù)據(jù)類型就足夠了。 表 2 News 表 字段名 字段類型 字段長(zhǎng) 說(shuō)明 Id int 4 新聞編號(hào)，系統(tǒng)自動(dòng)編號(hào) Title varchar 100 新聞標(biāo)題 Content Text 16 新聞內(nèi)容 PostTime Datetime 8 提交時(shí)間 Poster Varchar 50 提交人 CateId Int 4 新聞?lì)悇e編號(hào) Attpic Bit 4 是否有圖片： 0：沒(méi)有； 1：有 Readcount int 4 閱讀次數(shù) 網(wǎng)友評(píng)論表 Discuss 該表用來(lái)保存網(wǎng)友對(duì)新聞發(fā)表的評(píng)論， Discuss 表的結(jié)構(gòu)如表 3所示。 新聞?lì)悇e表 Category 新聞?lì)悇e表用來(lái)保存新聞?lì)悇e數(shù)據(jù)，其結(jié)構(gòu)如表 1所示。 CREATE DATABASE news GO 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) 本系統(tǒng)包含新聞?lì)悇e表 Category、新聞信息表 News、網(wǎng)友評(píng)論表 Discuss和用戶表 Users 四個(gè)表。首先用戶創(chuàng)建 一個(gè)名為news 的數(shù)據(jù)庫(kù)，保存新聞發(fā)布及管理系統(tǒng)的所有數(shù)據(jù)。后臺(tái)系統(tǒng)的 流程 分析如圖 4所示。 本系統(tǒng)的前臺(tái)部分不需要進(jìn)行身份驗(yàn)證 ，任何人都可以游覽已發(fā)布的新聞并發(fā)表評(píng)論。用戶身份驗(yàn)證可以分為兩個(gè)階段：首先對(duì)用戶身份進(jìn)行認(rèn)證，確認(rèn)用戶是否是有效的系統(tǒng)用戶；進(jìn)而確認(rèn)用戶類型，即驗(yàn)證用戶是管理員用戶還是普通用戶。用戶管理功能模塊的關(guān)系，如圖 3 所示。 各模塊的功能如下圖 1 所示： 圖 1 新聞發(fā)布及管理系統(tǒng)功能模塊圖 功能模塊劃分 本系統(tǒng)中功能模塊之間的關(guān)系如圖 2 所示。 4. 運(yùn)行需求 正常使用時(shí)不應(yīng)出錯(cuò)，若運(yùn)行時(shí)遇到不可恢復(fù)的系統(tǒng)錯(cuò)誤，也必須保證數(shù)據(jù)完好無(wú)損，對(duì)數(shù)據(jù)的精確度、時(shí)間特性、適應(yīng)性等都有一定要求，要求系統(tǒng)運(yùn)行時(shí)能夠保證正確性、可靠性、高效性、完整性、易使用性、可維護(hù) 性、可測(cè)試性、復(fù)用性、安全保密性、可移植性、互聯(lián)性。 3. 開(kāi)發(fā)工具 基于 Web 的系統(tǒng)開(kāi)發(fā)工具應(yīng)使開(kāi)發(fā)者使用各種各樣的技術(shù)來(lái)創(chuàng)建動(dòng)態(tài)的 Web應(yīng)用程序，并且應(yīng)是一個(gè)可視化的工具。 2. 系統(tǒng)平臺(tái) 采用 Browser/Server 體系結(jié)構(gòu)，服務(wù)器端采用 Microsoft Windows 作為網(wǎng)絡(luò)操作系統(tǒng)， Web 服務(wù)器軟件采用 （ Inter Information Server）。 、項(xiàng)目背景 HTML 作為一種樣式語(yǔ)言，隨著 Inter 上信息量的增多和交互性的加強(qiáng)使HTML 顯得越來(lái)越難以勝任的情況之下，在 ASP 編程語(yǔ)言高度發(fā)展的形式下，我們開(kāi)始了對(duì)新聞發(fā)布系統(tǒng)的開(kāi)發(fā)。 第三章 開(kāi)發(fā)環(huán)境及需求分析 、開(kāi)發(fā)目 的 隨著計(jì)算機(jī)技術(shù)的發(fā)展，網(wǎng)絡(luò)技術(shù)對(duì)我們生活和工作顯得月來(lái)越重要，特別是現(xiàn)在信息高度發(fā)達(dá)的今天，人們對(duì)最新信息的需求和發(fā)布迫切的需要及時(shí)性。 JavaScript 和 Java 很類似，但到底并不一樣！ Java 是一種比 JavaScript 更復(fù)雜許多的程式語(yǔ)言，而 JavaScript 則是相當(dāng)容易了解的語(yǔ)言。 綜合所述 JavaScript 是一種新的描述語(yǔ)言，它可以被箝入到 HTML 的文件之中。 實(shí)際上 JavaScript 最杰出之處在于可以用很小的程序做大量的事。 跨平臺(tái)性 JavaScript 是依賴 于瀏覽器本身，與操作環(huán)境無(wú)關(guān)，只要能運(yùn)行瀏覽器的計(jì)算機(jī)，并支持 JavaScript 的瀏覽器就可正確執(zhí)行。比如按下鼠標(biāo)、移動(dòng)窗口、選擇菜單等都可以視為事件。它對(duì)用戶的反映響應(yīng)，是采用以事件驅(qū)動(dòng)的方式進(jìn)行的。從而有效地防止數(shù)據(jù)的丟失。其次它的變量類型是采用弱類型，并未使用嚴(yán)格的數(shù)據(jù)類型。因此，許多功能可以來(lái)自于腳本環(huán)境中對(duì)象的方法與腳本的相互作用。 基于對(duì)象的語(yǔ)言 JavaScript 是一種基于對(duì)象的語(yǔ)言，同時(shí)以可以看作一種面向?qū)ο蟮?。但它不像這些語(yǔ)言一樣，需要先編譯，而是在程序運(yùn)行過(guò)程中被逐行地解釋。像其它腳本語(yǔ)言一樣 ,JavaScript 同樣已是一種解釋性語(yǔ)言，它提供了一個(gè)易的開(kāi)發(fā)過(guò)程。它是通過(guò)嵌入或調(diào)入在標(biāo)準(zhǔn)的 HTML 語(yǔ)言中實(shí)現(xiàn)的。使用它的目的是與 HTML 超文本標(biāo)記語(yǔ)言、 Java 腳本語(yǔ)言（ Java 小程序）一起實(shí)現(xiàn)在一個(gè) Web 頁(yè)面中鏈接多個(gè)對(duì)象，與 Web 客戶交互作用。因此，盡快掌握 JavaScript 腳本語(yǔ)言編程方法是我國(guó)廣大用戶日益關(guān)心的。它是眾多腳本語(yǔ)言中較為優(yōu)秀的一種，它與 WWW 的結(jié)合有效地實(shí)現(xiàn)了網(wǎng)絡(luò)計(jì)算和網(wǎng)絡(luò)計(jì)算機(jī)的藍(lán)圖。 JavaScript 腳本正是滿足 這種需求而產(chǎn)生的語(yǔ)言。 JavaScript 的出現(xiàn)，它可以使得信息和用戶之間不僅只是一種顯示和瀏覽的關(guān)系，而是實(shí)現(xiàn)了一種實(shí)時(shí)的、動(dòng)態(tài)的、可交式的表達(dá)能力。而 JavaScript 的出現(xiàn)，無(wú)凝為 Inter網(wǎng)上用戶帶來(lái)了一線生機(jī)。 然而采用這種超鏈技術(shù)存在有一定的缺陷，那就是它只能提供一種靜態(tài)的信息資源，缺少動(dòng)態(tài)的客戶端與服務(wù)器端的交互。 通過(guò)超文本 (Hyper Text)和超媒體 (Hyper Media)技術(shù)結(jié)合超鏈接 (Hyper link)的鏈接功能將各種信息組織成網(wǎng)絡(luò)結(jié)構(gòu) (web)，構(gòu)成網(wǎng)絡(luò)文檔 (Document)，實(shí)現(xiàn) Inter 上的 “ 漫游 ” 。具體實(shí)現(xiàn)這種手段的支持環(huán)境，那就是 HTML 超文本標(biāo)識(shí)語(yǔ)言。那么怎樣把自己的或公司的信息資源加入到 WWW 服務(wù)器，是廣大用戶日益關(guān)心的問(wèn)題。無(wú)論從管理方面，還是從商業(yè)角度來(lái)看，Inter 都可以帶來(lái)無(wú)限生機(jī)。隨著計(jì)算機(jī)和信息時(shí)代的到來(lái)，人類社會(huì)前進(jìn)的腳步在逐漸加快，每一天都有新的事情發(fā) 生，每一天都在創(chuàng)造著奇跡。 Server2020 簡(jiǎn)介 SQL Server 是一個(gè)關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)它最初是由 Microsoft Sybase 和AshtonTate三家公司共同開(kāi)發(fā)的于 1988 年推出了第一個(gè) OS/2 版本在 Windows NT 推出后 Microsoft 與 Sybase 在 SQL Server 的開(kāi)發(fā)上就分道揚(yáng)鑣了Microsoft 將 SQL Server 移植到 Windows NT 系統(tǒng)上專注于開(kāi)發(fā)推廣 SQL Server 的 Windows NT 版本 Sybase 則較專注于 SQL Server 在 UNIX 操作系統(tǒng)上的應(yīng)用在本書中介紹的是 Microsoft SQL Server 以后簡(jiǎn)稱為 SQL Server 或 MS SQL Server。 PWS（ Personal Web Server）是 Windows 98 里的個(gè)人服務(wù)器組件，但是 PWS 管理功能弱，響應(yīng)速度慢，并且一次與服務(wù)器 連接的用戶數(shù)不超過(guò) 10個(gè)，當(dāng)然現(xiàn)在一般不會(huì)用它來(lái)做服務(wù)器。 ASP 的運(yùn)行環(huán)境 ASP 程序運(yùn)行在支持 ASP 的 Web 服務(wù)器上，由于 ASP 與 Windows 操作系統(tǒng)都是微軟的產(chǎn)品，所以安裝 Windows操作系統(tǒng)的 Web服務(wù)器對(duì) ASP的支持是最好的，這種優(yōu)良的支持表現(xiàn)在兼容性、穩(wěn)定性、功能擴(kuò)展、速度等方面。另外，有的網(wǎng)絡(luò)操作系統(tǒng)不支持 ASP或是支持效果不好，所以 ASP 程序最好放在 Windows操作環(huán)境的 Web服務(wù)器上運(yùn)行。將 ASP 與數(shù)據(jù)庫(kù)集成可以開(kāi)發(fā)出功能強(qiáng)大的交互式動(dòng)態(tài)網(wǎng)站。 ASP 的奇妙之處真是不勝枚舉，總之它是動(dòng)態(tài)網(wǎng)頁(yè)開(kāi)發(fā)技術(shù)中最容易學(xué)習(xí)、靈活性最強(qiáng)的開(kāi)發(fā)工具之一，并且它的功能強(qiáng)大。 ▲ ASP 的源程序由于只在服務(wù)器上運(yùn)行，不會(huì)被傳到客戶端瀏覽器，因而可以避免所寫的源程序被他人剽竊，也提高了程序的安全性。當(dāng)客戶端瀏覽器瀏覽 ASP 頁(yè)時(shí)，服務(wù)器會(huì)將該網(wǎng)頁(yè)文件解釋并轉(zhuǎn)化成標(biāo)準(zhǔn)的 HTML 文件發(fā)送到客戶端瀏覽器，由于送出的是標(biāo)準(zhǔn)的 HTML 文件，所以不存在瀏覽器兼容問(wèn)題。 ▲ ASP 程序運(yùn)行環(huán)境與瀏覽器無(wú)關(guān)。 ▲ ASP 代碼嵌入 HTML 文件中，無(wú)須編譯就可在服務(wù)器端直接解釋執(zhí)行。 ASP 的特點(diǎn) ASP 主要特點(diǎn)表現(xiàn)如下： ▲ 使用 VBScript 、 JavaScript 等簡(jiǎn)單易懂的腳本語(yǔ)言，結(jié)合 HTML 代碼，即可快速地開(kāi)發(fā)網(wǎng)站的應(yīng)用程序。 ASP 的源程序碼在服務(wù)器端執(zhí)行，代碼保密性好。 此外， ASP 技術(shù)的另一個(gè)重要特點(diǎn)是 ，