論壇的設計與實現(xiàn)論文畢業(yè)設計論文

1、畢 業(yè) 設 計題 目: 論壇的設計與實現(xiàn)英文題目：the design and development of forum學生姓名: 專 業(yè): 班 級: 指導教師: 摘 要隨著計算機的廣泛應用，人們已經(jīng)對網(wǎng)絡不再感到陌生。在科技飛速發(fā)展的今天，電腦信息技術(shù)與各行各業(yè)進行了有效的結(jié)合。人們在網(wǎng)上可以進行網(wǎng)上購物，網(wǎng)上交友，電子商務，網(wǎng)絡營效等等。面對強大的網(wǎng)絡功能，必須在某方面要有一個健全的系統(tǒng)才能使網(wǎng)絡發(fā)揮的淋漓盡致。在這個平臺上，論壇提供了一個全新的人類溝通新方式。本文主要分析了論壇的主要組成情況，包括論壇的設計目標，框架結(jié)構(gòu)，數(shù)據(jù)流程和論壇的主要特點等，重點介紹了論壇前臺功能模塊的詳細思路和

2、實現(xiàn)方法，以及對后臺數(shù)據(jù)庫關(guān)鍵技術(shù)和部分源代碼的詳細說明。關(guān)鍵詞 asp語言；vb語言；html語言；access數(shù)據(jù)庫。abstractwith the wide application of the computer, people have already no longer felt strange the network. today, science and technology is developed at full speed, computer information technology and all trades and professions have carrie

3、d on effective combination. people can carry on the online shopping , matchmaker , e-commerce on the net, camp's result of the network ,etc. in the face of the strong network function , we must have a sound network function system . the main composition situation of the main analysis forum of th

4、is text, including the design object on the forum, frame structure, data procedure and main characteristic of forum ,etc., introduce forum front desk function detailed thinking and implementation method of module especially, and to backstage supporter's database key technology and elaboration of

5、 some source codes.keywords asp language；vb language； html language；access database。目 錄第一章 系統(tǒng)需求分析51.1 開發(fā)背景51.2 系統(tǒng)實用功能分析5第二章 系統(tǒng)設計82.1相關(guān)術(shù)語解釋:82.2論壇前臺構(gòu)架102.2 論壇前臺實現(xiàn)的功能11第三章 系統(tǒng)后臺數(shù)據(jù)庫設計153.1后臺數(shù)據(jù)庫構(gòu)架153.2后臺數(shù)據(jù)庫實現(xiàn)的功能15第四章 關(guān)鍵代碼描述184.1連接數(shù)據(jù)庫源代碼184.2主頁源代碼194.3管理主頁源代碼24第五章 系統(tǒng)運行37結(jié)束語39致謝40參考文獻41第一章 系統(tǒng)需求分析1.1 開發(fā)背景進入

6、21世紀以后，知識經(jīng)濟的飛速發(fā)展對我們的社會產(chǎn)生了巨大的影響。it業(yè)的飛速發(fā)展不僅僅帶來了巨大的經(jīng)濟效益，也在逐漸改變著我們的生活，其中影響最為廣泛的就是互聯(lián)網(wǎng)了。從事it業(yè)工作的人都知道，互聯(lián)網(wǎng)蘊藏著巨大的“金礦”，如何從這個巨大的財富中獲得一份屬于自己的財富，需要的不僅僅是努力和勤奮，更多的是知識和技術(shù)，只有掌握了知識和技術(shù)才有可能成為知識經(jīng)濟時代成功的淘金者。近年來，隨著internet的迅猛發(fā)展，遠程信息、網(wǎng)上聊天、分布式多媒體系統(tǒng)、電子商務等網(wǎng)絡應用系統(tǒng)的相繼問世，為信息處理的網(wǎng)絡化展示了美好的前景。目前呈幾何增長的互聯(lián)網(wǎng)網(wǎng)站中，有相當一部分仍固守“靜態(tài)”，無形中已大大落后于時代的步

