前言：本站為你精心整理了校園網(wǎng)站設(shè)計(jì)范文，希望能為你的創(chuàng)作提供參考價(jià)值，我們的客服老師可以幫助你提供個(gè)性化的參考范文，歡迎咨詢。

校園網(wǎng)站設(shè)計(jì)

時(shí)間：2004-03-17作者：

目錄

第一章：諸論………………………………………………………………..1

1．1設(shè)計(jì)思想……………………………………………………………………………………1

1．2開發(fā)工具的選用及介紹……………………………………………………………………….1

第二章：網(wǎng)站總體分析與設(shè)計(jì)2

2．1網(wǎng)站系統(tǒng)分析………………………………………………………………………………………….2

2．2、主頁設(shè)計(jì)3

2．3、數(shù)據(jù)庫設(shè)計(jì)4

第三章：詳細(xì)設(shè)計(jì)4

3．1家長學(xué)校聯(lián)絡(luò)簿………………………………………………4

3．2網(wǎng)上圖書館11

3.3網(wǎng)上評優(yōu)投票系統(tǒng)20

3．4達(dá)級考試在線查分系統(tǒng)與計(jì)數(shù)器的制作………………………22.

第四部分：系統(tǒng)的使用說明與安裝25

第五部分：參考文獻(xiàn)：26

附錄：源文件代碼27

第一章諸論

在Internet飛速發(fā)展的今天，互聯(lián)網(wǎng)成為人們快速獲取、和傳遞信息的重要渠道，它在人們政治、經(jīng)濟(jì)、生活等各個(gè)方面發(fā)揮著重要的作用。Internet上信息主要是通過網(wǎng)站來實(shí)現(xiàn)的，獲取信息也是要在Internet“海洋”中按照一定的檢索方式將所需要的信息從網(wǎng)站上下載下來。因此網(wǎng)站建設(shè)在Internet應(yīng)用上的地位顯而易見，它已成為政府、企事業(yè)單位信息化建設(shè)中的重要組成部分，從而倍受人們的重視。為了更好的辦學(xué)，提高學(xué)校知名度，特構(gòu)建長沙市工商職業(yè)中專學(xué)校網(wǎng)站。

1．1設(shè)計(jì)思想

通過網(wǎng)站，全面宣傳，展示學(xué)校風(fēng)采、優(yōu)點(diǎn)與特色，學(xué)校的重大活動安排與招生政策，增強(qiáng)家長與學(xué)校之間的聯(lián)系，在Internet上實(shí)現(xiàn)完成部分校務(wù)，提高辦事效率。

1.2開發(fā)工具的選用及介紹

ASP的優(yōu)勢：

ActiveServerPages：“動態(tài)服務(wù)器網(wǎng)頁”，一般簡稱為“ASP”，ASP之所以能受到大家的重視與使用的原因，主要在于所產(chǎn)生的執(zhí)行結(jié)果都是標(biāo)準(zhǔn)的HTML格式，而且這些程序是在網(wǎng)絡(luò)服務(wù)端中執(zhí)行，使用一般的瀏覽器（如IE或Netscape）都可以正確地獲得ASP的“執(zhí)行”結(jié)果，并且將這ASP執(zhí)行的結(jié)果直接在瀏覽器中“瀏覽”，不像VBScript或javascript是在客戶端（Client）的瀏覽器上執(zhí)行，若使用VBScript來設(shè)計(jì)程序，客戶端（Client）在IE瀏覽器中可以顯示程序執(zhí)行的結(jié)果，可是，客戶端（Client）若使用Netscape瀏覽器就無法顯示VBScript的執(zhí)行結(jié)果。

ASP的特點(diǎn)：

任何開發(fā)工具皆可發(fā)展ASP

只要使用一般的文書編輯程序，如Windows記事本，就可以編輯。當(dāng)然，其他網(wǎng)頁發(fā)展工具，例如，F(xiàn)rontPageExpress、FrontPage等也都可以；不過還是建議你用記事本來寫，既省錢又方便，若是使用那些所見即所得的網(wǎng)頁編輯來寫ASP，可能會發(fā)生一些意想不到的離奇狀態(tài)。

通吃各家瀏覽由于ASP程序是在網(wǎng)絡(luò)服務(wù)器端中執(zhí)行，執(zhí)行結(jié)果所產(chǎn)生的HTML文件適用于不同的瀏覽器。

語言相容性高

ASP與所有的ActiveXScript語言都相容，除了可結(jié)合HTML，VBScript、JavaScript、ActiveX服務(wù)器組件來設(shè)計(jì)外，并可經(jīng)由“plug-In（外掛組件模組）的方式，使用其他廠商（ThirdParty）所提供的語言。

隱密安全性高

如果我們在瀏覽器中直接查看網(wǎng)頁的原始代碼，就只能看到HTML文件，原始的ASP程序代碼是看不到的！這是因杰ASP程序先于網(wǎng)站服務(wù)（WebServer）端執(zhí)行后，將結(jié)果轉(zhuǎn)換成標(biāo)準(zhǔn)HTML文件，再傳送到客戶端（Client）的瀏覽器上，因此，我們所辛苦撰寫的ASP程序并不會輕易地被看見進(jìn)而被盜用。

易于操控?cái)?shù)據(jù)庫

ASP可以輕易地通過ODBC(OpenDatabaseConnectivity)驅(qū)動程序連接各種不同的數(shù)據(jù)庫，例如：Acess、Foxpro、dBase、Oracle等等，另外，ASP亦可將“文本文件”或是”Excel”文件當(dāng)成數(shù)據(jù)庫用。

面向?qū)ο髮W(xué)習(xí)容易

