【導(dǎo)讀】覽者相互溝通、吸引用戶、服務(wù)用戶的。他起源于20世紀(jì)80年代初，最初只是。功能越來(lái)越強(qiáng)大。由于得到了廣大網(wǎng)友的歡迎，越來(lái)越多的商業(yè)網(wǎng)站開(kāi)始重視論。壇，把論壇作為與用戶交流的平臺(tái)和在線技術(shù)支持與服務(wù)的平臺(tái)。能，如建立網(wǎng)友的榮譽(yù)系統(tǒng)，美化論壇的界面。發(fā)可以歸結(jié)為Web開(kāi)發(fā)技術(shù)和數(shù)據(jù)庫(kù)應(yīng)用技術(shù)。目前主要的開(kāi)發(fā)技術(shù)有ASP、目前常用的數(shù)據(jù)庫(kù)有MYSQL、Oracal等，在數(shù)據(jù)庫(kù)。的選取上，為了簡(jiǎn)化架設(shè)的實(shí)現(xiàn)，采取Microsoft公司的Access作為數(shù)據(jù)庫(kù)平臺(tái)，這樣在單機(jī)上架設(shè)一個(gè)簡(jiǎn)單的論壇幾乎不需要安裝任何程序。本文設(shè)計(jì)的流程是。構(gòu)的設(shè)計(jì)，最后開(kāi)始每個(gè)模塊的編程與開(kāi)發(fā)。

　　

