校園網(wǎng)站的設(shè)計(jì)與實(shí)現(xiàn)

校園網(wǎng)站的設(shè)計(jì)與實(shí)現(xiàn)

摘

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

了解中國(guó)網(wǎng)絡(luò)學(xué)校網(wǎng)站的研究背景與發(fā)展現(xiàn)狀2

系統(tǒng)需求分析與總體設(shè)計(jì)3

熟悉網(wǎng)站開發(fā)模式、工具及環(huán)境4把想要展示的內(nèi)容制作成網(wǎng)頁(yè)。5

使用動(dòng)態(tài)網(wǎng)頁(yè)技術(shù)(ASP)，實(shí)現(xiàn)動(dòng)態(tài)內(nèi)容更新。6

認(rèn)真地選取測(cè)試用例，進(jìn)行交叉測(cè)試7

網(wǎng)站的后期完善、宣傳及發(fā)展方向其中,網(wǎng)頁(yè)制作和使用動(dòng)態(tài)網(wǎng)頁(yè)技術(shù)(ASP)實(shí)現(xiàn)動(dòng)態(tài)內(nèi)容更新是網(wǎng)站開發(fā)的核心內(nèi)容。

關(guān)鍵詞：網(wǎng)頁(yè)、制作、訪問、鏈接目錄

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

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

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

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

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

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

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

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

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

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

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

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

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

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

附錄：源文件代碼27