7、伐。所謂“靜態(tài)”指的就是網(wǎng)站的網(wǎng)頁內(nèi)容“固定不變”，當用戶瀏覽器通過互聯(lián)網(wǎng)的http（hypertext transport pr otocol）協(xié)議向web服務器請求提供網(wǎng)頁內(nèi)容時，服務器僅僅是將原已設計好的靜態(tài)html文檔傳送給用戶瀏覽器。其頁面的內(nèi)容使用的僅僅是標準的html代碼，最多再加上流行的gif89a格式的動態(tài)圖片，比如產(chǎn)生幾只小狗小貓跑來跑去的動畫效果。若網(wǎng)站維護者要更新網(wǎng)頁的內(nèi)容，就必須手動地來更新其所有的html文檔。 “靜態(tài)”網(wǎng)站的致命弱點就是不易維護，為了不斷更新網(wǎng)頁內(nèi)容，你必須不斷地重復制作html文檔，隨著網(wǎng)站內(nèi)容和信息量的日益擴增，你就會感到工作量大得出乎想象。所

8、謂“動態(tài)”就是指具有以下幾個特點的網(wǎng)站:1、“交互性”即網(wǎng)頁會根據(jù)用戶的要求和選擇而動態(tài)改變和響應，將瀏覽器作為客戶端界面，這將是今后web發(fā)展的大勢所趨。2、“自動更新”即無須手動地更新html文檔，便會自動生成新的頁面，可以大大節(jié)省工作量。3、“因時因人而即當不同的時間、不同的人訪問同一網(wǎng)址時會產(chǎn)生不同的頁面。這種具有動態(tài)特性的網(wǎng)站的典型代表就是-論壇.1.2 系統(tǒng)實用功能分析隨著時代的進步，人們對網(wǎng)絡的要求也越來越高，論壇就是在這種背景下誕生的。它不僅包含了網(wǎng)站原有的特點，還可以讓人們在瀏覽網(wǎng)頁的情況下還可以發(fā)表自己的觀點，其實這只是最基本的，它還有許多優(yōu)點，下面就讓我們簡潔的陳述一下：

9、用戶功能：（1）發(fā)帖時自動記錄用戶名，email，網(wǎng)友無需每次都輸入。（2）用戶個人信息記錄，密碼提示功能，當用戶忘記密碼時，可以由密碼提示功能獲得密碼。（3）實現(xiàn)用戶頭像功能，您可以象qq一樣，選擇自己喜歡的頭像圖標。（4）查詢與更改密碼、個人信息，及他人信息。（5）實現(xiàn)游客瀏覽功能，你即使不進行注冊，同樣可以瀏覽帖子內(nèi)容，但要發(fā)言必須注冊。緩存保存用戶名和密碼功能，勿需每次發(fā)言都要填寫一次，為用戶提供方便。版主功能：（1）版面顯示版主主頁地址（版主只需在個人信息中維護自己的信息，輸入主頁地址即可。（2）版主登錄之后可以進入版主管理菜單，可以管理論壇版面，管理精華區(qū)域，版主帖子查詢，編輯版面

10、說明等功能。 查詢功能：我們的論壇系統(tǒng)具有超強帖子查詢功能，可以根據(jù)您感興趣的內(nèi)容快速獲得信息。您可以：（1）按發(fā)言人、主題、內(nèi)容的查詢；（2）按帖子的id查詢；（3）查詢最新 50帖；（4）支持多條件復合模糊查詢功能。統(tǒng)計功能：（1）顯示論壇當前注冊總?cè)藬?shù)、當前帖子總數(shù)、帖子點擊總數(shù)、當前在線人數(shù)。 （2）論壇排行榜，對各個版面的點擊數(shù)、文章數(shù)進行排序。（3）用戶表現(xiàn)積分排行，調(diào)動用戶積極性。帖子點擊統(tǒng)計，方便了解熱點話題。本日版面排行榜，本日作者排行榜。帖子功能：（1）顯示帖子發(fā)表日期，點擊數(shù)，字節(jié)數(shù)，回復帖子數(shù)，新帖圖形提示， 24小時內(nèi)新帖一目了然。（2）設定帖子內(nèi)容最大允許的字節(jié)數(shù)。