【正文】 般論壇的首頁(yè)分 4個(gè)部分，上面是論壇的頂部 LOGO，一般這個(gè)要體現(xiàn)出論壇的一個(gè)主題；接著是論壇的導(dǎo)航部分，包括了用 戶狀況和論壇了基本狀況，且這兩個(gè)狀況應(yīng)該左右分開(kāi)；再下面就是論壇主題部分的各個(gè)版面信息；最下面就是論壇用戶在線狀況論壇當(dāng)前的情況。 基本上可能變動(dòng)大的只有版面部分，所以其他變動(dòng)小的部分可以做成公用文件，讓其他頁(yè)面可以重用。這 3 部分不寫在文件里，而是直接寫進(jìn)數(shù)據(jù)庫(kù)中。如程序 31。 程序 31 首頁(yè)公用程序 !HTML 頭 !DOCTYPE HTML PUBLIC “//W3C//DTD HTML Transitional//EN” html head meta equiv=”ContentType” content=”text/html。 charset=gb2312 meta name=”generator” content=”dvbbs” meta name=keywords content=”{$keyword}” meta name=”description” content=”{$description}” !—論壇首頁(yè)開(kāi)始代碼 script language=”JavaScript” src=”inc/”/script /head body topmargin=”0” leftmargin=”0” div class=menuskin id==popmenu Onmouseover=”clearhidemenu()。highlightmenu(event,?on?)” Onmouseout=” highlightmenu(event,?off?)。dynamichide(event)” style=”Zindex:100”/div !—頂部導(dǎo)航表格 table cellspacing=”0” cellpadding=”0” align=”center” class=tableborder1 trtd width=”1”/td td class=TopdarkNav height=9 width=”*”/td td width=”1”/td trtd width=”1” height=”70”/td td height=”70” class=TopLighNav2 table board=”0” width=”100%” align=center trtd align=left width=”25%”a href=”{$link}”img border=0 src=”{$logo}”/a/td td align=center width=”65%” id=”Top_ads”/td td align=”right” style=”lineheight:15pt” width=”10%” span style=”cuosor:hand” onClick=”(, ?{$title}?)” onmousemove=”status=?收藏本頁(yè) ??！?onmouseout=”status=”?！笔詹乇卷?yè)/span bra href=”{$mailto}” target=_blank聯(lián)系我們 /a bra href=”?boardID={$boardid}”論壇幫助 /a/td/table/td td width=”1”/td trtd width=”1”/tdtd class=TopLighNav height=9 width=”*”/tdtd width=”1”/td !—首頁(yè)用戶信息和在線用戶狀態(tài) table cellpadding=5 cellspacing=1 class=tableborder1 align=center style=”wordbreak:breakall?！?trth align=left colspan=2 height=25= 用戶來(lái)訪信息 /th/tr trtd valign=top class=tablebody1 height=25 width=100%您的真實(shí) bIP/b是：{$userip}， b操作系統(tǒng) /b： {$system}， b瀏覽器 /b： {$brw}/td/tr trth colspan=2 align=left id=tabletitlelink height=25 style=”fontweight:normal” b= 論 壇 在 線 情 況 /b [span id=showstra href=”?action=1amp。boarded=0” Target=”hiddenframe”{$showstr}/a/span][a href=”?reaction=online”查看在線 用戶位置 /a]/th/tr trtd width=100% valign=top class=tablebody1 目 前 論 壇 上 總 共 有b{$onlinenum}/b 人 在線，其中注冊(cè) 會(huì)員 b{$ousernum}/b人，訪客 b{$gusernum}/b人。 br自 b{$BuildDate}/b創(chuàng)建以來(lái)，歷史最高在線記錄是 b{$maxuser}/b人同時(shí)在線， 發(fā)生時(shí)間是： {$maxusertime}br font color=”ff0000”名單圖例 /font： {$piclist}br table border=0 cellspacing=0 cellpadding=0 align=center style=”width:100%” class=tableborder1 trtd/td/tr/table table width=100% border=0 cellspacing=0 cellpadding=0 trtd height=5/td/tr trtd width100%span style=”display:none” id=”onlir”/span/td/tr /table/td/tr/tablebr !—首頁(yè) 底部論壇狀態(tài)部分 table cellspacing=1 cellpadding=3 width=97% border=0 align=center trtd align=centerimg src=”{nonewpic}” align=”absmiddle” 沒(méi)有新帖子 img src=”{isnewpic}” align=”absmiddle” 有新的 帖子 img src=”{islockpic}” align=”absmiddle” 被鎖定的論壇 /td/tr/table 首頁(yè)里用到了很多“ {}”包括的字符，里面的內(nèi)容是變量，因?yàn)檎搲畔?huì)隨一些操作而改變而不同的顯示狀態(tài)，這些信息將隨這些狀態(tài)的改變而改變成及時(shí)的真實(shí)的狀態(tài)。這些是要與數(shù)據(jù)庫(kù)連接的，所以下面將說(shuō)明數(shù)據(jù)庫(kù)的連接函數(shù)。 數(shù)據(jù)庫(kù)連接函數(shù) 數(shù)據(jù)庫(kù)連接在論壇運(yùn)行中是必不可少的，把這部分單獨(dú)做成一個(gè)函數(shù)，在需要的時(shí)候只需要調(diào)用這個(gè)函數(shù)就可以了，而不用每次去寫連接程序，這種復(fù)用可以讓操作更加方便快捷。 選擇的 Access 作為數(shù)據(jù)庫(kù)，功能不強(qiáng)大，不能讓很多人連接，但是可以省掉很多設(shè)置，對(duì)機(jī)器要求也相對(duì)要低得多，適合用 PC 機(jī)架設(shè)論壇。 ASP 中與數(shù)據(jù)相關(guān)緊密的是 ADO，要讓 ADO 對(duì)象能存取數(shù)據(jù)庫(kù)，最重要的東西是 OLE DB和 ODBC 的驅(qū)動(dòng)程序，必須具備對(duì)應(yīng)數(shù)據(jù)庫(kù)的其中一種驅(qū)動(dòng)程序， ADO 對(duì)象才能進(jìn)行存取。因?yàn)楦鶕?jù) Microsoft 公司的說(shuō)法， OLE DB 驅(qū)動(dòng)程序的執(zhí)行效能比ODBC 要好，所以選擇用 OLE DB 驅(qū)動(dòng)程序 。 利用 ADO 的 Connection 來(lái)建立同數(shù)據(jù)庫(kù)的連接。建立 對(duì)象，使用此對(duì)象的 Open 方法打開(kāi)數(shù)據(jù)庫(kù)。用 Access 在論壇路徑下建立一個(gè)數(shù)據(jù)庫(kù)存儲(chǔ)路徑“ data”，然后建立一個(gè)名為 的數(shù)據(jù)庫(kù)，建立之前數(shù)據(jù)庫(kù)設(shè)計(jì)中的表。利用 Microsoft 公司的 OLE DB 機(jī)制連接 Access，用 OLE DB 不用建立 ODBC 就可以直接連接 Access 數(shù)據(jù)庫(kù)。見(jiàn)程序 32。 程序 32 Access數(shù)據(jù)庫(kù)連接 Sub ConnectionDatabase Dim ConnStr Db=”data/” ConnStr=”Provider=”Data Source=”amp。 (db) Set conn=(“”) ConnStr if Err Then Set Conn=Nothing ”數(shù)據(jù)庫(kù)連接出錯(cuò)，請(qǐng)檢查連接字符串。 ” End if End Sub Sub 聲明了函數(shù) ConnectionDatabase， End Sub 結(jié)束這個(gè)函數(shù)。 Dim聲明了變量 ConnStr，這個(gè)變量是用來(lái)存儲(chǔ)連接數(shù)據(jù)庫(kù)信息的。變量 Db 聲明了數(shù)據(jù)庫(kù)文件所在的路徑。為 ConnStr 賦值是聲明 OLE DB 連接數(shù)據(jù)庫(kù)的方式， Data Source后面跟的是數(shù)據(jù)庫(kù)文件所在的路徑。 是 ASP 內(nèi)置 Server 對(duì)象一個(gè)函數(shù)，用來(lái)取得網(wǎng)站目錄下文件的絕對(duì)路徑。 7~12 行是一個(gè)判斷錯(cuò)誤的信息，如果連接出錯(cuò)， Asp 的 Err 對(duì)象判斷系統(tǒng)給出錯(cuò)誤的存在，然后清除。 第四章 模塊的實(shí)現(xiàn) 用戶模塊 用戶的登陸 首先看用戶的登陸。 在 用戶信息表里用戶名和用戶密碼字段是用來(lái)驗(yàn)證用戶身份的，用這兩個(gè)字段來(lái)寫驗(yàn)證用戶登陸的程序。 登陸頁(yè)面命名為 ，這個(gè)頁(yè)面包含了輸入用戶名和密碼、 Cookie 選項(xiàng)、和隱身登陸選項(xiàng)。隱身登陸只是一個(gè)判斷登陸狀態(tài)的標(biāo)識(shí)。主要是驗(yàn)證用戶身份和把用戶信息寫入 Cookie。 首先看驗(yàn)證用戶身份的程序，如程序 41。 程序 41 驗(yàn)證用戶身份程序 () sqlstr= UserName=39。amp。usernameamp。39。 Sql=Select UserID,UserName,UserPassword,UserEmail,UserPost,UserTopic,UserSex,UserFace, UserWidth,UserHeight,JoinDate,LastLogin,UserLogins,Lockuser,Userclass,UserGroupID, UserGroup,userWealth,userEP,userCP,UserPower,UserBirthday,UserLastIP,UserDel,UserIsBest, UserHidden,UserMsg,IsChallenge,UserMobile,TitlePic,UserTitle,TruePassWord,UserToday Sql=Sql+ From [Dv_User] Where amp。sqlstramp。 set rsUser=(sql) If and Then ChkUserLogin=false Exit Function Else iMyUserInfo=(,1, |||, , ) :Set rsUser = Nothing End If iMyUserInfo = Mybbs|||amp。 Now amp。 ||| amp。 Now amp。|||amp。 amp。|||amp。 iMyUserInfo amp。||||||Mybbs iMyUserInfo = Split(iMyUserInfo,|||) If trim(password)trim(iMyUserInfo(6)) Then ChkUserLogin=false ElseIf iMyUserInfo(17)=1 Then ChkUserLogin=false ElseIf iMyUserInfo(19)=5 Then ChkUserLogin=false Else ChkUserLogin=True Session( amp。 UserID) = iMyUserInfo = iMyUserInfo(4) RegName = iMyUserInfo(5) Article = iMyUserInfo(8) UserLastLogin = iMyUserInfo(15) UserClass = iMyUserInfo(18) GroupID = iMyUserInfo(19) TitlePic = iMyUserInfo(34) If Article0 Then Article=0 End If 首先是一個(gè)查詢用戶身份的 SQL 語(yǔ)句，輸入某個(gè)用戶后將從數(shù)據(jù)表 User_T中查找該用戶。 set rsUser=(sql)一句是用來(lái) 執(zhí)行這條 SQL 語(yǔ)句，同時(shí)返回一個(gè)包含了查詢信息的記錄集。 If and Then 一句判斷用戶信息是否存在。如果不為空，就將把數(shù)據(jù)集的信息寫入儲(chǔ)存用戶信息的字符串中。 If trim(password) trim(iMyUserInfo(6)) Then 一句判斷用戶密碼是否和數(shù)據(jù)庫(kù)中的用戶密碼相同。 Cookie 是對(duì)于一些有限制