ASP具備有面向?qū)ο螅∣bject-Oriented）功能，學(xué)習(xí)容易，ASP提供了五種方便能力強(qiáng)大的內(nèi)建對象：Request、Response、Sever、Application以及Session，同時(shí)，若使用ASP內(nèi)建的“Application”對象或”Session”對象所撰寫出來的ASP程序可以在多個(gè)網(wǎng)頁之間暫時(shí)保存必要的信息。

ASP的六大內(nèi)部對象

對象名稱功能描述

RequestResponseServerSessionApplicationObjectContext從客戶端取得信息將信息送給客戶端提供一些Web服務(wù)器工具儲存在一個(gè)Session內(nèi)的用戶信息，該信息僅可被該用戶訪問在一個(gè)ASP-Application中讓不同的客戶端共享信息可以用來配合MicrosoftTransaction服務(wù)器進(jìn)行分布式事務(wù)處理

所以我選擇了ASP結(jié)合Frontpage架構(gòu)長沙市工商職業(yè)中專學(xué)校網(wǎng)站

第二章網(wǎng)站總體分析與設(shè)計(jì)

2．1網(wǎng)站系統(tǒng)分析

根據(jù)前面的設(shè)計(jì)思想進(jìn)行分析，按照系統(tǒng)開發(fā)的基本觀點(diǎn)對網(wǎng)站進(jìn)行分解，從內(nèi)容上可對網(wǎng)站作如下劃分：

l學(xué)校風(fēng)采通過學(xué)校概括、教師風(fēng)采、校園之星及部分圖片等內(nèi)容來展現(xiàn)。

l優(yōu)點(diǎn)特色通過新聞、生動活潑的教育教學(xué)欄目來展現(xiàn)。

l信息通過公告欄、信息查詢等欄目來實(shí)現(xiàn)，內(nèi)容有招生政策、

活動安排等。

l部分校務(wù)根據(jù)校務(wù)的公開程度與參與人數(shù)的多少，特選擇圖書管

理、評優(yōu)、考試查分、家校聯(lián)系四大校務(wù)在網(wǎng)上實(shí)現(xiàn)。

2.2主頁設(shè)計(jì)

網(wǎng)站主頁采用靜、動相結(jié)合的方式，即靜態(tài)的主畫面和動態(tài)的圖片相結(jié)合，體現(xiàn)學(xué)校的勃勃生氣，靜態(tài)主頁方式介紹學(xué)校風(fēng)采、優(yōu)點(diǎn)特色、信息，對于四大校務(wù)，就得利用ASP與數(shù)據(jù)庫結(jié)合的技術(shù)建立數(shù)據(jù)庫查詢管理系統(tǒng)，采用交互式的動態(tài)的web畫面來實(shí)現(xiàn)。

主頁結(jié)構(gòu)圖

注：帶下劃線的表示是鏈接方式

2．3數(shù)據(jù)庫設(shè)計(jì)

采用的數(shù)據(jù)庫是MicrosoftAccess，擬建立teach.mdb庫文件，包含如下幾個(gè)表文件：

allmessage留言信息表

Libbooks圖書信息表

Libcategories圖書類別信息表

Libemps圖書館用戶信息表；

stud學(xué)生信息表

第三章詳細(xì)設(shè)計(jì)

3．1家長學(xué)校聯(lián)絡(luò)簿

3．1．1功能：

利用SQL語法過濾特定的家長留言意見，讓老師可以針對某位特定學(xué)生家長所發(fā)表的意見作出獨(dú)立的回答，同時(shí)，家長在發(fā)表個(gè)人意見時(shí)，若認(rèn)為意見內(nèi)容涉及敏感的話題或是意見內(nèi)容涉及私人隱私，都可用“悄悄話”的方式發(fā)言，這些“悄悄話”將不會被顯示出來讓大家看到，當(dāng)然，老師擁有管理的能力，只要以密碼登錄管理模式，就可以進(jìn)行各個(gè)學(xué)生家長的單獨(dú)意見回復(fù)，而且還能看到家長們所留下的“悄悄話”。

3．1．2組成構(gòu)造

共分成六大部分：

1，意見留言結(jié)果網(wǎng)頁guest.asp：用來顯示家長發(fā)言與老師回復(fù)內(nèi)容，同時(shí)還具備一般模式與管理模式兩種顯示方法。

2，家長發(fā)言表單網(wǎng)頁addmsg.asp：讓學(xué)生家長填寫發(fā)言內(nèi)容并選擇發(fā)言性質(zhì)。

3，家長發(fā)言數(shù)據(jù)處理ASP程序add.asp：處理家長發(fā)表的意見數(shù)據(jù)，同時(shí)將這些意見數(shù)據(jù)記錄起來并將網(wǎng)頁顯示轉(zhuǎn)向至意見留言結(jié)果網(wǎng)頁。

4，老師回復(fù)表單網(wǎng)頁teachans.asp：讓老師針對某位特定學(xué)生家長所發(fā)表的意見作出獨(dú)立的回答。

5，老師回復(fù)數(shù)據(jù)處理ASP程序anssave.asp：處理老師回復(fù)的數(shù)據(jù)內(nèi)容，同時(shí)將這些意見數(shù)據(jù)起來并將網(wǎng)頁顯示轉(zhuǎn)向至意見留言結(jié)果網(wǎng)頁。

6，數(shù)據(jù)表文件allmessage：用來儲存家長發(fā)言數(shù)據(jù)與老師回復(fù)數(shù)據(jù)的Access類型數(shù)據(jù)庫文件。

“數(shù)據(jù)表文件”負(fù)責(zé)存放家長發(fā)言數(shù)據(jù)與老師回復(fù)內(nèi)容的數(shù)據(jù)記錄，為Access類型的庫文件，將它定名為：“message.mdb”。