11、是否允許顯示前帖內(nèi)容（如同回復email一樣回復帖子）?；貜吞觘mail通 知功能，自動將帖子內(nèi)容和相關(guān)鏈接寄回被回復人的信箱中。多版面設置，每個版面可以有自己的版主、主頁連接，可以獨立顯示單一版面。版面功能：（1）具有強大的分頁查看工具條，帖子列表支持分頁顯示，輕松查看所有帖子。 （2）帖子層次列表，結(jié)構(gòu)清晰，一目了然。 其他功能：（1）全面轉(zhuǎn)化 html tag，方便討論主頁設計、 web編程，同時可以有效防止使用腳本語言進行攻擊。（2）類似于frontpage、dreamweaver論壇內(nèi)容編輯器，以方便網(wǎng)友使用html 格式顯示帖子內(nèi)容。此功能代碼部分參考了ubb代碼。ubb代碼是h

12、tml的一個變種,是ultimate bulletin board (國外一個bbs程序，國內(nèi)也有不少地方使用這個程序)，采用的一種特殊的tag來達到html的效果或?qū)崿F(xiàn)其他的功能。第二章 系統(tǒng)設計2.1相關(guān)術(shù)語解釋:html語言:在網(wǎng)上發(fā)布消息，必須使用一種每一臺計算機都能夠識別的語言，這就是html（hypertext markup language），超文本語言。自從上一個世紀90年代web網(wǎng)絡的迅速發(fā)展，這種語言空前繁榮。到1997年1月，隨著html 3.2的推出，html語言得到了很大的發(fā)展，但是有些問題始終難以解決，比如對各種平臺和各種瀏覽器都兼容，等等。因此，人們希望能夠設計出

13、一種html語言，使其能夠盡量反映各個行業(yè)的需求和滿足不同人群的需要。在開發(fā)的同時也充分考慮到網(wǎng)絡上各個方面的使用環(huán)境，比如蜂窩電話，手提設備和輸入輸出的語音系統(tǒng)等等環(huán)境。在1998年4月24日，這一愿望終于實現(xiàn)了，w3c標準化組織發(fā)布了html4.0，將原先的html擴展到一些全新的領(lǐng)域，例如樣式表單，script語言，內(nèi)嵌對象，框架結(jié)構(gòu)甚至賦予殘疾人使用網(wǎng)絡能力等新的功能。這一技術(shù)即使到了新的世紀也仍然具有劃時代的意義。使用html語言可以賦予網(wǎng)絡設計者許多強有力的工具，比如：1、使用各種基礎的印刷元素例如標題、文字、表格、列表、照片、插圖等來發(fā)布在線的文檔。2、通過超文本鏈接可以使用戶方

14、便地在各種信息之間切換，就像單擊一個按鈕一樣簡單。3、設計一種表單控件控制網(wǎng)絡上的各種傳輸、遠程服務等功能，就像查詢信息、訂購貨物等。4、在文檔中直接包含視頻剪接、效片斷、各種腳本程序和另外的許多對象，比如flash和active控件。以上的這些功能是一般的文檔不能完全做到的。這些優(yōu)勢使得html成為網(wǎng)絡上使用的事實標準。asp語言:在網(wǎng)絡程序設計中，asp（active server pages）是服務器端的一種未經(jīng)編譯的開放式程序，程序設計者可按asp的要求來編寫功能強大的網(wǎng)絡應用程序，并實現(xiàn)服務器端的數(shù)據(jù)處理及數(shù)據(jù)上傳與下載。這種程序通常被稱作“asp程序”（或“asp頁”）。一個asp

15、 程序通常包括html標簽語句、文本和腳本程序等。由于這類程序是以“.asp”為擴展名存放的，因此對應的文件可稱作“asp文件”。asp程序是運行于網(wǎng)絡服務器端的一種應用程序。在計算機硬件配置允許的情況下，如果希望運行asp程序，應當安裝一個能夠支持網(wǎng)絡服務器的操作系統(tǒng)。常見的網(wǎng)絡服務器操作系統(tǒng)有個人網(wǎng)絡服務器pws（personal web server）和因特網(wǎng)信息服務器iis（internet information server）。 嚴格地說，asp不是一種編程語言，而是一種開放式的編程環(huán)境。它的數(shù)據(jù)傳送和數(shù)據(jù)處理功能要通過具體的程序設計語言來實現(xiàn)。將腳本語言vbscript（或者ja

