【正文】 n=bottom class=left_txt%=((lmsm).Value)%%=left(((lmjs).Value),70)%/td td colspan=2 align=left valign=bottom class=left_txt版主：%=((mkuser).Value)%/td td width=98 align=center valign=bottom class=left_txt%=((lmaddtime).Value)%/td td width=50 align=center valign=bottom class=Submita href=../?%= (MM_keepNone) amp。 lmid= amp。熱門帖子欄目設(shè)計(jì)效果圖如圖511所示：圖516 熱門帖子欄目設(shè)計(jì)效果圖l 主題欄目詳細(xì)頁(yè)面設(shè)計(jì)當(dāng)訪問(wèn)者想訪問(wèn)某個(gè)欄目時(shí)，點(diǎn)擊“查看全部”可以轉(zhuǎn)到欄目詳細(xì)信息頁(yè)面，比如屬于這個(gè)欄目的全部帖子信息，比如說(shuō)帖子的關(guān)鍵字、點(diǎn)擊數(shù)、其他訪問(wèn)者的評(píng)價(jià)和發(fā)布時(shí)間等。在此頁(yè)面中，訪問(wèn)者可以查看帖子的詳細(xì)信息，例如帖子發(fā)表人、來(lái)源、點(diǎn)擊數(shù)、內(nèi)容、添加時(shí)間等信息，訪問(wèn)者還可以對(duì)帖子進(jìn)行評(píng)價(jià)，例如送花或者扔磚頭。，連接到數(shù)據(jù)庫(kù)文件，作用是當(dāng)訪問(wèn)者訪問(wèn)帖子后表中帖子的點(diǎn)擊數(shù)加1。功能實(shí)現(xiàn)大致的過(guò)程為：建立第2個(gè)記錄集的篩選條件是帖子idURL參數(shù)tzid，數(shù)據(jù)庫(kù)表為帖子表（tie）；建立第3個(gè)記錄集的篩選條件是帖子idURL參數(shù)tzid，數(shù)據(jù)庫(kù)表為帖子表（tie），并分別添加顯示區(qū)域—如果記錄集不為空則顯示。nbsp。nbsp。nbsp。nbsp。 MM_joinChar(MM_keepNone) amp。 (tzid).Value %%=((bt).Value)%/A % End If 39。nbsp。nbsp。nbsp。 MM_joinChar(MM_keepNone) amp。 (tzid).Value %%=((bt).Value)%/A % End If 39。在tab1中還設(shè)置了一個(gè)隱藏域，用來(lái)保存訪問(wèn)者的ip地址。設(shè)置送花的超鏈接的變量pj=1，扔磚頭的超鏈接的變量pj=2，其中主要代碼為：a href=?pj=1amp。tzid=%=Trim((tzid))%送花%=((good).Value)%/aamp。amp。a href=?pj=2amp。tzid=%=Trim((tzid))%扔磚頭%=((bad).Value)%/a 發(fā)表新帖和修改帖子模塊設(shè)計(jì)發(fā)表帖子信息頁(yè)面的主要功能是為用戶提供發(fā)表帖子信息的頁(yè)面，且只有注冊(cè)過(guò)的會(huì)員和管理員才能訪問(wèn)此頁(yè)面發(fā)表新帖，若用戶沒(méi)有登錄時(shí)訪問(wèn)此頁(yè)面則會(huì)彈出對(duì)話框提示請(qǐng)登錄，用戶發(fā)表的帖子將展示在版面的詳細(xì)信息頁(yè)面。如果用戶已登錄，則獲取表單傳遞的數(shù)據(jù)，限制表單數(shù)據(jù)不能為空值，然后將用戶填寫的帖子信息添加到數(shù)據(jù)庫(kù)中并在欄目帖子詳細(xì)信息頁(yè)面顯示已發(fā)表的帖子。發(fā)表帖子信息頁(yè)面的部分程序代碼如下：%While (NOT )%option value=%=((mkid).Value)% %If (Not isNull(((mkname).Value))) Then If (CStr((mkid).Value) = CStr(((mkname).Value))) Then (selected=selected) : ()% %=((mkname).Value)%/option% () Wend If ( 0) Then Else End If % /select /td td width=295 class=sec1 div id=username input name=sylm type=hidden id=sylm value=%=((sylm).Value)% /發(fā)表帖子模塊設(shè)計(jì)效果圖如圖520所示：圖520 發(fā)表新帖模塊設(shè)計(jì)圖第6章 后臺(tái)功能模塊詳細(xì)設(shè)計(jì) 后臺(tái)文件總體結(jié)構(gòu) 模塊功能介紹后臺(tái)頁(yè)面只限制管理員訪問(wèn)，若普通用戶進(jìn)入則系統(tǒng)會(huì)彈出對(duì)話框提示用戶無(wú)權(quán)訪問(wèn)并返回首頁(yè)。p 用戶管理模塊：主要包括查看用戶信息，查看全部普通用戶或高級(jí)用戶，設(shè)置用戶等級(jí)例如用戶等級(jí)的修改、刪除，添加新管理員p 帖子管理模塊：主要包括管理版面對(duì)應(yīng)的全部的帖子詳細(xì)信息，版主或超級(jí)管理員可以對(duì)其進(jìn)行查看或刪除的功能。p 版塊管理：主要包括已有版塊的查看、修改和刪除，也可查看版塊對(duì)應(yīng)全部帖子的所有信息，此模塊只限制超級(jí)管理員的訪問(wèn)，超級(jí)管理員可以添加新的版塊。p 管理員退出：主要用于當(dāng)前管理員退出后臺(tái)管理系統(tǒng)并且返回到論壇首頁(yè)。 FileName=39。 DesigntimeType=ADO 39。 Catalog= 39。% 后臺(tái)功能各模塊詳細(xì)設(shè)計(jì)后臺(tái)頁(yè)面只限制管理員訪問(wèn)，若普通用戶進(jìn)入則系統(tǒng)會(huì)彈出對(duì)話框提示用戶無(wú)權(quán)訪問(wèn)并返回首頁(yè)?？蚣躭eft用來(lái)顯示后臺(tái)動(dòng)態(tài)導(dǎo)航。 用戶模塊設(shè)計(jì)主要包括查看用戶信息，查看全部普通用戶或高級(jí)用戶，設(shè)置用戶等級(jí)例如用戶等級(jí)的修改、刪除，添加新管理員，對(duì)用戶進(jìn)行添加刪除等操作。在該頁(yè)面中建立記錄集與表單中相關(guān)項(xiàng)進(jìn)行綁定，用來(lái)在頁(yè)面中顯示想要顯示的選項(xiàng)，并建立重復(fù)區(qū)域和記錄集導(dǎo)航條，用來(lái)顯示記錄集所有記錄且當(dāng)記錄過(guò)多的時(shí)候分頁(yè)顯示，方便管理員的查看。此功能的實(shí)現(xiàn)代碼如下：% If Trim((type)) Then %%set Command1 = () = MM_conn_STRING = DELETE FROM user_huiyuan WHERE uid = + Replace(Command1__a, 39。39。在此頁(yè)面首先建立服務(wù)器行為—限制對(duì)頁(yè)的訪問(wèn)操作，限制只有超級(jí)管理員可以對(duì)其進(jìn)行修改和查看，而普通管理員只有查看的權(quán)限但不能修改。在修改處設(shè)置超鏈接鏈接到管理員權(quán)限修改頁(yè)面，設(shè)置其記錄集的篩選項(xiàng)id為管理員顯示頁(yè)面修改請(qǐng)求的管理員id。此頁(yè)面主要作用是添加新的管理員并賦予其相關(guān)的權(quán)限。該數(shù)據(jù)即可保存到數(shù)據(jù)庫(kù)用戶表中。實(shí)現(xiàn)上述功能的部分設(shè)計(jì)代碼為：%Dim Recordset1__MMColParam Recordset1__MMColParam = 1If (Session(MM_username) ) Then Recordset1__MMColParam = Session(MM_username)End If%%Dim Recordset1 Dim Recordset1_cmdDim Recordset1_numRowsSet Recordset1_cmd = () = MM_conn_STRING = SELECT * FROM 后臺(tái)管理員權(quán)限 WHERE [管理員] = ? = true (param1, 200, 1, 255, Recordset1__MMColParam) 39。通過(guò)建立選擇用戶表的記錄集，設(shè)置其篩選條件是表u_name字段等于建立的階段變量MM_username，這樣當(dāng)某個(gè)用戶訪問(wèn)此頁(yè)面的時(shí)候，這個(gè)頁(yè)面顯示的就是某個(gè)用戶在上一次修改后保存的詳細(xì)信息，方便用戶的修改。帖子管理模塊主要包括管理版面對(duì)應(yīng)的全部的帖子詳細(xì)信息，版主或超級(jí)管理員可以對(duì)其進(jìn)行查看或刪除的功能。模塊具體頁(yè)面功能詳細(xì)設(shè)計(jì)如下所示：l 版塊帖子管理頁(yè)面設(shè)計(jì)版塊帖子管理頁(yè)面的主要作用是在該頁(yè)面顯示管理員等級(jí)所對(duì)應(yīng)的版塊的全部帖子信息，若是版主訪問(wèn)此頁(yè)面，該頁(yè)面顯示的是該版主權(quán)限下的版塊內(nèi)的全部帖子信息；若是超級(jí)管理員訪問(wèn)此頁(yè)面，該頁(yè)面顯示的是論壇內(nèi)所有版塊下的全部帖子信息。實(shí)現(xiàn)上述功能的部分代碼如下：table width=750 border=0 align=center cellpadding=0 ellspacing=0% While ((Repeat1__numRows 0) AND (NOT )) %trtd width=200 height=38 valign=bottom id=div2%=((bt).Value)%/tdtd width=200 valign=bottom id=div2amp。%=left(((nr).Value),30)%/tdtd width=80 align=center valign=bottom id=div2%=((mkname).Value)%/tdtd width=80 align=center valign=bottom id=div2%=((lmname).Value)%/tdtd width=50 align=center valign=bottom id=div2%=((djs).Value)%/tdtd width=80 align=center valign=bottom id=div2amp。%=((addtime).Value)%/tdtd width=60 align=center valign=bottom id=div2%=((mkuser).Value)%/tdtd width=32 align=center valign=bottom id=div2a href=/adm_ht/?type=delamp。id=%=((tzid).Value)% onClick={if(confirm(39。)){return true。其頁(yè)面功能設(shè)計(jì)效果如圖620所示：圖620 帖子管理頁(yè)面設(shè)計(jì) 版塊管理模塊設(shè)計(jì)主要包括已有版塊的查看、修改和刪除，也可查看版塊對(duì)應(yīng)全部帖子的所有信息，此模塊只限制超級(jí)管理員的訪問(wèn)，超級(jí)管理員可以添加新的版塊。超級(jí)管理員可以按需求進(jìn)行修改、刪除或者查看欄目?jī)?nèi)所有帖子信息等操作。實(shí)現(xiàn)上述功能的部分代碼為：% While ((Repeat2__numRows 0) AND (NOT )) %%Dim lmsum Dim lmsum_numRowsSet lmsum = () = MM_conn_STRING = SELECT count(lmid) as lmsum FROM mok_cx WHERE lmid=amp。 = 0 = 2 = 1 ()lmsum_numRows = 0%tr td height=38 valign=bottom id=div2（%=((lmpx).Value)%）%=((lmname).Value)%（帖子總數(shù)：%=((lmsum).Value)%）/td td height=27 valign=bottom id=div2%=((lmsm).Value)%/td td valign=bottom id=div2amp。/td td align=center valign=bottom id=div2%=((lmaddtime).Value)%/td td align=center valign=bottom id=div2修改/td td align=center valign=bottom id=div2A HREF=../?%= (MM_keepNone) amp。 lmid= amp。在添加頁(yè)面可以選擇要添加的欄目數(shù)量，當(dāng)前默認(rèn)值為2，當(dāng)點(diǎn)擊欄目數(shù)量列表內(nèi)的數(shù)字后，旁邊會(huì)顯示相應(yīng)數(shù)量的欄目添加的信息，超級(jí)管理員可以相應(yīng)添加依次數(shù)量的欄目信息。inum。 } //alert(str)。 = num1。設(shè)置建立記錄集的篩選條件是版塊id等于URL參數(shù)請(qǐng)求的版塊id，這樣當(dāng)在版塊管理頁(yè)面點(diǎn)擊某個(gè)版塊修改的時(shí)候，頁(yè)面會(huì)自動(dòng)跳轉(zhuǎn)到修改頁(yè)面，且該頁(yè)面上會(huì)顯示前面點(diǎn)擊修改的版塊欄目的詳細(xì)信息，方便管理員對(duì)其進(jìn)行修改。nbsp。nbsp。nbsp。其實(shí)現(xiàn)主要通過(guò)一段簡(jiǎn)單的代碼完成，并在后臺(tái)框架的頭部的退出圖片建立超鏈接。 *** Logout the current user. MM_logoutRedirectPage = (MM_Username)(MM_UserAuthorization)If (MM_logoutRedirectPage ) Then (MM_logoutRedirectPage)%，但是所有首頁(yè)有的功能或鏈接該頁(yè)面都與首頁(yè)相同。%39。輸入url目標(biāo)網(wǎng)頁(yè)地址，返回值getHTTPPage是目標(biāo)網(wǎng)頁(yè)的html代碼function getHTTPPage(url) dim Http set Http=() GET,url,false() if 4 then exit function end ifgetHTTPPage=bytesToBSTR(,GB2312)set =nothing if 0 then end function39。filename),2,true) 39。經(jīng)過(guò)自己的不懈努力,我已基本上完成了這個(gè)項(xiàng)目。所以系統(tǒng)的安全性考慮的還不夠全面，軟件測(cè)試做的還不太到位，頁(yè)面作的也不足夠美觀，功能的實(shí)現(xiàn)也不全面。前期分析時(shí)本想來(lái)實(shí)現(xiàn)添加相冊(cè)管理這一功能，但因時(shí)間有限，最終只好放