下圖為家庭聯(lián)絡(luò)簿的組成與流程圖：

老師回復(fù)

家長留言

讀入寫入

寫入

3．1．3數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)

數(shù)據(jù)庫文件”teach.mdb“中的數(shù)據(jù)表”allmessage“的欄目設(shè)置，如下圖：

字段名字段類型

3．1．4界面設(shè)計(jì)與重點(diǎn)、難點(diǎn)代碼的設(shè)計(jì)

數(shù)據(jù)庫與留言顯示程序網(wǎng)頁

家長發(fā)言與老師回復(fù)的內(nèi)容數(shù)據(jù)全部儲存在數(shù)據(jù)庫中，要在網(wǎng)頁中顯示目前的家長發(fā)言與老師回復(fù)數(shù)據(jù)，必須先進(jìn)行數(shù)據(jù)庫的鏈接與打開，要鏈接數(shù)據(jù)庫我們必須使用ADO對象群的Connection對象；而要打開數(shù)據(jù)庫則必須使用ADO對象群的Recordset對象，程序：

setcn=server.createobject("adodb.connection")

cn.open"filedsn=c:\programfiles\commonfiles\odbc\datasources\msaccessdatabase.dsn"

setrs=server.createobject("adodb.recordset")

sql="select*fromallmessageorderby留言時(shí)間desc"

rs.opensql,cn,1,1

Recordset對象是負(fù)責(zé)瀏覽與操作從數(shù)據(jù)庫取出來的數(shù)據(jù)，Connection對象只負(fù)責(zé)與數(shù)據(jù)庫進(jìn)行鏈接的動作，并不能使用數(shù)據(jù)庫內(nèi)的數(shù)據(jù)，因此必須建立一個(gè)可以存取數(shù)據(jù)庫數(shù)據(jù)的Recordset對象，

使用RS.Open方法存取”teach.mdb”數(shù)據(jù)庫

RS.OpenSQL,CN,1,1

使用open方法來打開數(shù)據(jù)表或執(zhí)行Select指令參數(shù)設(shè)置如下：

1，參數(shù)一（SOURCE）:為欲打開的數(shù)據(jù)表或SQL指令。

2，參數(shù)二（ActionConnection）:指定一個(gè)已打開的數(shù)據(jù)庫對象，將此參數(shù)設(shè)為鏈接我們已經(jīng)建立好的Connection對象“CN”。

3，參數(shù)三（CursorType）：指定Recordset的打開類型，1為可讀寫且可自由移動。

4，參數(shù)四（LockType）:指定鎖定類型，1為只讀。

數(shù)據(jù)排序與SQL指令

1．Select指令的篩選語句：

格式：Select…From

在SQL語言中：“Select”數(shù)據(jù)表“中選取某些“欄位”的數(shù)據(jù).

2.如果要選取的數(shù)據(jù)表數(shù)據(jù)包含了一個(gè)以上的欄位，則我們可以利用“，”逗號來欄位名稱隔開。

3．如果要選取的數(shù)據(jù)表數(shù)據(jù)包含了全部的欄位，則可以利用萬用字符“*”來代表全部的欄位。

可排序數(shù)據(jù)的Select指令

1．當(dāng)我們希望被選取出來的數(shù)據(jù)記錄數(shù)據(jù)能夠依據(jù)某個(gè)或某幾個(gè)欄位的內(nèi)容來排序時(shí)，只要將這些排序依據(jù)的欄位擺放在“OrderBy“保留字之后，然后將這處排序的語句連接在”Select…From“后面就行了。

2．“OrderBy“默認(rèn)的排序方式是“由小排到大”，但若是希望排序方式是“由大排到小”，則我們可在欄位名稱后再加上“Desc“保留字！將排序方式改為”由大排到小“。

在“顯示留言意見”網(wǎng)頁中的打開數(shù)據(jù)庫ASP程序中的語句：

SELECT*Fromallmessageorderby留言日期Desc

功能為：從數(shù)據(jù)表“allmessage“中取出所有欄位的數(shù)據(jù)，并將取出的數(shù)據(jù)記錄內(nèi)容依照”留言日期“欄位使用的”由大排到小“排序方式進(jìn)行排序。

留言顯示網(wǎng)頁的管理模式

“顯示留言意見”的網(wǎng)頁就必須具備顯示模式選擇的功能，當(dāng)顯示模式在一般情況時(shí)要能顯示家長們的一般性發(fā)言，同時(shí)還得將“悄悄話“的發(fā)言隱藏起來。當(dāng)老師以密碼登錄成為管理模式時(shí)，則必須將一般性發(fā)言與悄悄話發(fā)言的數(shù)據(jù)全部顯示出來，同時(shí)還得讓老師們可以針對某位特定學(xué)生家長所發(fā)表的意見作出獨(dú)立的回答。

這兩個(gè)情況是通過密碼登錄管理模式的ASP程序?qū)崿F(xiàn)的：

<formmethod="post">

<%ifsession("checkedit")="yes"then%>

<inputtype="hidden"value="yes"name="goexit">

<inputtype="submit"value="離開管理模式">

<%else%>

密碼：<inputtype="password"name="password"size="4"maxlength="4"><inputtype="submit"value="教師管理">

<%endif%>

</form>