16、vascript）與html 語言有機地結(jié)合起來，就可以構(gòu)成這種編程環(huán)境。因此，一個asp程序的語句串，部分來自于腳本語言，部分來自于html。其中，用html語言設計的程序稱作html文檔，是由客戶端瀏覽器解釋執(zhí)行的一種程序；用腳本語言設計的部分，則是專職服務器來運行的。access數(shù)據(jù)庫:數(shù)據(jù)庫的管理系統(tǒng)就是從圖書館的管理方法改進而來的。人們將越來越多的資料存入計算機中，并通過一些編制好的計算機程序?qū)@些資料進行管理，這些程序后來就被稱為"數(shù)據(jù)庫管理系統(tǒng)"，它們可以幫我們管理輸入到計算機中的大量數(shù)據(jù)，就像圖書館的管理員。我們將要學習的access也是一種數(shù)據(jù)庫管理系統(tǒng)。

17、vb語言:visual basic是一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動方式的結(jié)構(gòu)化高級程序設計語言,可用于開發(fā)windows環(huán)境下的各類應用程序.它簡單易學、效率高,且功能強大,可以與windows的專業(yè)開發(fā)工具sdk相媲美。在visual basic環(huán)境下,利用事件驅(qū)動的編程機制、新穎易用的可視化設計工具,使用windows內(nèi)部的應用程序接口(api)函數(shù),以及動態(tài)鏈接庫(dll),動態(tài)數(shù)據(jù)交換(dde),對象的鏈接與嵌入(ole),開放式數(shù)據(jù)訪問(odbc)等技術(shù),可以高效、快速地開發(fā)出windows環(huán)境下功能強大,圖形界面豐富的應用軟件系統(tǒng)。總的來看，visual basic有以下特點

18、：（1）可視化編程（2）面向?qū)ο蟮某绦蛟O計（3）結(jié)構(gòu)化程序設計語言（4）事件驅(qū)動編程機制（5）訪問數(shù)據(jù)庫（6）動態(tài)數(shù)據(jù)交換（dde）（7）對象的鏈接與嵌入（ole）（8）動態(tài)鏈接庫（dll）2.2論壇前臺構(gòu)架畢業(yè)設計論壇是用asp+access（后臺數(shù)據(jù)庫）制作而成的 ，這個論壇的前臺界面大體是用一個個系統(tǒng)模塊組裝而成的。具體的示意圖21所示：圖2-12.2 論壇前臺實現(xiàn)的功能用戶登陸系統(tǒng)：畢業(yè)設計論壇在前臺實現(xiàn)了用戶登陸系統(tǒng)，當你把用戶名和密碼輸入進去，系統(tǒng)會自動和數(shù)據(jù)庫的用戶和密碼進行核對，如果一樣就登陸進去，如果和原始資料對不上就提示你進入注冊頁面進行注冊，注冊成功的話會自動把你的用戶名

19、和密碼輸入到后臺數(shù)據(jù)庫里面，下次不用注冊直接登陸就可以了。論壇的登陸系統(tǒng)如圖所示：當你成為用戶進入論壇時，他會顯示你的個人資料及你的功能：修改我的資料，我發(fā)起的主題，我參與的主題，上傳我的頭像，我上傳的文件，發(fā)送論壇短信，我的論壇權(quán)限，我的論壇收藏，我的論壇好友。 論壇的個人信息如圖所示：在基本資料里面你可以看到你的個人資料并且可以修改，這樣可以使用戶對自己的資料隨時隨地的修改，避免了寫完后不能修改的遺憾。聯(lián)系資料則是提供了電子信箱，oicq號碼，icq號碼，msn帳戶，個人主頁等的聯(lián)系方式，如果你要修改他，必須要先正確輸入密碼才可以，這樣避免了有些人惡意改動別人的聯(lián)系方式。修改密碼則是發(fā)現(xiàn)自