第一章諸論在Internet飛速發(fā)展的今天，互聯(lián)網(wǎng)成為人們快速獲取、發(fā)布和傳遞信息的重要渠道，它在人們政治、經(jīng)濟(jì)、生活等各個(gè)方面發(fā)揮著重要的作用。Internet上發(fā)布信息主要是通過網(wǎng)站來(lái)實(shí)現(xiàn)的，獲取信息也是要在Internet“海洋”中按照一定的檢索方式將所需要的信息從網(wǎng)站上下載下來(lái)。因此網(wǎng)站建設(shè)在Internet應(yīng)用上的地位顯而易見，它已成為政府、企事業(yè)單位信息化建設(shè)中的重要組成部分，從而倍受人們的重視。為了更好的辦學(xué)，提高學(xué)校知名度，特構(gòu)建城關(guān)第一小學(xué)學(xué)校網(wǎng)站。1．1設(shè)計(jì)思想通過網(wǎng)站，全面宣傳，展示學(xué)校風(fēng)采、優(yōu)點(diǎn)與特色，發(fā)布學(xué)校的重大活動(dòng)安排與招生政策，增強(qiáng)家長(zhǎng)與學(xué)校之間的聯(lián)系，在Internet上實(shí)現(xiàn)完成部分校務(wù)，提高辦事效率。1.2開發(fā)工具的選用及介紹ASP的優(yōu)勢(shì)：ActiveServerPages：“動(dòng)態(tài)服務(wù)器網(wǎng)頁(yè)”，一般簡(jiǎn)稱為“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來(lái)設(shè)計(jì)程序，客戶端（Ｃlient）在ＩＥ瀏覽器中可以顯示程序執(zhí)行的結(jié)果，可是，客戶端（Ｃlient）若使用Netscape瀏覽器就無(wú)法顯示VBScript的執(zhí)行結(jié)果。ＡＳＰ的特點(diǎn)：任何開發(fā)工具皆可發(fā)展ＡＳＰ,只要使用一般的文書編輯程序，如Windows記事本，就可以編輯。當(dāng)然，其他網(wǎng)頁(yè)發(fā)展工具，例如，F(xiàn)rontPageExpress、ＦrontPage等也都可以；不過還是建議你用記事本來(lái)寫，既省錢又方便，若是使用那些所見即所得的網(wǎng)頁(yè)編輯來(lái)寫ＡＳＰ，可能會(huì)發(fā)生一些意想不到的離奇狀態(tài)。通吃各家瀏覽由于ASP程序是在網(wǎng)絡(luò)服務(wù)器端中執(zhí)行，執(zhí)行結(jié)果所產(chǎn)生的HTML文件適用于不同的瀏覽器。語(yǔ)言相容性高ASP與所有的ActiveXScript語(yǔ)言都相容，除了可結(jié)合HTML，VBScript、JavaScript、ActiveX服務(wù)器組件來(lái)設(shè)計(jì)外，并可經(jīng)由“plug-In（外掛組件模組）的方式，使用其他廠商（ThirdParty）所提供的語(yǔ)言。隱密安全性高如果我們?cè)跒g覽器中直接查看網(wǎng)頁(yè)的原始代碼，就只能看到ＨＴＭＬ文件，原始的ＡＳＰ程序代碼是看不到的！這是因杰ＡＳＰ程序先于網(wǎng)站服務(wù)（ＷebServer）端執(zhí)行后，將結(jié)果轉(zhuǎn)換成標(biāo)準(zhǔn)ＨＴＭＬ文件，再傳送到客戶端（Client）的瀏覽器上，因此，我們所辛苦撰寫的ＡＳＰ程序并不會(huì)輕易地被看見進(jìn)而被盜用。易于操控?cái)?shù)據(jù)庫(kù)ＡＳＰ可以輕易地通過ＯDBC(OpenDatabaseConnectivity)驅(qū)動(dòng)程序連接各種不同的數(shù)據(jù)庫(kù)，例如：Acess、Foxpro、dBase、Oracle等等，另外，ＡＳＰ亦可將“文本文件”或是”Excel”文件當(dāng)成數(shù)據(jù)庫(kù)用。面向?qū)ο髮W(xué)習(xí)容易ＡＳＰ具備有面向?qū)ο螅ǎ蟗ject-Oriented）功能，學(xué)習(xí)容易，ＡＳＰ提供了五種方便能力強(qiáng)大的內(nèi)建對(duì)象：Request、Response、Sever、Application以及Session，同時(shí)，若使用ＡＳＰ內(nèi)建的“Application”對(duì)象或”Session”對(duì)象所撰寫出來(lái)的ＡＳＰ程序可以在多個(gè)網(wǎng)頁(yè)之間暫時(shí)保存必要的信息。ASP的六大內(nèi)部對(duì)象對(duì)象名稱功能描述RequestResponseServerSessionApplicationObjectContext從客戶端取得信息將信息送給客戶端提供一些Web服務(wù)器工具儲(chǔ)存在一個(gè)Session內(nèi)的用戶信息，該信息僅可被該用戶訪問在一個(gè)ASP-Application中讓不同的客戶端共享信息可以用來(lái)配合MicrosoftTransaction服務(wù)器進(jìn)行分布式事務(wù)處理所以我選擇了ASP結(jié)合Frontpage架構(gòu)長(zhǎng)沙市工商職業(yè)中專學(xué)校網(wǎng)站第二章網(wǎng)站總體分析與設(shè)計(jì)2．1網(wǎng)站系統(tǒng)分析示家長(zhǎng)們的一般性發(fā)言，同時(shí)還得將“悄悄話“的發(fā)言隱藏起來(lái)。當(dāng)老師以密碼登錄成為管理模式時(shí)，則必須將一般性發(fā)言與悄悄話發(fā)言的數(shù)據(jù)全部顯示出來(lái)，同時(shí)還得讓老師們可以針對(duì)某位特定學(xué)生家長(zhǎng)所發(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)頁(yè)語(yǔ)句中，利用Session對(duì)象來(lái)記錄目前的工作模式。當(dāng)我們第一次進(jìn)入“顯示留言意見”網(wǎng)頁(yè)的時(shí)候，我們所見的網(wǎng)頁(yè)畫面一定是一般！因?yàn)镾ession尚未被建立，因此它的“變量”值一定不會(huì)是“yes”，所以網(wǎng)頁(yè)中會(huì)出現(xiàn)一個(gè)輸入密碼進(jìn)入“教師管理”模式的欄位，只有當(dāng)我們輸入密碼按下“教師管理”的按鈕組織上發(fā)ASP程序中的進(jìn)入管理模式語(yǔ)句后，Session對(duì)象才會(huì)被建立，同時(shí)，“checkedit“Session對(duì)象變量值被設(shè)置為“yes“，所以我們就進(jìn)入了能將一般性發(fā)言與悄悄話發(fā)言的數(shù)據(jù)全部顯示出來(lái)，同時(shí)還讓教師們可以針對(duì)某位特定學(xué)生家長(zhǎng)所發(fā)表的意見作出獨(dú)立回答的管理模式頁(yè)面。留言顯示網(wǎng)頁(yè)的分頁(yè)當(dāng)家長(zhǎng)的發(fā)言與老師回復(fù)的數(shù)據(jù)筆數(shù)太多時(shí)，一次要將全部的數(shù)據(jù)內(nèi)容顯示在網(wǎng)頁(yè)中，等待網(wǎng)頁(yè)下載的時(shí)間太長(zhǎng)了，因此采用固定筆數(shù)分頁(yè)瀏覽方式來(lái)顯示網(wǎng)頁(yè)。要進(jìn)行分頁(yè)顯示，得先知道目前有多少筆的留言數(shù)據(jù)，而留言數(shù)據(jù)筆數(shù)可以通過Recordset對(duì)象的“Recordcount“（記錄個(gè)數(shù)）屬性得知，我們將每10筆數(shù)據(jù)為一單位分頁(yè)顯示：