在這段網(wǎng)頁語句中，利用Session對象來記錄目前的工作模式。當(dāng)我們第一次進(jìn)入“顯示留言意見”網(wǎng)頁的時(shí)候，我們所見的網(wǎng)頁畫面一定是一般！因?yàn)镾ession尚未被建立，因此它的“變量”值一定不會是“yes”，所以網(wǎng)頁中會出現(xiàn)一個(gè)輸入密碼進(jìn)入“教師管理”模式的欄位，只有當(dāng)我們輸入密碼按下“教師管理”的按鈕組織上發(fā)ASP程序中的進(jìn)入管理模式語句后，Session對象才會被建立，同時(shí)，“checkedit“Session對象變量值被設(shè)置為“yes“，所以我們就進(jìn)入了能將一般性發(fā)言與悄悄話發(fā)言的數(shù)據(jù)全部顯示出來，同時(shí)還讓教師們可以針對某位特定學(xué)生家長所發(fā)表的意見作出獨(dú)立回答的管理模式頁面。

留言顯示網(wǎng)頁的分頁

當(dāng)家長的發(fā)言與老師回復(fù)的數(shù)據(jù)筆數(shù)太多時(shí)，一次要將全部的數(shù)據(jù)內(nèi)容顯示在網(wǎng)頁中，等待網(wǎng)頁下載的時(shí)間太長了，因此采用固定筆數(shù)分頁瀏覽方式來顯示網(wǎng)頁。

要進(jìn)行分頁顯示，得先知道目前有多少筆的留言數(shù)據(jù)，而留言數(shù)據(jù)筆數(shù)可以通過Recordset對象的“Recordcount“（記錄個(gè)數(shù)）屬性得知，我們將每10筆數(shù)據(jù)為一單位分頁顯示：

count=rs.recordcount

ifcount/10>(count\10)then

totalpage=(count\10)+1

elsetotalpage=(count\10)

endif

“/”為浮點(diǎn)數(shù)除法，“\”為整數(shù)除法。

跳頁選擇的ASP程序語句

所有的發(fā)言數(shù)據(jù)采用固定筆數(shù)分頁瀏覽的方式來顯示后，還要提供一個(gè)跳頁鏈接顯示的功能，讓瀏覽者可以選擇希望瀏覽的頁次進(jìn)得瀏覽，ASP程序語句：

pagecount=0

rs.movefirst

ifrequest.querystring("topage")<>""thenpagecount=cint(request.querystring("topage"))

ifpagecount<=0thenpagecount=1

ifpagecount>totalpagethenpagecount=totalpage

rs.move(pagecount-1)*10

發(fā)言表單網(wǎng)頁制作

insetu3

表單的參數(shù)

表單的Action參數(shù)：Action參數(shù)是用來指定Server端處理此一表單數(shù)據(jù)內(nèi)容的程序，此處表單處理ASP程序?yàn)椤癮dd.asp“，

表單的Mothed參數(shù)：要將表單傳送至Server端的方式有兩種，設(shè)置值分別為GET及POST，若設(shè)置為POST，則瀏覽器會等Server端來讀取數(shù)據(jù)，若設(shè)置為GET，則當(dāng)我們按下送出按鈕時(shí)，瀏覽器會立即將表單中的數(shù)據(jù)內(nèi)傳送出去。利用POST方法，在傳送的數(shù)據(jù)上將不受限制，利用GET方法傳送的數(shù)據(jù)量則大約只有2K左右。

留言處理程序

要將家長發(fā)言數(shù)據(jù)作后續(xù)處理及將這些數(shù)據(jù)內(nèi)容存入數(shù)據(jù)庫，須利用添加數(shù)據(jù)記錄的InsertInto指令，然后再寫入數(shù)據(jù)庫文件中：

Insetinto指令語句格式：

Insertinto數(shù)據(jù)表名（欄目名）values（欄目值）

sql="insertintoallmessage(家長姓名,留言主題,聯(lián)絡(luò)信箱,留言內(nèi)容,私人公開,留言時(shí)間,班級)values("

sql=sql&"''''"&parent&"'''',"

sql=sql&"''''"&subject&"'''',"

sql=sql&"''''"&email&"'''',"

sql=sql&"''''"&memo&"'''',"

sql=sql&"''''"&personal&"'''',"

sql=sql&"''''"&now&"'''',"

sql=sql&"''''"&bj&"'''')"

cn.executesql

回復(fù)表單程序網(wǎng)頁

必須讓老師們可以針對某位特定學(xué)生家長所發(fā)表的意見作出獨(dú)立的回答,

使用Select…From…Where篩選語句

sql="select*fromallmessagewhere(編號="&ID&")"

rs.opensql,cn,1,3

然后將特定的家長發(fā)言數(shù)據(jù)放在表單，方法是將數(shù)據(jù)庫中的數(shù)據(jù)取出來，然后放在表單欄位中：

“家長姓名“欄位網(wǎng)頁語句標(biāo)簽

<tdbgcolor="#CCCCFF"><fontsize="2"><%=RS("家長姓名")%><font></td>

“留言主題“欄位網(wǎng)頁語句標(biāo)簽

<tdbgcolor="#CCCCFF"><fontsize="2"><%=RS("留言主題")%></font></td>

“留言內(nèi)容“欄位網(wǎng)頁語句標(biāo)簽

<tdbgcolor="#CCCCFF"><fontsize="2"><%=RS("留言內(nèi)容")%><font></td>

老師在回復(fù)欄位中所填入的數(shù)據(jù)，必須送給處理老師回復(fù)數(shù)據(jù)的ASP程序”anssave.asp”來記錄以及處理這些回復(fù)數(shù)據(jù)。當(dāng)老師填寫好回復(fù)發(fā)言的數(shù)據(jù)后按下“送出回復(fù)”按鈕后，表單中的數(shù)據(jù)內(nèi)容就會以“POST”的方式由SEVER端讀取，然后將數(shù)據(jù)內(nèi)容交由處理老師回復(fù)數(shù)據(jù)的ASP程序“anssave.asp”來將數(shù)據(jù)內(nèi)容寫入數(shù)據(jù)庫。