20、己的密碼被別人知道后，處于安全的考慮提供了讓用戶自己改動密碼的功能。在這個論壇里，你不但可以瀏覽網(wǎng)頁，還可以像qq那樣給別人留言，也可以加別人為好友。但是普通用戶也有自己的權(quán)限，那樣就可以區(qū)分版主和普通用戶。除了這個登陸系統(tǒng)外，這個論壇還設計了以下幾個版塊：站務管理，技術(shù)交流，天方夜譚，用戶網(wǎng)絡信息 。 在這幾個版面里，你不但可以對你感興趣的帖子進行留言，而且可以發(fā)表自己的主題，等待其他網(wǎng)友對你帖子的評論。它的功能如圖所示：前臺功能版塊：站務管理的版面如下：技術(shù)交流如下：天方夜譚如下：在上面我們已經(jīng)把登陸和注冊這個系統(tǒng)已經(jīng)講清楚了，下面我們把搜索，論壇狀態(tài)，論壇風格，繁體中文再簡單介紹一下：

21、在搜索里面你可以找到你所要查詢的帖子，只要你輸入了關(guān)鍵字就可輕松查閱到，不用在到處亂找，減少了不必要的時間。具體操作如圖所示：在論壇狀態(tài)里通過今天在線圖例，主題數(shù)圖例，整帖數(shù)圖例，當前在線圖例，當前在線情況，用戶在線圖例，你可以清楚的了解到論壇當前的情況。 今天在線圖例：顯示了當天所有版塊發(fā)帖的數(shù)量。 主題數(shù)圖例：顯示了所有版塊發(fā)帖的數(shù)量情況。 整貼數(shù)圖例：顯示了當天的發(fā)帖數(shù)量。 用戶在線圖例：顯示了當前不同等級的用戶的數(shù)量。 當前在線圖例：顯示了當前所有版塊的用戶數(shù)量情況。 當前在線情況：它提供了在線用戶的計算機系統(tǒng)信息和他的ip地址，還有他的活動時間。通過上面簡單的描述，我們已經(jīng)把這個論壇

22、前臺功能已經(jīng)講清楚了，現(xiàn)在我們就該敘述一下后臺的數(shù)據(jù)庫管理了。 第三章 系統(tǒng)后臺數(shù)據(jù)庫設計3.1后臺數(shù)據(jù)庫構(gòu)架前面已經(jīng)把數(shù)據(jù)庫對大家做了一個簡單的介紹，相信大家對數(shù)據(jù)庫有了一個新的認識?，F(xiàn)在就對畢業(yè)設計論壇的后臺數(shù)據(jù)庫的功能和流程做一個詳細的介紹。首先來看一下該后臺數(shù)據(jù)庫的關(guān)系圖：在上圖中的雙箭頭代表是數(shù)據(jù)的傳輸，比如：用戶在前臺輸入自己的用戶名和密碼進行登陸，系統(tǒng)會自動把用戶名和密碼傳送到后臺數(shù)據(jù)庫的用戶個人資料中進行核對，如果正確將提示登陸成功，如果對不上將提示你用戶名或密碼錯誤并且重新注冊一個新的帳號。 3.2后臺數(shù)據(jù)庫實現(xiàn)的功能下面將詳細介紹數(shù)據(jù)庫每個庫文件的內(nèi)容與功能：用戶個人信息（

23、userdata）它包含了個人所有的信息，比如：新加入時間，最后登陸該論壇的時間，用戶的頭像，密碼，郵箱，等級，密碼問題及問題答案等等。 它的作用是用來記錄和核對用戶的個人資料。系統(tǒng)提示(usernote) 是當你注冊成功的時候系統(tǒng)會給你發(fā)出如：畢業(yè)設計論壇歡迎您的到來畢業(yè)設計論壇全體管理人員歡迎您的到來如有任何疑問請及時聯(lián)系系統(tǒng)管理員。如有任何使用上的問題請查看論壇幫助。感謝您注冊本系統(tǒng)，讓我們一起來建設這個網(wǎng)上家的信息。流程圖如下：它的作用是用來提示新注冊的用戶已經(jīng)注冊成功并且成功登陸。魔法表情（magicface）提供了多種魔法表情供用戶使用。示意圖如下：其實這還只是一小部分，本論壇提供