count=rs.recordcount

ifcount/10>(count\10)then

totalpage=(count\10)+1

elsetotalpage=(count\10)

endif

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

跳頁(yè)選擇的ASP程序語(yǔ)句

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

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)頁(yè)制作insetu3表單的參數(shù)表單的Action參數(shù)：Action參數(shù)是用來(lái)指定Server端處理此一表單數(shù)據(jù)內(nèi)容的程序，此處表單處理ASP程序?yàn)椤癮dd.htm“，

表單的Mothed參數(shù)：要將表單傳送至Server端的方式有兩種，設(shè)置值分別為GET及POST，若設(shè)置為POST，則瀏覽器會(huì)等Server端來(lái)讀取數(shù)據(jù)，若設(shè)置為GET，則當(dāng)我們按下送出按鈕時(shí)，瀏覽器會(huì)立即將表單中的數(shù)據(jù)內(nèi)傳送出去。利用POST方法，在傳送的數(shù)據(jù)上將不受限制，利用GET方法傳送的數(shù)據(jù)量則大約只有2K左右。留言處理程序要將家長(zhǎng)發(fā)言數(shù)據(jù)作后續(xù)處理及將這些數(shù)據(jù)內(nèi)容存入數(shù)據(jù)庫(kù)，須利用添加數(shù)據(jù)記錄的InsertInto指令，然后再寫入數(shù)據(jù)庫(kù)文件中：

Insetinto指令語(yǔ)句格式：

Insertinto數(shù)據(jù)表名（欄目名）values（欄目值）sql="insertintoallmessage(家長(zhǎng)姓名,留言主題,聯(lián)絡(luò)信箱,留言內(nèi)容,私人公開,留言時(shí)間,班級(jí))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)頁(yè)

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

使用Select…From…Where篩選語(yǔ)句

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

rs.opensql,cn,1,3

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

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

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

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

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

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

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