3．2網(wǎng)上圖書館

網(wǎng)上圖書館將學(xué)校圖書館圖書放到網(wǎng)絡(luò)上供人借閱，這樣不僅方便了校內(nèi)的學(xué)生與教職員工使用圖書館的資源,還為圖書館管理員提供了一種簡便地管理圖書館的方法.

3．2．1功能

網(wǎng)上圖書館系統(tǒng)可以進(jìn)行圖書的出借和歸還.還可以在系統(tǒng)中按照多種字段對圖書進(jìn)行查找,還可以瀏覽某個(gè)種類的所有圖書.該應(yīng)用程序也為圖書館管理員提供了一些功能,如添加、編輯以及刪除圖書等，或者在分類層次結(jié)構(gòu)中添加新的種類。

3．2．2系統(tǒng)的層次結(jié)構(gòu)

下圖的每個(gè)方框代表校園圖書館網(wǎng)站中的一個(gè)頁面。除了只包含HTML的Search頁面外，其他的均為ASP頁面。因?yàn)槊總€(gè)圖書的頁面都不同，所以大多數(shù)的頁面實(shí)際上都是多頁面。

3.2.3數(shù)據(jù)庫設(shè)計(jì)

本系統(tǒng)共使用3個(gè)數(shù)據(jù)表：

LibBooks表包含與圖書有關(guān)的所有數(shù)據(jù)。該表中的字段內(nèi)容的圖書的通用信息。另外，對于已經(jīng)出借的圖書，該表中還包含借閱該圖書的用戶的ID號，以及圖書的狀態(tài)。

表視圖如下：

字段名意義字段類型字段名意義字段類型

bookid書號(主鍵)數(shù)字(nonull)status狀態(tài)文本

title書名文本checkedoutto用戶id數(shù)字

author著者文本reservedby用戶學(xué)號數(shù)字

Subject主題文本description描述文本

IsbnIsbn號文本keywords關(guān)鍵字文本

LibCategories表包含Library中的所有類別，在訪問者瀏覽圖書列表時(shí)將會用到這些類別。每個(gè)類別都可以作為另外類別的父類別。有一個(gè)特殊的類別，Top-Level,沒有出現(xiàn)在類別列表中，但是可以作為其他任何類別的父類別。

字段名意義字段類型

Categoryname類別文本(noll)

parentcategory父類別文本(noll)

LibEmps表包含可以訪問圖書館網(wǎng)站的用戶信息。該表包含一些通用的信息字段，比如用于進(jìn)入圖書館的用戶密碼等。

字段名意義字段類型字段名意義字段類型

empid用戶id(主鍵nonull)數(shù)字password用戶密碼文本

Empname用戶姓名文本manager管理員代號數(shù)字

emailaddress用戶郵箱文本

圖書館數(shù)據(jù)庫的數(shù)據(jù)關(guān)系如圖9-22所示。其中表LibEmps和表LibCategories與表LibBooks之間都是一對多的關(guān)系。每個(gè)雇員都可以借閱多本圖書，每個(gè)類別都可以包含多本圖書。

3.2.3界面設(shè)計(jì)與重點(diǎn)代碼的設(shè)計(jì)

網(wǎng)上圖書館系統(tǒng)有兩種用戶，一是管理員。另一種是只允許使用圖書館系統(tǒng)，而沒有管理功能的一般用戶。訪問者進(jìn)入網(wǎng)站，首先要進(jìn)行登錄，如下圖所示。登錄頁面（index.asp）

訪問者輸入E－mail地址和密碼來登錄，然后單擊“登錄”按鈕。輸入的數(shù)據(jù)提交后與數(shù)據(jù)庫中的用戶表進(jìn)行匹配。

須創(chuàng)建一個(gè)記錄來保存基于訪問者登錄的用戶信息

setRSFindEmp=conn.Execute("selectEmpID,ManagerfromLibEmpswhere"_

&"EmailAddress=''''"&Request.Form("EmailAddress")&"''''and"_

&"Password=''''"&Request.Form("Password")&"''''")

ifRSFindEmp.EOFthen

TheMessage="密碼或email地址不對."

else

Session("EmpID")=RSFindEmp("EmpID")

Session("Manager")=RSFindEmp("Manager")

Response.Redirect"../yk.htm"

endif

表單域EmailAddress和Password用于Where了句中來獲取一個(gè)記錄。如果訪問者輸入了一個(gè)無效的用戶名，則記錄集中將不會返回匹配的記錄。我們可以通過查看EOF標(biāo)記來判斷一個(gè)記錄集是否為空。為空，則訪問者將被拒絕進(jìn)入該系統(tǒng)。不為空，則訪問者的EmpID值和Manager值將從記錄集中返回。寫入Session變量，變量將在整個(gè)網(wǎng)站的所有網(wǎng)頁中都是有效的。這些變量的存在與否及其取值將用于確定是否允許進(jìn)入一個(gè)特定的網(wǎng)頁，同時(shí)也用于訪問者進(jìn)行書目的歸還和借閱操作。

圖書館菜單頁面

圖書館菜單頁面包含指向其他4個(gè)頁面的鏈接：管理頁面、搜索頁面、圖書列表頁面和主頁面。還有一個(gè)可顯示用戶所借書籍的按紐。如果訪問者是圖書館管理員，則菜單界面如圖所示。如果訪問者不是圖書館管理員，則看到如圖所示的界面。非管理員的訪問者的界面上沒有指向管理員菜單頁面的鏈接。