24、的魔法表情多達329種。這為不同的用戶提供了適合自己的魔法表情。用戶的網(wǎng)絡個人信息（sysonline）是說明了用戶的操作系統(tǒng)，ip地址，瀏覽器，訪問該論壇的時間。 示意圖如下：帖子信息（bbsmessage）包含了用戶發(fā)帖的題目，具體內(nèi)容，用戶昵稱，發(fā)帖時間。具體的示意圖如下：用戶網(wǎng)絡信息和帖子信息這兩個數(shù)據(jù)庫的作用是方便管理員的定期查閱與管理。 我們可以通過下面表格來對后臺數(shù)據(jù)庫的作用有一個更為直接的認識。后臺數(shù)據(jù)庫名稱作用用戶個人資料記錄和核對用戶的個人資料 系統(tǒng)提示提示新注冊用戶已注冊成功且成功登陸 魔法表情為不同用戶提供了適合自己的魔法表情 論壇風格適合不同用戶所喜歡的網(wǎng)站背景而設置

25、 帖子信息方便管理員的定期查閱與管理 用戶網(wǎng)絡信息方便管理員的定期查閱與管理第四章 關(guān)鍵代碼描述在這里把一些關(guān)鍵的代碼列下：4.1連接數(shù)據(jù)庫源代碼<%response.buffer=truedim conn,database,driver,searchnum,starttimesearchnum=0 '數(shù)據(jù)庫查詢次數(shù)，初始值starttime=timer() '運行開始時間sub linkdatabase()database=server.mappath("database/snowboy.mdb")driver="provider = mi

26、crosoft.jet.oledb.4.0;data source ="&databaseset conn=server.createobject("adodb.connection")conn.open driverif err then err.clear set conn=nothing response.write"數(shù)據(jù)庫連接出錯，請檢查連接字符串" response.endend ifend subsub closeconn() conn.closeset conn=nothingend sub'if not isob

27、ject(conn) then call linkdatabase()%>4.2主頁源代碼<!- #include file="inc/sysconfig.asp" -><%snow.nowstats="論壇首頁"snow.head()snow.online()template.gethtml("index")response.write userlogindate()response.write boardlist()response.write useronline()if clng(snow.forumo

28、ption(7)=0 then'是否開放友情連接 response.write friendlink()end ifresponse.write replace(template.html(6),"$userskinpath",template.userskinpath)snow.footer()function userlogindate() dim tempstr,strimg if snow.founduser then tempstr=template.html(1)strimg="<img src='"&sessi

29、on("userinfo")(14)&"' width="&session("userinfo")(15)&" height="&session("userinfo")(16)&" border='1' onload='javascript:if(this.width>90)this.width=90;this.height=90'>"tempstr=replace(tempstr,&

30、quot;$userface",strimg)tempstr=replace(tempstr,"$mynote",session("userinfo")(20)tempstr=replace(tempstr,"$username",snow.username) else tempstr=template.html(2) end if tempstr=replace(template.html(0),"$userloginistrue",tempstr) tempstr=replace(tempstr,&q

31、uot;$membercount",snow.membertotal) tempstr=replace(tempstr,"$newusername",snow.newmember) tempstr=replace(tempstr,"$yesterdaytopic",snow.yesterdaytopic) tempstr=replace(tempstr,"$todaytopic",snow.todaytopic) tempstr=replace(tempstr,"$totaltopic",snow.tot

32、altopic) tempstr=replace(tempstr,"$totalreply",snow.totalreply) tempstr=replace(tempstr,"$topposttopic",snow.topposttopic) tempstr=replace(tempstr,"$toponlinecount",snow.toponlinecount) userlogindate=tempstrend functionfunction boardlist() dim rs,tempstr,boardstr,i,cach

