ASP課程設(shè)計(jì)實(shí)驗(yàn)報(bào)告.docx

ASP課程設(shè)計(jì)實(shí)驗(yàn)報(bào)告項(xiàng) 目 名 稱： 基于B/S架構(gòu)的班級(jí)網(wǎng)站設(shè)計(jì)與實(shí)現(xiàn) 參 與 成 員： 夏維強(qiáng) 學(xué) 號(hào)： * 聯(lián) 系 電 話： * 日 期： 2010-11-23 一、前言ASP（Active Server Pages）活動(dòng)服務(wù)器頁(yè)面，基于微軟公司的服務(wù)器IIS的統(tǒng)一環(huán)境，是Microsoft的一種技術(shù)，它起一種編程語(yǔ)言的作用，利用它編寫動(dòng)態(tài)產(chǎn)生網(wǎng)頁(yè)的HTML程序代碼。ASP可以使用兩種腳本語(yǔ)言：VBScript和Jscript(所謂的Jscript語(yǔ)言就是微軟件版本的JavaScript語(yǔ)言) ，但主要使用VBScript。這些腳本可以執(zhí)行應(yīng)用程序邏輯，并能夠用ActiveX組件執(zhí)行特殊任務(wù)，如數(shù)據(jù)庫(kù)查詢、文件輸入輸出等。ASP內(nèi)含5個(gè)內(nèi)置的Active Server Components（ActiveX服務(wù)器組件），即Database Access component（數(shù)據(jù)庫(kù)訪問組件）、File Access component(文件訪問組件)、Ad Rotator component（廣告輪顯器組件）、Browser Capabilities component（瀏覽器信息組件）、Content Linking component（內(nèi)部鏈接組件）。最常用的內(nèi)置組件是文件組件和廣告組件。ASP最強(qiáng)大的功能還是使用外置組件。ASP本身包含了一個(gè)DLL文件，名字為asp.dll，缺省安裝在WinntSystem32inetsrv目錄下。這個(gè)DLL文件負(fù)責(zé)得到一個(gè)ASP頁(yè)面（由文件擴(kuò)展名.asp標(biāo)識(shí)），然后對(duì)它進(jìn)行分析，尋找服務(wù)器端腳本內(nèi)容。這個(gè)腳本傳給相應(yīng)的腳本引擎，腳本的執(zhí)行結(jié)果與ASP頁(yè)中的HTML和模板文本結(jié)合在一起。完整的頁(yè)面會(huì)送到Web服務(wù)器，送往原先請(qǐng)求的客戶端。二、個(gè)人網(wǎng)站的設(shè)計(jì)1.體系結(jié)構(gòu)本系統(tǒng)通過客戶端瀏覽器向網(wǎng)絡(luò)上的服務(wù)器發(fā)出請(qǐng)求，服務(wù)器對(duì)瀏覽器的請(qǐng)求進(jìn)行處理，將用戶所需信息返回到瀏覽器。B/S結(jié)構(gòu)簡(jiǎn)化了客戶機(jī)的工作，把二層C/S結(jié)構(gòu)的事務(wù)處理邏輯模塊從客戶機(jī)的任務(wù)中分離出來(lái)，由Web服務(wù)器單獨(dú)組成一層來(lái)負(fù)擔(dān)其任務(wù)，從而減輕了客戶機(jī)的壓力。2.設(shè)計(jì)目標(biāo)在現(xiàn)有的各種異構(gòu)平臺(tái)的基礎(chǔ)之上構(gòu)筑一個(gè)通用的平臺(tái)無(wú)關(guān)、語(yǔ)言無(wú)關(guān)的技術(shù)層，將網(wǎng)站的所有功能作為Web服務(wù)展示出來(lái)，用戶根據(jù)自己的需要選擇相關(guān)的服務(wù)。 3.主要功能模塊 圖1 班級(jí)網(wǎng)站的主要功能模塊本系統(tǒng)的權(quán)限采用基于角色的訪問控制，權(quán)限賦予角色，角色分配給用戶。用戶通過所屬的角色享有權(quán)限。通過權(quán)限控制，保障了合法用戶順利實(shí)現(xiàn)系統(tǒng)功能，禁止了非授權(quán)用戶對(duì)系統(tǒng)的入侵。4.數(shù)據(jù)庫(kù)設(shè)計(jì)1.留言簿留言簿架構(gòu)：Browser/Web/DataBase（Access）其數(shù)據(jù)庫(kù)包括兩個(gè)表alogin和lyb。alogin用來(lái)存儲(chǔ)登陸密碼，lyb用來(lái)存儲(chǔ)用戶的回復(fù)信息，表4-1和表4-2所示。hfBook數(shù)據(jù)庫(kù)表中的字段“rID”存儲(chǔ)原主題的ID，該ID就是GuestBook數(shù)據(jù)庫(kù)表中的ID字段。表4-1 數(shù)據(jù)庫(kù)表alogin的結(jié)構(gòu)字段號(hào)類型說(shuō)明ID自動(dòng)編號(hào)用戶的標(biāo)識(shí)yhm文本（80）登錄的用戶名mm文本（160）登錄的密碼 表4-2 數(shù)據(jù)庫(kù)表lyb的結(jié)構(gòu)字段號(hào)類型說(shuō)明姓名自動(dòng)編號(hào)用戶的標(biāo)識(shí)Email數(shù)字用戶的郵箱主題文本留言的標(biāo)題內(nèi)容文本留言的內(nèi)容時(shí)間日期/時(shí)間回復(fù)的時(shí)間2.通訊錄通訊錄架構(gòu)：數(shù)據(jù)庫(kù)文件bjtxl.mdb文件包括兩個(gè)表，分別為alogin和txl。alogin用來(lái)存儲(chǔ)登錄界面的用戶名和密碼信息，txl用來(lái)存儲(chǔ)同學(xué)的信息，表3和表5所示表4-3 數(shù)據(jù)庫(kù)表alogin的結(jié)構(gòu)字段名類型說(shuō)明ID自動(dòng)編號(hào)用戶的標(biāo)識(shí)yhm文本（20）登錄的用戶名mm文本（20）登錄的密碼表4-4 數(shù)據(jù)庫(kù)表txl的結(jié)構(gòu)字段名類型說(shuō)明ID自動(dòng)編號(hào)同學(xué)信息的標(biāo)識(shí)xm文本（20）同學(xué)的姓名lxfs文本（80）同學(xué)的聯(lián)系方式bz文本（80）備注3.BBS論壇通訊錄架構(gòu)：數(shù)據(jù)庫(kù)文件bbspp1.mdb文件包括兩個(gè)表，分別為發(fā)言表和用戶表。發(fā)言表用來(lái)存儲(chǔ)登錄界面的用戶名和密碼信息如表4-5，用戶表用來(lái)存儲(chǔ)同學(xué)的信息。 表4-5 BBS 用戶表字段名類型ID自動(dòng)編號(hào)用戶名文本密碼文本電子信箱文本臨時(shí)身份文本網(wǎng)址文本表4-6三、個(gè)人網(wǎng)站的實(shí)現(xiàn)1身份認(rèn)證主要代碼如下： 請(qǐng)輸入管理員名！ 請(qǐng)輸入密碼！ % response.end() end if if syhmchenqing then response.write(您不是系統(tǒng)管理員！) % 請(qǐng)重新輸入系統(tǒng)管理員名！ 密碼錯(cuò)誤！請(qǐng)重新輸入密碼！ 2留言簿handle.asp：處理程序主要代碼如下：display.asp：顯示程序主要代碼如下： 姓名： Email: A HREF=MAILTO: 主題： 時(shí)間： 內(nèi)容 “留言簿”登錄留言頁(yè)面運(yùn)行效果如圖2所示 聊天室圖2留言簿登錄留言界面3.聊天室（1）聊天室信息輸入界面其主要代碼如下： % mywords = Request(message) oneSentence = 姓名： & Session(username) oneSentence = oneSentence & 編號(hào): & Session(no)& 說(shuō): & mywords Application.Lock() Application(talk)=Application(talk)& oneSentence & Application.UnLock()% （2） 聊天信息顯示頁(yè)面其主要代碼如下： function scrollWindow() this.scroll(0,65000) setTimeout(scrollWindow(),200) scrollWindow() “聊天室”聊天界面運(yùn)行效果如圖3所示。圖3聊天室聊天界面4.通訊錄通訊錄的功能是保存手機(jī)號(hào)碼、E-mail地址、住宅電話等常用的聯(lián)系信息，或?qū)σ郧暗男畔⑦M(jìn)行分組、管理和更新、并根據(jù)用戶要求把后臺(tái)數(shù)據(jù)庫(kù)信息發(fā)布到前端的瀏覽器，直觀顯示給用戶。其主要包括四個(gè)方面： 添加記錄、查詢記錄、刪除記錄、修改記錄。其通訊錄查詢記錄程序的主要代碼如下： 姓名 聯(lián)系方式 td備注 “通訊錄”查詢主頁(yè)面運(yùn)行效果如圖4所示。圖4 通訊錄瀏覽頁(yè)界面4BBS論壇Vew.Asp        a href=wordadd1.asp?No=我要發(fā)言              a href=leave.asp?No=離開論壇             管理員入口%sql=SELECT * FROM 發(fā)言表 WHERE 發(fā)言次序=1 ORDER BY ID DESCdim rootRsSet rootRs=Server.CreateObject(ADODB.RecordSet)rootRs.Open sql,conn,1,1If rootRs.Bof OR rootRs.Eof ThenResponse.Write 目前還沒有發(fā)言內(nèi)容。elseset name1=rootrs(發(fā)言標(biāo)題)set name2=rootrs(用戶名)set name3=rootrs(回復(fù)數(shù))set name4=rootrs(電子信箱)set Num=rootrs(Num)rootRs.pagesize=10rootRs.AbsolutePage =1if Request(page) then rootRs.AbsolutePage =Request(page)RowCount =rootRs.pagesizeIf Not rootRs.Eof Then%0%a href=mailto:人回復(fù)a href=vew2.asp?Num=&No=言論內(nèi)容1 thenResponse.Write Response.Write Response.Write 帖子分頁(yè)：For i=1 to rootRs.pagecountResponse.Write Response.Write & i & Response.Write NextResponse.Write End ifEnd ifrootRs.closeSet rootRs=nothingconn.closeSet conn=nothing% 圖5 帖子顯示頁(yè)面Wordadd1.asp%sql=SELECT * FROM 用戶表 WHERE 臨時(shí)身份 and 臨時(shí)身份= & Request(No) & Set Rs=conn.Execute(sql)If Rs.Bof OR Rs.Eof ThenResponse.Write 臨時(shí)身份出錯(cuò),你無(wú)權(quán)發(fā)言,請(qǐng)從新登陸。elseSet name1 = rs(用戶名) Set mail = rs(電子信箱) Set url = rs(網(wǎng)址)%姓名：E_mail：主頁(yè)：%Response.Write %Response.Write %Response.Write %Response.Write %Res