老師在回復(fù)欄位中所填入的數(shù)據(jù)，必須送給處理老師回復(fù)數(shù)據(jù)的ASP程序”anssave.htm”來(lái)記錄以及處理這些回復(fù)數(shù)據(jù)。當(dāng)老師填寫好回復(fù)發(fā)言的數(shù)據(jù)后按下“送出回復(fù)”按鈕后，表單中的數(shù)據(jù)內(nèi)容就會(huì)以“POST”的方式由SEVER端讀取，然后將數(shù)據(jù)內(nèi)容交由處理老師回復(fù)數(shù)據(jù)的ASP程序“anssave.htm”來(lái)將數(shù)據(jù)內(nèi)容寫入數(shù)據(jù)庫(kù)。3．2網(wǎng)上圖書館網(wǎng)上圖書館將學(xué)校圖書館圖書放到網(wǎng)絡(luò)上供人借閱，這樣不僅方便了校內(nèi)的學(xué)生與教職員工使用圖書館的資源,還為圖書館管理員提供了一種簡(jiǎn)便地管理圖書館的方法.3．2．1功能網(wǎng)上圖書館系統(tǒng)可以進(jìn)行圖書的出借和歸還.還可以在系統(tǒng)中按照多種字段對(duì)圖書進(jìn)行查找,還可以瀏覽某個(gè)種類的所有圖書.該應(yīng)用程序也為圖書館管理員提供了一些功能,如添加、編輯以及刪除圖書等，或者在分類層次結(jié)構(gòu)中添加新的種類。3．2．2系統(tǒng)的層次結(jié)構(gòu)下圖的每個(gè)方框代表校園圖書館網(wǎng)站中的一個(gè)頁(yè)面。除了只包含ＨＴＭＬ的Search頁(yè)面外，其他的均為ＡＳＰ頁(yè)面。因?yàn)槊總€(gè)圖書的頁(yè)面都不同，所以大多數(shù)的頁(yè)面實(shí)際上都是多頁(yè)面。3.2.3數(shù)據(jù)庫(kù)設(shè)計(jì)本系統(tǒng)共使用３個(gè)數(shù)據(jù)表：LibBooks表包含與圖書有關(guān)的所有數(shù)據(jù)。該表中的字段內(nèi)容的圖書的通用信息。另外，對(duì)于已經(jīng)出借的圖書，該表中還包含借閱該圖書的用戶的ＩＤ號(hào)，以及圖書的狀態(tài)。

表視圖如下：

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

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

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

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

Subject主題文本description描述文本

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

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

字段名意義字段類型

Categoryname類別文本(noll)

parentcategory父類別文本(noll)

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

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

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

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

emailaddress用戶郵箱文本

圖書館數(shù)據(jù)庫(kù)的數(shù)據(jù)關(guān)系如圖9-22所示。其中表LibEmps和表LibCategories與表LibBooks之間都是一對(duì)多的關(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)行登錄，如下圖所示。登錄頁(yè)面（index.htm）訪問者輸入Ｅ－mail地址和密碼來(lái)登錄，然后單擊“登錄”按鈕。輸入的數(shù)據(jù)提交后與數(shù)據(jù)庫(kù)中的用戶表進(jìn)行匹配。

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

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

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

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

ifRSFindEmp.EOFthen

TheMessage="密碼或email地址不對(duì)."

else

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

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

Response.Redirect"../yk.htm"

endif

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

圖書館菜單頁(yè)面包含指向其他4個(gè)頁(yè)面的鏈接：管理頁(yè)面、搜索頁(yè)面、圖書列表頁(yè)面和主頁(yè)面。還有一個(gè)可顯示用戶所借書籍的按紐。如果訪問者是圖書館管理員，則菜單界面如圖所示。如果訪問者不是圖書館管理員，則看到如圖所示的界面。非管理員的訪問者的界面上沒有指向管理員菜單頁(yè)面的鏈接。實(shí)現(xiàn)辦法：訪問者登錄時(shí)在登錄頁(yè)面上的創(chuàng)建的會(huì)話變量Session用于從數(shù)據(jù)庫(kù)中獲取訪問者的有關(guān)信息，表示它是否是管理員。如果值為1，就表明訪問者是一個(gè)管理員，則用如下代碼寫入一個(gè)指向管理員頁(yè)面的鏈接：

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

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

<%endif%>

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

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

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

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

endif

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

<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)站中的所有ＡＳＰ頁(yè)面都會(huì)在訪問者訪問之前對(duì)其進(jìn)行登錄檢查。這樣就可以避免訪問者通過輸入某個(gè)頁(yè)面地址然后在沒有登錄的情況下直接進(jìn)入該頁(yè)面的情況發(fā)生。此外，每個(gè)管理頁(yè)面都要確認(rèn)訪問者是管理員。管理菜單頁(yè)面管理菜單頁(yè)面有一個(gè)HTML表單，根據(jù)選擇的按鈕的不同，可以進(jìn)行5種不同的操作：圖書的歸還、圖書的編輯、圖書的刪除、圖書的添加和類別的添加。不管選擇了哪一個(gè)按鈕，該表單都提交人其自身進(jìn)行處理。

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

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

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

<%endif%>而管理者頁(yè)面通過下列語(yǔ)句

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

