【正文】 失 敗 成 功留 言 管 理 圖 52 維護(hù) 子系統(tǒng) 結(jié)構(gòu)圖 22 模塊 設(shè)計(jì) 本系統(tǒng)分為 兩 個(gè)子系統(tǒng) ： 教學(xué)子系統(tǒng) 與 維護(hù)子系統(tǒng) 。 其中教學(xué)子系統(tǒng)分為用戶注冊(cè)與 登錄模塊，留言模塊，課件上傳下載模塊；維護(hù)子系統(tǒng)分為管 理員注冊(cè) 與 登錄模塊，用戶信息 管理 模塊，留言 管理 模塊 和課件管理模塊 。 注冊(cè) 與 登錄 一個(gè)網(wǎng)站，一般來說最基本的功能就是 注冊(cè) 、 登錄模塊。 無論是教學(xué)子系統(tǒng)，還是維護(hù)子系統(tǒng)，都要求用戶先進(jìn)行登錄。 用戶登錄之前，要先進(jìn)行注冊(cè)。注冊(cè)開始，首先驗(yàn)證所填入信息是否為空，如果為空，則會(huì)提示出錯(cuò)，必須重新填寫注冊(cè)表單。然后再驗(yàn)證用戶名是否存在同名，如果存在，也會(huì)提示出錯(cuò)，返回注冊(cè)表單重新填寫。 注冊(cè) 流程如圖 53 所示。 注 冊(cè)是 否 為 空是 否 同 名密 碼 是 否 正 確NNY注 冊(cè) 成 功YY出 錯(cuò)N 圖 53 用戶注冊(cè)流程 注冊(cè)成功之后，就可以使用注 冊(cè)的用戶名和密碼進(jìn)行登錄了。 登錄流程如圖 54 所示 。 23 登 錄用 戶 名 / 密 碼是 否 正 確登 錄 成 功YN注 銷 登 錄 圖 54 用戶登錄流程 用戶留言 要在網(wǎng)站的留言板發(fā)表留言，之前，系統(tǒng)要對(duì)用戶是否登錄進(jìn)行判斷。如果用戶沒有登錄，那么該用戶只能夠?qū)α粞赃M(jìn)行瀏覽，而不能夠在留言板上發(fā)表留言。 模塊流程如圖 55 所示。 24 開 始 留 言發(fā) 表 留 言登 錄是 否 登 錄YNN留 言 成 功出 錯(cuò)是 否 為 空Y 圖 55 用戶留言模塊流程 課件上傳 與 下載 課件的上傳 與 下載 ， 是本系統(tǒng)進(jìn)行教學(xué)輔助的主體功能。對(duì)于這個(gè)模塊的設(shè)計(jì)，并沒有涉及到用戶是否登錄的 問題，只要求用戶能對(duì)本系統(tǒng)的課件進(jìn)行下載，或者把自己所有的課件上傳到系統(tǒng)上面就可以了 。這是 本系統(tǒng) 教學(xué) 開放性的一個(gè)體現(xiàn)。 用戶信息 管理 管理員對(duì)用戶信息進(jìn)行修改 與 刪除 的模塊。 修改 流程如圖 56 所示。 25 修 改 用 戶 信 息修 改 成 功出 錯(cuò)是 否 正 確是 否 為 空NYYN 圖 56 用戶信息 修改流程 刪除流程如圖 57 所示。 刪 除 用 戶 信 息刪 除 成 功是 否 刪 除YN 圖 57 用戶信息刪除流程 留言 管理 管理員 管理 留言的模塊。 用戶在留言板里面把留言發(fā)表之后，并不能就能在網(wǎng)頁中顯示出來。為了防止用戶的惡意留 言，管理員要對(duì)用戶的留言進(jìn)行逐一的審核。只有審核通過了，留言才能在留言板里面顯示給用戶瀏覽。對(duì)于用戶的提問，管理員必須具備回復(fù)留言的功能，以回答用戶提出的問題。留言的刪除模塊，是為了清除歷時(shí)已久的留 26 言，避免不必要的留言對(duì)數(shù)據(jù)庫的占用，影響系統(tǒng)的運(yùn)行 速度 。 課件 管理 課件作為本系統(tǒng)在網(wǎng)絡(luò)上傳播教學(xué)信息的一個(gè)重要途徑，對(duì)其進(jìn)行管理是非常必要的。對(duì)于錯(cuò)誤的課件，或者是用戶惡意上傳的包含著不良信息的文件，要對(duì)其進(jìn)行刪除。所以，要設(shè)計(jì)這個(gè)模塊，使得管理員能夠?qū)φn件執(zhí)行刪除的操作。 27 6 系統(tǒng)實(shí)現(xiàn) 數(shù)據(jù)庫連接 本系統(tǒng)直接采 用了 Access 文件的 絕 對(duì)路徑來實(shí)現(xiàn) 連接 數(shù)據(jù)庫的功能， 在系統(tǒng)文件的 config 文件夾里面創(chuàng)建一個(gè)名為 的文件，里面寫入 連接數(shù)據(jù)庫的 代碼： % dim conn,dbpath set conn=() dbpath=/db/ DRIVER=Driver do Microsoft Access (*.mdb)。 DBQ=amp。(dbpath amp。 ) % 在需要引入數(shù)據(jù)庫的頁面 頭部 ，加入以下代碼，就可以連接到已經(jīng)創(chuàng)建好的數(shù)據(jù)庫上了： ! include file=config/ 系統(tǒng)功能實(shí)現(xiàn) 教學(xué)子系統(tǒng) 1) 用戶主頁 正如用戶主頁所設(shè)計(jì)的一樣，用戶進(jìn)入到主頁后，可以看到如圖 61 所示界面： 28 圖 61 用戶主頁 通過主頁，用戶可以 登錄，或者 進(jìn)入到用戶注冊(cè)界面， 進(jìn)入課件中心，查看留言板，或者到相關(guān)鏈接的網(wǎng)站進(jìn)行瀏覽。 在主頁的留言板顯示區(qū)域， 倒序 顯示留言板的內(nèi)容。留言的顯示記錄條數(shù)是八條 以內(nèi) 。 如果沒有留言記錄，則顯示“還沒有 留言信息！” 其實(shí)現(xiàn)代碼如下： % sql=select top 8 m_id,m_title from tbl_message where m_check=true order by m_id DESC sql,conn,1,1 if and then % 首先，用 SQL 查詢語句查詢數(shù)據(jù)庫的留言表，顯示出留言的標(biāo)題。由于加入的 top關(guān)鍵字，所以顯示出來的留言總數(shù)最大為 8 條。審核字段的值“ m_check=true”即要求顯示的必須是管理員審核通過的留言 。 “ by m_id DESC”是讓留言按 ID 倒排列 ，顯示的留言便是最新的留言了。 If 語句用來判斷如果沒有符合條件的記錄。則顯示表格的第一行。 在表格第一行內(nèi)加入“還沒有留言信息！”，如果查不到符合條件的留言記錄，就會(huì)顯示出這句話了。否則，執(zhí)行下面的語句： 29 % else while not % 這個(gè)是 while 循環(huán)語句，顯示表格的第二行。 a href=?m_id=%=rst(m_id)% target=_blank 上面創(chuàng)建了留言標(biāo)題的鏈接， 指向 頁面。并加入了 ID 參數(shù)標(biāo)識(shí)要查看哪條留言，留言頁接收到 ID 參數(shù)后，就知道要顯示哪條留言給用戶瀏覽了。 類似于留言板顯示，課件中心的顯示區(qū)域也顯示了八個(gè)以內(nèi)的課件。如果數(shù)據(jù)庫沒有課件的記錄存在，則顯示“還沒有課件信息！” 。 2) 用戶的注冊(cè) 與 登錄 ① 用戶注冊(cè) 從主頁點(diǎn)擊“注冊(cè)”后，進(jìn)入用戶的注冊(cè)頁面。注冊(cè)要求除了郵箱信息外，其它的用戶信息都必須填寫，否則就彈出提示，提示“除郵箱外，所有信息都必須填寫！”此外，當(dāng)用戶信息已經(jīng)存在于數(shù)據(jù)庫中時(shí)，不能夠再次進(jìn)行注冊(cè)，系統(tǒng)會(huì)提示“已經(jīng)存在同名用戶！”。當(dāng)用戶成功注冊(cè)后，系統(tǒng)彈出一個(gè)對(duì)話框提示“注冊(cè)成功！”，然后頁面會(huì)自動(dòng)跳轉(zhuǎn)到用戶主頁。否則提示“注冊(cè)失??！”，用戶必須重新注冊(cè)。 注冊(cè)頁面如圖 62 所示。 30 圖 62 用戶注冊(cè)頁面 注冊(cè)具體功能實(shí)現(xiàn)代碼： % dim sql,rst if (act)=reg then if (zhanghao)= or (mima)= or (xingming)= or (xingbie)= then msgboxU 除郵箱外，所有內(nèi)容都需要填寫！ % 首先，如果接受到用戶提交的注冊(cè)請(qǐng)求，則執(zhí)行以下判斷：如果帳號(hào)、密碼、姓名、性別 任何一個(gè)為空的話，則彈出提示“除郵箱外，所有內(nèi)容都需要填寫！”否則執(zhí)行下面的語句： %else set rst=() sql=select count(*) as reum from zhuche where zhanghao=39。amp。(zhanghao)amp。39。 31 sql,conn,1,1 if rst(reum)0 then msgboxU 已經(jīng)存在同名用戶！ else sql=insert into zhuche (zhanghao,mima,xingming,xingbie,youxiang) values(39。amp。(zhanghao)amp。39。,39。amp。(mima)amp。39。,39。 amp。 (xingming) amp。 39。,39。 amp。 (xingbie) amp。 39。,39。 amp。 (youxiang) amp。 39。) sql set myErrors= if =0 then script language=Javascriptalert(39。注冊(cè)成功 39。)。 =39。39。/ + script 39。msgboxU 注冊(cè)成功！ else msgboxU 注冊(cè)失?。≡颍?amp。(0).description end if end if set rst=nothing end if end if % 上面的語句先從數(shù)據(jù)庫里面查詢判斷是否存在 與用戶名 相同的記錄，如果存在，則彈出提示“已經(jīng)存在同名用戶！” 執(zhí)行 SQL 插入語句，如果沒發(fā)現(xiàn)錯(cuò)誤，提示“注冊(cè)成功 !” 并 跳轉(zhuǎn)回 主頁。如果發(fā)現(xiàn)錯(cuò)誤，提示“注冊(cè)失敗！”以及原因。 其中，代碼中的 msgboxU 是一個(gè)自編函數(shù)，函數(shù)存放在命名為 的文件中，它的具體代碼是： % 39。在客戶端彈出提示消息 sub msgboxU(str) 32 (script language=vbscript msgbox amp。chr(34)amp。stramp。chr(34)amp。/script) end sub % msgboxu 起到 在客戶端彈出提示信息 的作用 。 使用 msgboxU 這個(gè)函數(shù)之前， 要在頁面頭部加入 ! include file=config/ ，才 可以 對(duì) msgboxU 函數(shù)進(jìn)行調(diào)用 。 ② 用戶登錄 用戶的登錄功能是在用戶主頁上實(shí)現(xiàn)的。用戶在 表單中 輸入 注冊(cè)過的 用戶名 與 密碼， 經(jīng)校驗(yàn)正確之后，就可以成功登錄。成功登錄后，表單會(huì)出現(xiàn)“歡迎您”等字樣。當(dāng)用戶想撤銷登錄時(shí)，還可以點(diǎn)擊“退出登錄”，實(shí)現(xiàn)退出登錄功能。 用戶登錄成功頁面如圖 63 所示。 圖 63 用戶登錄成功頁面 具體實(shí)現(xiàn)的代碼： % 39。用戶登錄 33 if (act)=login then sql=select * from zhuche where zhanghao=39。amp。(zhanghao)amp。39。 and mima=39。amp。(mima)amp。39。 sql,conn,1,1 if not then session(s_loginID)=rst(useid) session(s_loginUSER)=rst(zhanghao) else msgboxU 登錄失??！ end if end if % 以上代碼是 先判斷是否收到到登錄請(qǐng)求，如果收到了登錄請(qǐng)求，則 從數(shù)據(jù)庫里面進(jìn)行查找，核對(duì)是否存在于登錄輸入的用戶名以及密碼相符的記錄，如果存在，則把 useid（ 用戶 ID） 與 zhanghao（ 用戶名 ） 分別賦值給 session變量的 “ s_loginID” 與 “ s_loginUSER”。然后在表單里面加入 “歡迎您， session(“s_loginUSER”)” ，則登錄 成功后就會(huì)顯示歡迎登錄用戶的句子了。 % if session(s_loginID)= then % 代碼用 session(s_loginID)判斷用戶是否成功登錄，如果其值為空，則顯示表單，說明用戶還沒有登錄。否則，表單內(nèi)返回的是：歡迎您， session(s_loginUSER)的值 。 要撤銷登錄，只需要將 session 的值清空，便達(dá)到了退出登錄的效果。代碼如下： % if (act)=unlogin then session(s_loginID)= session(s_loginUSER)= end if % 3) 課件的下載 與 上傳 進(jìn)入課件中心頁面，頁面用列表的形式給用戶展示現(xiàn)有的課件，如圖 64 所示。 34 圖 64 課件中心頁面 其具體實(shí)現(xiàn)的代碼有： % set rst=() kejian,conn,1,1 if not then % %for i=1 to % %=i% %=rst(fname)% a href=?n=%=rst(fsave)%下載 /a % next% 以上代碼實(shí)現(xiàn)的是把課件信息順序列出來。第一個(gè)單元格顯示的是 i，其表示的是從 1 到無限大的自然數(shù)；第二個(gè)單元格顯示的是 fname，即數(shù)據(jù)庫 kejian 表格中記錄的fname 課件名稱；第三個(gè)單元格調(diào)用 ，將用戶點(diǎn)擊下載的 課件保存標(biāo)識(shí) fsave進(jìn)行對(duì)應(yīng)課件下載。 35 添加課件的頁面如圖 65。 圖 65 課件添加頁面 上傳成功后提示如圖 66 所示。 圖 66 上傳成功提示 返回頁面后刷新，會(huì)發(fā)現(xiàn)課件已經(jīng)在課件中心列出來了。如圖 67。 36 圖 67 上傳課件后的課件中心頁面 4) 用戶留言 用戶進(jìn)入留言板，如果用戶沒有登錄，界面如圖 68 所示?？?