33、estr,getstr,arrstr,endstr,managestr,bistr,bspic '*帶綬存的主區(qū)數(shù)據(jù)* cache.name="boardlist" if cache.objisempty() thenset rs=snow.execute("select boardid,parentid,boardname,child,depict,boardimg,topictotal,replytotal,managename,lasttopicname,lasttopic,lasttopictime,boardstatus,todaytopic,b

34、ootid from bbsboard order by bootid asc,parentid asc,boardid asc")searchnum=searchnum+1if rs.bof or rs.eof then rs.close:set rs=nothing exit functionelse boardstr=rs.getrows(-1)rs.close:set rs=nothingcache.value=boardstrend if end if cachestr=cache.value '#開始分區(qū)# arrstr=split(template.html(3

35、),"§") for i=0 to ubound(cachestr,2) endstr="" if i>0 then if cachestr(1,i)=0 or i=ubound(cachestr,2) then endstr=trim(arrstr(2)end if end if if cachestr(1,i)=0 then tempstr=endstr&"<br>"&replace(trim(arrstr(0),"$boardname",cachestr(2,i)

36、else tempstr=trim(arrstr(1)&endstrtempstr=replace(tempstr,"$boardid",cachestr(0,i)tempstr=replace(tempstr,"$childboardname"," "&cachestr(2,i)&" <br>")tempstr=replace(tempstr,"$depict",cachestr(4,i)&"")if isnull(cachest

37、r(5,i) or cachestr(5,i)="" then bistr="" else bistr="<img src='"&cachestr(5,i)&"'>"tempstr=replace(tempstr,"$boardimg",bistr)tempstr=replace(tempstr,"$lasttopic",cachestr(10,i)&"")tempstr=replace(tempstr,

38、"$lasttopicname",cachestr(9,i)&"")tempstr=replace(tempstr,"$lasttopictime",cachestr(11,i)tempstr=replace(tempstr,"$managename",notnull(cachestr(8,i),"暫無")tempstr=replace(tempstr,"$todaytopic",cachestr(13,i)tempstr=replace(tempstr,"

39、$topictotal",cachestr(6,i)tempstr=replace(tempstr,"$replytotal",cachestr(7,i)'0 正規(guī)論壇 1 鎖定論壇 2 認證論壇 3 會員論壇select case clng(cachestr(12,i) case 0:bspic=template.userskinpath&"board0.gif" case 1:bspic=template.userskinpath&"board1.gif" case 2:bspic=templat

40、e.userskinpath&"board2.gif" case 3:bspic=template.userskinpath&"board3.gif"end selecttempstr=replace(tempstr,"$boardpic",bspic) end if getstr=getstr&tempstr next boardlist=getstrend functionfunction useronline() dim tempstr tempstr=template.html(4) tempstr=r

41、eplace(tempstr,"$onlineuser",snow.onlinecount) tempstr=replace(tempstr,"$onlinemember",snow.onlineuser) tempstr=replace(tempstr,"$onlineguest",snow.onlineguest) tempstr=replace(tempstr,"$greatebbstime",snow.greatebbstime) tempstr=replace(tempstr,"$toponli

42、neuser",snow.toponlinecount) tempstr=replace(tempstr,"$toponlinetime",snow.toponlinetime) tempstr=replace(tempstr,"$userip",snow.userip) tempstr=replace(tempstr,"$usersystem",snow.platform) tempstr=replace(tempstr,"$userie",snow.browser&snow.version)

43、tempstr=replace(tempstr,"$boardid",snow.boardid) useronline=tempstrend functionfunction friendlink() dim tempstr,arrstr,i,charfriend,picfriend,a,b,ca cache.name="friendlink" if cache.objisempty() then set rs=snow.execute("select top 15 friendid,linktype,webname,webdepict,log

44、ourl,linkurl from friendlink order by addtime desc") if not(rs.bof and rs.eof) then cache.value=rs.getrows(-1) else cache.value=empty end if rs.close:set rs=nothing else arrstr=cache.value end if if isarray(arrstr) then a=1 b=1 for i=0 to ubound(arrstr,2) if clng(arrstr(1,i)=0 and a<=7 then

45、picfriend=picfriend&"<a href="&arrstr(5,i)&" target='_blank' title='網(wǎng)站說明:&#13;"&arrstr(3,i)&"'><img src="&arrstr(4,i)&" width=88 height=31 border=0></a> "a=a+1 end if if clng(arrstr(1,i)=1 and b

46、<=8 then charfriend=charfriend&"<a href="&arrstr(5,i)&" target='_blank' title='網(wǎng)站說明:&#13;"&arrstr(3,i)&"'>"&arrstr(2,i)&"</a> "b=b+1 end if next end if tempstr=template.html(5) tempstr=replace(temp

47、str,"$picfriend",picfriend) tempstr=replace(tempstr,"$charfriend",charfriend) friendlink=tempstr end function%>4.3管理主頁源代碼<!-#include file="inc/function.asp" -><html><head><meta http-equiv="content-type" content="text/html; charset=

48、gb2312"><title>畢業(yè)設計論壇</title><link href="images/style.css" rel="stylesheet" type="text/css"></head><body><table width="158" border="0" align="center" cellpadding="0" cellspacing="0&quo

49、t;> <tr> <td><img src="images/title.gif" width="158" height="38"></td> </tr></table><table width="158" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> &l

50、t;td height="25" background="images/title_bg_quit.gif"><span><strong><a href="./index.asp" target="_blank">論壇首頁</a></strong> <strong>|</strong> <strong><a href="admin_logout.asp" target="_par

51、ent">退出</a></strong></span></td> </tr></table>&nbsp; <table width="158" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="25" background="images/a

52、dmin_left_1.gif" onclick="showsubmenu(1)" onmouseover="this.classname='menu_title2'" onmouseout="this.classname='menu_title'" class="menu_title"><span>常規(guī)管理</span></td> </tr> <tr> <td id=submenu1><d

53、iv class="table-border-3" style="width:158px"> <table width=150 align=center cellpadding=0 cellspacing=0> <tbody> <tr> <td height=5></td> </tr> <tr> <td height=20><img src="images/bullet.gif" width="6" heig

54、ht="6"><a href="admin_config.asp" target=main> 基本設置</a> | <a href="admin_setcache.asp" target=main>綬存管理</a></td> </tr> <tr> <td height=23><img src="images/bullet.gif" width="6" height="6"

55、;><a href="admin_log.asp?action=manage" target=main> 論壇日志</a> | <a href="admin_notemsg.asp" target="main">短信管理</a></td> </tr> <tr> <td height=20><img src="images/bullet.gif" width="6" height="

56、;6"> <a href="admin_friend.asp" target=main>友情管理</a> | <a href="admin_message.asp" target="main">公告管理</a></td> </tr> <tr> <td height=21><img src="images/bullet.gif" width="6" height="6&q

57、uot;><a href="admin_message.asp" target="main"> </a> <a href="admin_sysinfo.asp" target="main">系統(tǒng)信息</a></td> </tr> <tbody> </tbody> </table> </div><div style="width:158px"> <tabl

58、e width="135" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="20">&nbsp;</td> </tr> </table> </div> </td> </tr></table><table width="158" border="0"

59、align="center" cellpadding="0" cellspacing="0"> <tr> <td height="25" background="images/admin_left_2.gif" onclick="showsubmenu(2)" onmouseover="this.classname='menu_title2'" onmouseout="this.classname='

60、;menu_title'" class="menu_title"><span>論壇管理</span></td> </tr> <tr> <td id=submenu2><div class="table-border-3" style="width:158px"> <table width=150 align=center cellpadding=0 cellspacing=0> <tbody> <t

61、r> <td height=5></td> </tr> <tr> <td height=20><img src="images/bullet.gif" width="6" height="6"><a href="admin_board.asp?action=add" target=main> 論壇版面添加</a> | <a href="admin_board.asp?action=manage" target="main">管理</a></td> </tr> <tr> <td height=23><img src="images/bullet.gif" width="6" height="6"><a href="admin_boardsetting.asp" target=main> 論壇版面用戶權(quán)限設置</a></td> </tr&