實(shí)現(xiàn)辦法：訪問者登錄時(shí)在登錄頁面上的創(chuàng)建的會話變量Session用于從數(shù)據(jù)庫中獲取訪問者的有關(guān)信息，表示它是否是管理員。如果值為1，就表明訪問者是一個(gè)管理員，則用如下代碼寫入一個(gè)指向管理員頁面的鏈接：

<%IfSession("Manager")=1then%>

<AHREF="../html/management_menu.asp">管理員菜單</A>

<%endif%>

通過按紐B1是否為空來判斷要不要顯示用戶所借圖書，利用一個(gè)記錄集來獲取訪問者已經(jīng)借出了的所有圖書的列表。

ifNOTisempty(Request.Form("B1"))then

setRSBooks=conn.Execute("selectBookID,TitlefromLibBookswhere"_

&"CheckedOutTo="&Session("EmpID"))

endif

再用循環(huán)語句將所借書以表格形式顯示出來。

<tableborder=1width="90%">

<%ifNOTisempty(Request.Form("B1"))then

DoUntilRSBooks.EOF%>

<TR>

<TDWIDTH=40%height="20"><%Response.WriteRSBooks("Title")%></td></tr>

<%RSBooks.MoveNext

loop

endif

%>

</table>

循環(huán)將遍歷Rsbooks記錄集中的每個(gè)記錄，直到該記錄集結(jié)束：

該網(wǎng)站中的所有ASP頁面都會在訪問者訪問之前對其進(jìn)行登錄檢查。這樣就可以避免訪問者通過輸入某個(gè)頁面地址然后在沒有登錄的情況下直接進(jìn)入該頁面的情況發(fā)生。此外，每個(gè)管理頁面都要確認(rèn)訪問者是管理員。公務(wù)員之家版權(quán)所有

管理菜單頁面

管理菜單頁面有一個(gè)HTML表單，根據(jù)選擇的按鈕的不同，可以進(jìn)行5種不同的操作：圖書的歸還、圖書的編輯、圖書的刪除、圖書的添加和類別的添加。不管選擇了哪一個(gè)按鈕，該表單都提交人其自身進(jìn)行處理。

要進(jìn)行圖書的歸還、圖書的編輯、圖書的刪除三種操作，須先進(jìn)行搜索，找到該書后，由圖書Book.asp返回一個(gè)鏈接：

<%IfSession("Manager")=1then%>

<AHREF="../html/management_menu.asp?title=<%response.writeRSBooks("Title")%>&BOOKID=<%response.writeRSBooks("BOOKID")%>">管理員菜單</A>

<%endif%>

而管理者頁面通過下列語句

<%=request.querystring("title")%>

<inputzztype=hiddenname="BOOKID1"value="<%=request.querystring("BOOKID")%>>

這樣就將所找到的書的書號BookID、書名Title傳遞管理者頁面。再進(jìn)行所須操作。共有3個(gè)不同的銨紐，可以進(jìn)行3種操作。若單擊“修改”鈕：

則重定向到編輯圖書頁面，同時(shí)把Bookid傳遞給該頁面。

Response.Redirect"./edit_book.asp?BOOKID="&request("BOOKID1")

將其他的情況需要建立到數(shù)據(jù)庫的連接：

setconn=server.createobject("adodb.connection")

Conn.Open("FILEDSN=c:\ProgramFiles\CommonFiles\ODBC\DataSources\msaccessdatabase.dsn")

ifNOTisempty(Request.Form("Delete"))andrequest("BOOKID1")<>""then

conn.Execute"deletefromLibBookswhereBOOKID="&request("BOOKID1")

endif

if(NOTisempty(Request.Form("checkin")))andrequest("BOOKID1")<>""then

conn.Execute"updateLibBookssetcheckedoutto=0,status=''''Available''''whereBookID="&Request("BOOKID1")

endif

頁面中的添加新的種類部分包含一個(gè)文本控件和一個(gè)選擇控件。其中選擇控件是用所有已經(jīng)存在的類別列表進(jìn)行填充的，包括特殊類別Toplevel，該類別表明當(dāng)前類別是處于類別層次結(jié)構(gòu)中的最頂層。代碼如下：

先用一個(gè)記錄集來填充父類別選擇控件：

setRSCategories=conn.Execute("selectCategoryNamefromLibCategoriesorderbyCategoryName")

再用下列循環(huán)語句：

<%

DoUntilRSCategories.EOF

%>

<OPTIONVALUE="<%response.writeRSCategories("CategoryName")%>"><%response.writeRSCategories("CategoryName")%></OPTION>

<%

RSCategories.MoveNext

Loop

%>

遍歷RSCategories記錄集中的每個(gè)記錄，并作為一個(gè)選項(xiàng)添加到列表中，而記錄集中CategoryName同時(shí)作為顯示值和傳遞值：

本頁面還包含一個(gè)指向添加圖書頁面的鏈接。

搜索結(jié)果頁面

搜索頁面的代碼獲取與訪問者查找規(guī)則相匹配的圖書，然后將這些圖書顯示給訪問者。

搜索頁面上的表單包含一個(gè)選擇控件和一個(gè)文本控件。選擇控件中的選項(xiàng)是用可搜索的字段填充的：

需要用一個(gè)記錄集來保存與訪問者的查找規(guī)則相匹配的記錄：

setRSBooks=conn.Execute("selectBookID,Author,Title,SubjectfromLibBookswhere"_

&Request.Form("SearchField")&"Like''''%"&Request.Form("SearchCriteria")&"%''''")

注意：，符號%表示的是一個(gè)廣義搜索。這一點(diǎn)類似于ACCESS中的符號*。

