【正文】 DESC set rs = ( sql ) % % 39。連接數(shù)據(jù)庫(kù)，做查詢 set conn = () (driver={Microsoft Access Driver (*.mdb)}。) 39。 Memo amp。,39。 Subject amp。,39。Email amp。,39。_ Name amp。_ ()) SQL = INSERT INTO lyb(姓名 ,主題 ,內(nèi)容 ) VALUES(39。插入到數(shù)據(jù)庫(kù) set conn = () (driver={Microsoft Access Driver (*.mdb)}。檢查各字段是否輸入了數(shù)據(jù) If Name = Or Email = Or Subject = Or Memo = Then (字段空白不接受！ ) 39。 “ 留言簿” 主頁(yè)面 運(yùn)行效果如圖 2 所示 ，其 主 要 代碼如下： ※ ：處理程序 % 39。scrollWindow()39。 br () % HTML BODY BGCOLOR=LIGHTBLUE FORM METHOD=POST ACTION= INPUT NAME=message TYPE=TEXT SIZE=50 INPUT TYPE=SUBMIT VALUE=SEND /FORM /BODY /HTML ※ ：聊天信息顯示頁(yè)面 HTML HEAD META HTTPEQUIV=REFRESH CONTENT=3。 mywords () Application(talk)=Application(talk) amp。 Session(no)amp。 Session(username) oneSentence = oneSentence amp。39。amp。hfBook 數(shù)據(jù)庫(kù)表中的字段“ rID”存儲(chǔ)原主題的 ID，該 ID 就是 GuestBook數(shù)據(jù)庫(kù)表中的 ID 字段。alogin 用來(lái)存儲(chǔ)登錄界面的用戶名和密碼信息， txl用來(lái)存儲(chǔ)同學(xué)的信息，表 1 和表 2 所示 表 1 數(shù)據(jù)庫(kù)表 alogin 的結(jié)構(gòu) 字段名 類(lèi)型 說(shuō)明 ID 自動(dòng)編號(hào) 用戶的標(biāo)識(shí) yhm 文本（ 20） 登錄的用戶名 mm 文本（ 20） 登錄的密碼 表 2 數(shù)據(jù)庫(kù)表 txl的結(jié)構(gòu) 字段名 類(lèi)型 說(shuō)明 ID 自動(dòng)編號(hào) 同學(xué)信息的標(biāo)識(shí) xm 文本（ 20） 同學(xué)的姓名 lxfs 文本（ 80） 同學(xué)的聯(lián)系方式 bz 文本（ 80） 備注 ? 留言簿 留言簿數(shù)據(jù)庫(kù)包括兩個(gè)表 GuestBook 和 hfBook。通過(guò)權(quán)限控制，保障了合法用 戶順利實(shí)現(xiàn)系統(tǒng)功能，禁止了非授權(quán)用戶對(duì)系統(tǒng)的入侵。 ⒊主要功能模塊 圖 1 主要功能模塊 本系統(tǒng)的權(quán)限采用基于角色的訪問(wèn)控制，權(quán)限賦予角色，角色分配給用戶。 系統(tǒng)的體系 架構(gòu)： Browser/Web/DataBase（ Access） 。 二、 個(gè)人 網(wǎng)站的設(shè)計(jì) ⒈體系結(jié)構(gòu) 本系統(tǒng)通過(guò)客戶端瀏覽器向網(wǎng)絡(luò)上的服務(wù)器發(fā)出請(qǐng)求，服務(wù)器對(duì)瀏覽器的請(qǐng)求進(jìn)行處理，將用戶所需信息返回到瀏覽器。這個(gè)腳本傳給相應(yīng)的腳本引擎，腳本的執(zhí)行結(jié)果與 ASP 頁(yè)中的 HTML 和 模板文本結(jié)合在一起。 ASP 本身 包含了一個(gè) DLL 文件， 名字為 ，缺 省安裝在Winnt\System32\isrv目錄 下。最常用的內(nèi)置組件是文件組件和廣告組件。這些腳本 可以執(zhí)行應(yīng)用程序邏輯，并能夠用 ActiveX 組件執(zhí)行 特殊任務(wù)，如數(shù)據(jù)庫(kù)查詢、文件輸入輸出等。 ASP 課程設(shè)計(jì) 實(shí)驗(yàn)報(bào)告 項(xiàng) 目 名 稱(chēng)： 基于 B/S架構(gòu)的班級(jí)網(wǎng)站設(shè)計(jì)與實(shí)現(xiàn) 參 與 成 員 ： 學(xué) 號(hào)： 聯(lián) 系 電 話： 日 期： 20211102 一、前言 ASP（ Active Server Pages）活動(dòng)服務(wù)器頁(yè)面，基于微軟公司的服務(wù)器 IIS的統(tǒng)一環(huán)境 ， 是 Microsoft 的 一種技術(shù) ， 它起一種編程語(yǔ)言的作用 ，利用它編寫(xiě)動(dòng)態(tài)產(chǎn)生網(wǎng)頁(yè)的 HTML 程序代碼。 ASP 可以使 用兩種腳本語(yǔ)言 ： VBScript 和 Jscript(所謂 的 Jscript 語(yǔ)言就是 微軟件版本的 JavaScript 語(yǔ) 言 ) ， 但主要使用 VBScript。 ASP 內(nèi)含 5 個(gè)內(nèi)置的 Active Server Components（ ActiveX 服務(wù)器組件），即 Database Access ponent（數(shù)據(jù)庫(kù)訪問(wèn)組件）、 File Access ponent(文 件訪問(wèn)組件 )、 Ad Rotator ponent（廣 告輪顯器組件） 、Browser Capabilities ponent（ 瀏覽器信息組件）、 Content Linking ponent（內(nèi) 部鏈接組件）。ASP最強(qiáng) 大的功能還是使用外置組件。這個(gè) DLL 文件 負(fù)責(zé)得到一個(gè) ASP頁(yè)面 （由文件擴(kuò)展 名 .asp 標(biāo)識(shí) ），然后對(duì)它進(jìn)行分析，尋找服務(wù)器端腳本內(nèi)容。完整的頁(yè)面會(huì)送到 Web服務(wù) 器，送往原先請(qǐng)求的客戶端。 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ī)的壓力。 ⒉設(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ù)。用戶通過(guò)所屬的角色享有權(quán)限。 ⒋數(shù)據(jù)庫(kù)設(shè)計(jì) ? 通訊錄 通訊錄數(shù)據(jù)庫(kù)文件 文件包括兩個(gè)表，分別為 alogin 和 txl。 GuestBook 用來(lái)存儲(chǔ)教師留言信息， hfBook 用來(lái)存儲(chǔ)教務(wù)員的回復(fù)信息，表 3 和表 4 所示。 表 3 數(shù)據(jù)庫(kù)表 GuestBook 的結(jié)構(gòu) 字段名 類(lèi)型 說(shuō)明 ID 自動(dòng)編號(hào) 留言的標(biāo)識(shí) 姓名 文本（ 80） 留言人的姓名 Email 文本（ 160） 留言人的 Email 主題 文本（ 255） 留言的主題 留言 備注 留言的內(nèi)容 時(shí)間 日期 /時(shí)間 留言的時(shí)間， now（） IP 文本 留言人的 IP 地址 Verify 數(shù)字 驗(yàn)證標(biāo)志，暫時(shí)沒(méi)用 表 4 數(shù)據(jù)庫(kù)表 hfBook 的結(jié)構(gòu) 字段名 類(lèi)型 說(shuō)明 ID 自動(dòng)編號(hào) 回復(fù)信息的唯一標(biāo)識(shí) rID 數(shù)字 原來(lái)主題的 ID 用戶名 文本 回復(fù)人的姓名 IP 文本 回復(fù)人的 IP 地址 回復(fù)內(nèi)容 文本 回復(fù)的內(nèi)容 時(shí)間 日期 /時(shí)間 回復(fù)的時(shí)間 三、 系統(tǒng) 實(shí)現(xiàn) 主要 代碼： % syhm=request(yhm) smm=request(mm) set rs=() sql=select * from alogin where yhm=39。syhmamp。 sql,conn if syhm= then (管理員的名不能為空 !) % link href=css/ rel=stylesheet type=text/css / pa href=javascript:() 請(qǐng) 輸 入 管 理 員 名 ！/abrbr % () end if if smm= then (密碼不能為空 ) % a href=javascript:()請(qǐng)輸入密碼！ /abr /br / % () end if if syhmchenqing then (您不是系統(tǒng)管理員！ ) % a href=javascript:()請(qǐng)重新輸入系統(tǒng)管理員名！/a br /br / % () else if smm=rs(mm) then (session(file)) else % a href=javascript:()密碼錯(cuò)誤！請(qǐng)重新輸入密碼！/a br /br / % end if end if set rs=nothing set conn=nothing % /p 進(jìn)入聊天室需要進(jìn)行身份認(rèn)證，完成此操作過(guò)后，自動(dòng)跳轉(zhuǎn)至聊天界面，在頁(yè)面上方可以可見(jiàn)當(dāng)前在線人數(shù)， 其 主 要代碼如下： ※ ：聊天室的信息輸入界面 % mywords = Request(message) oneSentence = 姓名： amp。 機(jī)器號(hào) : amp。 說(shuō) : amp。 oneSentence amp。URL= SCRIPT LANGUAGE=JavaScript function scrollWindow() { (0,65000) setTimeout(39。,200) } scrollWindow() /SCRIPT /HEAD BODY % (Application(talk)) % /BODY /HTML 留言簿包含提交留言，瀏覽留言，編輯留言（修改和刪除），清除重寫(xiě)四大模塊，其 中編輯留言需要身份認(rèn)證才可以進(jìn)行 修改 、 刪除操作；并且瀏覽留言采用分頁(yè)顯示技術(shù) 。讀取各字段的數(shù)據(jù) Name = Request(Name) Email = Request(Email) Subject = Request(Subject) Memo = Request(Memo) 39。不再處理以下的程序 End If 39。dbq= amp。 amp。 39。 amp。 39。 amp。 39。 amp。 39。(SQL) (SQL) () () % ※ ：顯示程序 % 39。dbq= amp。按照的樣式輸出 While Not % TABLE BORDER=0 BORDERCOLOR=111111 TR TDBFONT SIZE=4 COLOR=008080姓名： /FONT/B /TD TD%=rs(姓名 )% /TD /TR TRTDBFONT SIZE=4 COLOR=008080 Email:/FONT/B /TD TDA HREF=MAILTO:%=rs()% %=rs()%/A /TD /TR TRTDBFONT SIZE=4 COLOR=008080主題： /FONT/B /TD TD WIDTH=542 HEIGHT=17%=rs(主題 )%/TD/TR TRTDBFONT SIZE=4 COLOR=008080時(shí)間： /FONT/B /TD TD%=rs(時(shí)間 )% /TD /TR TRTDBFONT SIZE=4 COLOR=008080內(nèi)容 /FONT/B /TD TD%=rs(內(nèi)容 )% /TD /TR /TABLE HR % () Wend % 圖 2 留言簿 主頁(yè)面 通訊錄 的功能是保存姓名、 Email地址、家庭住址等常用的聯(lián)系信息。 瀏覽留言采用分 頁(yè)顯示技術(shù) ， 通訊錄 主頁(yè)面 運(yùn)行效果如圖 3 所示 ， 其 主 要 代碼如下： ※ ：添加記錄 % set rs=() txl,conn,1,2 rs(xm)=(xm) rs(lxfs)=(lxfs) rs(bz)=(bz) 記錄己經(jīng)被成功輸入。 id amp。amp。39。amp。39。amp。39。amp。39。 id3 amp。其代碼如下： % () Application(Counter) = Application(Counter) + 1 () Function G ( counter ) Dim S, i S = CStr( counter )