<inputzztype=hiddenname="BOOKID1"value="<%=request.querystring("BOOKID")%>>這樣就將所找到的書的書號(hào)BookID、書名Title傳遞管理者頁(yè)面。再進(jìn)行所須操作。共有3個(gè)不同的銨紐，可以進(jìn)行3種操作。若單擊“修改”鈕：

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

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

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

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

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

setRSCategories=conn.Execute("selectCategoryNamefromLibCategoriesorderbyCategoryName")

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

<%

DoUntilRSCategories.EOF

%>

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

<%

RSCategories.MoveNext

Loop

%>

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

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

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

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

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

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

&Request.Form("SearchField")&"Like'%"&Request.Form("SearchCriteria")&"%'")注意：，符號(hào)%表示的是一個(gè)廣義搜索。這一點(diǎn)類似于ACCESS中的符號(hào)*。

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

<%DoUntilRSBooks.EOF%>

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

<TDWIDTH=40%height="20"><B>書名:</B><AHREF="../html/book.htm?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%>

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

該頁(yè)面通過Querystring傳遞BookID

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

Response.Redirect"./search.html"

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

如果同時(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.htm"

endif

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

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

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

ifRSBooks("status")="Available"then

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

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

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

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

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

<%IfSession("Manager")=1then%><AHREF="../html/management_menu.htm?title=<%response.writeRSBooks("Title")%>&BOOKID=<%response.writeRSBooks("BOOKID")%>">管理員菜單</A><%endif%>3.3網(wǎng)上評(píng)優(yōu)投票系統(tǒng)3.3.1功能：

能實(shí)現(xiàn)全校性的評(píng)選，快捷、公平，且有效，不允許做票。3.3.2組成構(gòu)造

這個(gè)系統(tǒng)由3個(gè)部分組成——投票頁(yè)面vote.htm，處理投票結(jié)果的腳本，顯示投票頁(yè)面。3．3．3數(shù)據(jù)表的設(shè)計(jì)：3．3．4界面設(shè)計(jì)與重點(diǎn)、難點(diǎn)代碼設(shè)計(jì)

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

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

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

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

ifrequest("passno")<>""then

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

setrs=cn.execute(sql)

ifrs.eofthen%>

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

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

vo=request("cand")

iflen(vo)>4then%>

<h2align=center><%response.write"多選了，無(wú)效"%></h2>然后根據(jù)所投的票將對(duì)應(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")thencn.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.htm

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

頁(yè)面顯示如圖值得注意的代碼主要有以下幾處：

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

<metahttp-equiv="refresh"content="10;URL=show.htm">顯示投票時(shí)，我們采用了while循環(huán)，把候選人及其得票數(shù)，整齊地顯示在一個(gè)表格中，這種技術(shù)在數(shù)據(jù)庫(kù)查詢結(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á)級(jí)考試在線查分系統(tǒng)與計(jì)數(shù)器的制作3．4．1功能：它提供了在線查看成績(jī)。考生可以在網(wǎng)上使用這一系統(tǒng)，通過輸入準(zhǔn)考證編號(hào)來(lái)查詢達(dá)級(jí)考試的結(jié)果。3．4．2數(shù)據(jù)表的設(shè)計(jì)與評(píng)優(yōu)系統(tǒng)共用STUd表，表設(shè)計(jì)同上。3．4．3界面設(shè)計(jì)與重點(diǎn)難點(diǎn)代碼的設(shè)計(jì)該模塊需要查詢者輸入準(zhǔn)考證號(hào)后來(lái)查看結(jié)果。若ID1不為空時(shí)，表示有表單輸入，開始查詢數(shù)據(jù)庫(kù)。使用SELECT的SQL指令查詢數(shù)據(jù)庫(kù)的數(shù)據(jù)。先設(shè)定SQL指令，查詢ID符合準(zhǔn)考證編號(hào)Request.Form("ID1")的數(shù)據(jù)，下個(gè)“Execute”指令，即可開始執(zhí)行存取、查詢數(shù)據(jù)的動(dòng)作了。并將查詢結(jié)果儲(chǔ)存到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(SQ