然后將所找到的書以表格形式顯示出來。代碼如下：

<%DoUntilRSBooks.EOF%>

<TRVALIGN="top"ALIGN="left">

<TDWIDTH=40%height="20"><B>書名:</B><AHREF="../html/book.asp?BookID=<%Response.WriteRSBooks("BookID")%>"><%Response.WriteRSBooks("Title")%></A></TD>

<tdwidth=20%height="20"><B>著者:</B><%Response.WriteRSBooks("Author")%></td>

<tdwidth=30%height="20"><B>主題:</B><%Response.WriteRSBooks("Subject")%></td>

<%RSBooks.MoveNext

Loop%>

圖書頁面

圖書頁面的代碼顯示圖書的有關(guān)信息，以及管理圖書的出借操作。

該頁面通過Querystring傳遞BookID

ifisempty(Request.QueryString("BookID"))then

Response.Redirect"./search.html"

endif

如果其中不存在，則訪問者將被重定向到搜索頁面：

如果同時(shí)傳遞表單中包含的變量Action不為空，則表明訪問者正借閱該圖書：

ifNotisempty(Request.QueryString("Action"))then

在這種情況下，需要將圖書狀態(tài)改為Checkout,同時(shí)需要將Checkedoutto字段修改為該訪問者：

conn.Execute"updateLibBookssetStatus=''''CheckedOut'''',"_

&"CheckedOutTo="&Session("EmpID")&"whereBookID="_

&Request.QueryString("BookID")

Response.Redirect"./library_menu.asp"

endif

然后將該訪問者重定到圖書館菜單頁面：

下一步，利用圖書的狀態(tài)來確定不同的鏈接

未借出時(shí)鏈接如下：

ifRSBooks("status")="Available"then

LinkText="<AHREF=""../html/book.asp?Action=CheckOut&BookID="_

&Request.QueryString("BookID")&""">借這本書</A>"

如果圖書已經(jīng)借出，就創(chuàng)建一個(gè)不同的消息，并將鏈接設(shè)置為指向Librarymenu頁面：

LinkText="<AHREF=""../html/library_menu.asp"">圖書已出借，返回主菜單。</A>"

最后根據(jù)是否是管理員，顯示管理員菜單鏈接。

<%IfSession("Manager")=1then%><AHREF="../html/management_menu.asp?title=<%response.writeRSBooks("Title")%>&BOOKID=<%response.writeRSBooks("BOOKID")%>">管理員菜單</A><%endif%>

3.3網(wǎng)上評優(yōu)投票系統(tǒng)

3.3.1功能：

能實(shí)現(xiàn)全校性的評選，快捷、公平，且有效，不允許做票。

3.3.2組成構(gòu)造

這個(gè)系統(tǒng)由3個(gè)部分組成——投票頁面vote.htm，處理投票結(jié)果的腳本，顯示投票頁面。

3．3．3數(shù)據(jù)表的設(shè)計(jì)：

3．3．4界面設(shè)計(jì)與重點(diǎn)、難點(diǎn)代碼設(shè)計(jì)

投票頁面

該頁面是一個(gè)純HTML文件，它讓用戶選擇自己想選舉的候選人，并填寫自己的詳細(xì)資料，以確認(rèn)投票的有效性。頁面顯示如圖所示。

表單處理腳本

在vote.htm中各項(xiàng)數(shù)據(jù)都填寫完畢后，單擊確定投票按鈕，表單的數(shù)據(jù)就被提交，

本次評優(yōu)共有4個(gè)候選人，但只能選兩個(gè)。故用復(fù)選框。

投票的有效性通過是否是本校學(xué)生，且是否投過票來判斷。

ifrequest("passno")<>""then

sql="select*fromstudwherepassword="&"''''"&request("passno")&"''''"&"andyitu=0"

setrs=cn.execute(sql)

ifrs.eofthen%>

<h2align=center><%response.write"你無權(quán)投票"%></h2>

本設(shè)計(jì)允許少選，不允許多選。通過判斷Vote投票界面?zhèn)鬟f過來的復(fù)選按紐值的長度看是否多選。

vo=request("cand")

iflen(vo)>4then%>

<h2align=center><%response.write"多選了，無效"%></h2>

然后根據(jù)所投的票將對應(yīng)候選人的投票結(jié)果字段加1，同時(shí)將該投票人的已投字段置為1。

sqq="updatestudsetyitu=1wherepassword="&"''''"&request("passno")&"''''"

cn.execute(sqq)

ifinstr(vo,"1")then

cn.execute("updatestudsetresult=result+1wherename=''''李寧''''")

endif

ifinstr(vo,"2")then

cn.execute("updatestudsetresult=result+1wherename=''''楊蘭''''")

endif

ifinstr(vo,"3")then

cn.execute("updatestudsetresult=result+1wherename=''''江道明''''")

endif

ifinstr(vo,"4")then

cn.execute("updatestudsetresult=result+1wherename=''''段啟文''''")

endif%>

顯示當(dāng)前投票情況show.asp

由于投票處理頁面已經(jīng)完成了絕大部分的工作，所以顯示結(jié)果頁面就很簡單了，其功能是從Stud表文件中讀取候選人所得票數(shù)，顯示在頁面上。

頁面顯示如圖

值得注意的代碼主要有以下幾處：

該頁面有自動刷新功能，使在線用戶可以盡快的看到最新的選舉情況。我們這里設(shè)定每隔30秒鐘自動刷新一次。

<metahttp-equiv="refresh"content="10;URL=show.asp">

顯示投票時(shí)，我們采用了while循環(huán)，把候選人及其得票數(shù)，整齊地顯示在一個(gè)表格中，這種技術(shù)在數(shù)據(jù)庫查詢結(jié)果的顯示中也經(jīng)常用到。代碼如下：

<%whilenoths.eof%>

<tr>

<tdwidth="100%"><center>

<fontcolor="#8000ff"><big>

<%=hs("name")&""&hs("result")&"票"%>

</big></font>

</center>

</td>

</tr>

<%hs.movenext%>

<%wend%>

3．4達(dá)級考試在線查分系統(tǒng)與計(jì)數(shù)器的制作

3．4．1功能：

它提供了在線查看成績。考生可以在網(wǎng)上使用這一系統(tǒng)，通過輸入準(zhǔn)考證編號來查詢達(dá)級考試的結(jié)果。

3．4．2數(shù)據(jù)表的設(shè)計(jì)

與評優(yōu)系統(tǒng)共用STUd表，表設(shè)計(jì)同上。

3．4．3界面設(shè)計(jì)與重點(diǎn)難點(diǎn)代碼的設(shè)計(jì)

該模塊需要查詢者輸入準(zhǔn)考證號后來查看結(jié)果。若ID1不為空時(shí)，表示有表單輸入，開始查詢數(shù)據(jù)庫。使用SELECT的SQL指令查詢數(shù)據(jù)庫的數(shù)據(jù)。先設(shè)定SQL指令，查詢ID符合準(zhǔn)考證編號Request.Form("ID1")的數(shù)據(jù)，下個(gè)“Execute”指令，即可開始執(zhí)行存取、查詢數(shù)據(jù)的動作了。并將查詢結(jié)果儲存到Recordsets組件RS中。

IFRequest.Form("ID1")<>""THEN

SetConn=Server.CreateObject("ADODB.Connection")

Conn.Open("FILEDSN=c:\ProgramFiles\CommonFiles\ODBC\DataSources\msaccessdatabase.dsn")

SQL="SELECTname,id,scoreFROMstudWHEREid=''''"&Request.Form("ID1")&"''''"

SetRS=Conn.Execute(SQL)

若考試通過，則顯示考試的結(jié)果，包括姓名、準(zhǔn)考證編號、總分和考試結(jié)果，分別由RecordSets組件的RS（0）、RS（1）、RS（2）、RS（3）得到。FS.Field.Count表示RecordSets組件的域的總數(shù)，由“forI=0toRS.Fields.count-1”，取得RS（I）各域的數(shù)據(jù)。配合<Table>表格的HTML語法，將結(jié)果填入表格的各單元格中。若還有下一個(gè)數(shù)據(jù)，就使用RS.MoveNext移到下一個(gè)位置。

3.4.4頁面訪問計(jì)數(shù)器的制作

利用文件處理組件FILESYSTEM的強(qiáng)大功能來制作，比用Application對象計(jì)數(shù)器要好，Application計(jì)數(shù)器當(dāng)有20分鐘沒有人連上該網(wǎng)頁或關(guān)機(jī)時(shí)，計(jì)數(shù)器會被歸零。而文件計(jì)數(shù)器卻不會因時(shí)間而消失。我用Count.txt存放訪問人次。代碼如下：

whichfile=server.mappath("pic\count.txt")

setmyfile=server.createobject("scripting.filesystemobject")創(chuàng)建一個(gè)

setthisfile=myfile.opentextfile(whichfile)組件對象

visit=thisfile.readline

thisfile.close讀取計(jì)數(shù)器數(shù)據(jù)文件Count.txt中的計(jì)數(shù)數(shù)據(jù)

visit=visit+1記錄自加一次

length=len(visit)

fori=1tolength

response.write"<imgsrc="&mid(visit,i,1)&".jpg></img>"將記錄的數(shù)據(jù)用圖片顯示出來

next

setthisfile=myfile.createtextfile(whichfile,1)將新計(jì)數(shù)數(shù)據(jù)寫入文件thisfile.writeline(visit)

setmyfile=nothing

數(shù)字圖片我利用PHOTOSHOP中的文字特效制作了9個(gè)立方數(shù)字：

等

四．系統(tǒng)的使用說明與安裝

4．1運(yùn)行環(huán)境要求

Windows98

PersonalWebServer3.0（PWS）

Microsoft?Access2000(9.0.2812)

4．2安裝設(shè)置

A.將本網(wǎng)站拷貝到硬盤上的某一目錄下，如：拷貝至c:\y1下。

B.運(yùn)行PWS，將默認(rèn)的Web站點(diǎn)主目錄設(shè)置為該目錄，如上例應(yīng)為c:\y1；

具體步驟：

a.選擇“高級”項(xiàng)；

b.單擊“編輯屬性”按鈕，在出現(xiàn)的“編輯屬性”對話框中的“目錄”項(xiàng)中填入“c:\y1”，其他不變，確定；

C.設(shè)置啟動默認(rèn)文檔為：yy.asp

致謝

通過這次畢業(yè)設(shè)計(jì)，使我感到高科技、新知識的力量。這次畢業(yè)設(shè)計(jì)過程中，得到了長沙市工商職業(yè)中專學(xué)校的大力支持，給我提供了舒適的工作學(xué)習(xí)環(huán)境，也得到了科大老師、教授的精心指導(dǎo)，在此表示衷心的感謝！

五．參考文獻(xiàn)

[1]李世杰ActiveServerPages(ASP)3.0網(wǎng)頁設(shè)計(jì)手冊北京:清華大學(xué)出版社1999

[2]前沿電腦圖像工作室巧學(xué)巧用Dreamweaver、Fireworks、Flash制作網(wǎng)頁北京:人民郵電出版社

[3]ASP入門與實(shí)例演練薄小志編著中國青年出版社