【文章內(nèi)容簡介】 ptime datetime 建立時間 Not null 表 13 子版面信息表 (board_t) 序號 字段名 字段類型 說明 備注 1 boardid Int 子版面編號 主鍵 2 boardname Varchar(50) 子版面名 Not null 3 areaid Int 父版面編號 Not null 序號 字段名 字段類型 說明 備注 4 readme Varchar(255) 版面說明 Not null 5 setuptime Datetime 建立日期 Not null 6 boardmaster Varchar(50) 版主 7 topiumber Int 主題數(shù)量 Not null 8 indexIMG Varchar(255) 版面圖片 Not null 表 12 和 13 是版面信息表，這里使用兩個表是為了編程方便 ,父版面和子版面是通過 areaid 字段關聯(lián)的。 表 14 主題信息表 (topic_t) 序號 字段名 字段類型 說明 備注 1 topicid Int 主題編號 主鍵 2 title Varchar(255) 主題 Not null 3 bordid Int 版面編號 Not null 4 reply Int 主題回復數(shù) Not null 5 userid Int 用戶編號 Not null 6 username Varchar(50) 用戶名 Not null 7 DateAndTime Datetime 發(fā)表日期 Not null 8 hits Int 點擊數(shù) Not null 9 istop Bit 是否置頂 Not null 10 isbest Bit 是否精華 Not null 11 fileid int 上傳文件編號 Not null 表 15 帖子信息表 (post_t) 序號 字段名 字段類型 說明 備注 1 postid Int 帖子編號 主鍵 2 parentid Int 回復帖子編號 Not null 3 boardid Int 版面編號 Not null 4 username Varchar(50) 用戶名 Not null 5 userid Int 用戶編號 Not null 6 topicid Int 主題編號 Not null 7 title Varchar(255) 主題 Not null 8 DateAndTime Datetime 發(fā)表日期 Not null 9 body Text 帖子內(nèi)容 Not null 10 ip Varchar(40) 用戶 IP Not null 以上兩張表是緊密關聯(lián)的，論壇主題信息表記載了論壇中主題帖的信息，建立這個表的原因是用戶在瀏覽論壇中的帖子時先應看到的是主題列表，如果主題能夠吸引用戶，用戶才會去看其中的內(nèi)容，否則用戶一進來就看到帖子內(nèi)容，會使用戶感覺非常的雜亂。這兩個表是通過 topicid 字段聯(lián)系起來的 ,parentid 字段是用來針對特定的帖子回復。 接下來幾張表是論壇的其它功能需要的數(shù)據(jù)表。 表 16 短消息信息表 (message_t) 序號 字段名 字段類型 說明 備注 1 mid Int 短消息編號 主鍵 2 sender Varchar(50) 發(fā)送者 Not null 3 incept Varchar(50) 接受者 Not null 4 title Varchar(255) 主題 Not null 5 content Varchar(255) 內(nèi)容 Not null 6 sendtime Datetime 發(fā)消息時間 Not null 7 flag bit 是否已讀 Not null 表 17 用戶等級信息表 (grade_t) 序號 字段名 字段類型 說明 備注 1 gradeid Int 自動編號 主鍵 2 userid Int 用戶編號 Not null 3 postid Int 帖子編號 Not null 4 grade Varchar(255) 等級 Not null 5 point Int 積分 Not null 6 ip Varchar(40) IP Not null 表 18 文件上傳信息表 (file_t) 序號 字段名 字段類型 說明 備注 1 fileid Int 文件編號 主鍵 2 fname Varchar(100) 文件名 Not null 3 userid Int 用戶編號 Not null 4 ename Varchar(50) 文件擴展名 Not null 5 ftype Varchar(255) 文件類型 Not null 6 fsize Varchar(255) 文件大小 Not null 表 19 好友信息表 (friend_t) 序號 字段名 字段類型 說明 備注 1 Fid Int 自動編號 主鍵 2 Userid Int 用戶編號 Not null 3 username Varchar(50) 用戶名 Not null 4 friendid Int 好友編號 Not null 5 frinedname Varchar(50) 好友名 Not null 6 addtime datetime 添加時間 Not null 表 20 管理員信息表 (admin_t) 序號 字段名 字段類型 說明 備注 1 masterid Int 自動編號 主鍵 2 userid Int 用戶編號 Not null 3 username Varchar(50) 用戶名 Not null 4 boardid Int 版 面編號 Not null 5 flag bit 權限標識 Not null 4 系統(tǒng)實現(xiàn) 首頁 當用戶打開論壇時，首先看到的是論壇首頁，用戶從首頁可以看到和論壇相關的并且能激起用戶興趣的東西。比如發(fā)帖數(shù)，在線用戶數(shù)以及論壇板塊的情況，如圖 6所示。 圖 6論壇首頁 首頁分為 3個部分，最上面的導航條為一部分，中間的公共信息為一部分，下面的版面為一部分。將導航條部分單獨寫入文件 作為公共程序，以后任何一個頁面需要就使用 ! include file= 來調(diào)用。下面是 的程序。 1 % If Session(userid) = Then % 這里顯示的是游客的導航條 2 % Else % 這里顯示的注冊用戶的導航條 3 % End If % 程序說明：用戶登錄后將用戶名存入 session 對象來判斷用戶狀態(tài)。 公共信息部分是顯示了論壇和當前用戶的狀態(tài)，該部分的詳細內(nèi)容將在后面的公共信息部分討論。 版面部分顯示了版面的列表，該部分的詳細內(nèi)容將在后面的版面部分討論。 至此，首頁的主要程序已經(jīng)介紹了，以后章節(jié)是各個模塊的主要程序。 數(shù)據(jù)庫連接函數(shù) SQL Server 數(shù)據(jù)連接要求提供用戶名，密碼，數(shù)據(jù)庫名及數(shù)據(jù)庫服務器地址，下面是使用 ADO 連接數(shù)據(jù)庫的代碼： 1 % dim conn’ 打開數(shù)據(jù)庫連接 2 set conn = () 3 = dirver ={sql server}。server=(服務器地址 )。uid=用戶名 。pwd=密碼 。database=數(shù)據(jù)庫名 。 % 4 % ’ 關閉數(shù)據(jù)庫連接 5 Set conn=nothing % 用戶模塊 用戶登錄 下面是一個用戶登錄的界面，如圖 7。 圖 7 用戶登錄界面 下面是對用戶登錄頁面的表單處理程序 1 % 39。驗證碼處理 2 If trim((validatecode))=empty or Trim(Session())Trim((validatecode)) Then 3 (請注意正確輸入驗證碼 ) 4 5 end if 6 session(user)=(username) 7 user=(username) 8 session(pwd)=(userpwd) 9 pwd=(userpwd) 10 ishidden=(hidden) 11 set rs = () 12 sql=select * from user_t where username=39。amp。session(user)amp。39。 and userpassword=39。amp。session(pwd)amp。39。 13 sql,conn,3,3 14 if and then 39。判斷用戶是否存在 15 () 16 else 17 session(userid)=rs(userid) 18 sql1=update user_t set userhidden=39。amp。ishiddenamp。39。 where userid=39。amp。session(userid)amp。39。39。用戶是否隱身 19 (sql1) 20 select case request(usercookie)39。把用戶信息寫入 Cookie 21 case 1 22 (user)(username)=user 23 (user)(userpassword)=pwd 24 (user).expires=date()+1 25 case 2 26 (user)(username)=user 27 (user)(userpassword)=pwd 28 (user).expires=date()+7 29 case 3 30 (user)(username)=user 31 (user)(userpassword)=pwd 32 (user).expires=date()+365 33 end select 34 session(name)=(username) 35 (meta equiv=refresh content=39。2。url=39。) 36 (session(name)) 37 (！歡迎你回來！ ) 38 (兩秒鐘后自動轉入首頁 ) 39 end if 40 41 set rs=nothing % 程序說明：第 1～ 5 行是對驗證碼的處理；第 6～ 10 行是將從表單獲取的數(shù)據(jù)存入變量；第 11～ 14 行是依據(jù)輸入的用戶名和密碼為條件對用戶信息表user_t 進行查找，如果沒有查找到記錄說明該用戶輸入的用戶名或密碼錯誤；第 15 行轉到錯誤處理頁面；第 18～ 19 行是將用戶是否隱身登錄標記，即是對用戶信息表中的 userhidden 字段標記；第 20～ 33行是將用戶信息寫入 Cookie。 用戶注冊 用戶注冊，首先要檢查的就是用戶填寫的信息，其中包括： 1. 字段是否空白，若空白則不接受。 2. 輸入的 Email 是否正確，若 Email 中沒有 @， @符號位于 Email 的第 一個字符或者 @位于 Email 的最后一個字符都算錯誤。 3. 兩次輸入的密碼是否一致。 4. 用戶名是否被使用。 5. 電子郵件是否被使用。 圖 8用戶注冊各個頁面與數(shù)據(jù)庫的關系 下面是驗證用戶注冊信息的程序： 1 % a=instr(request(userpassword),*) 2 b=instr(request(userpassword), ) 3 if username=or user=or userquestion=or useranswer=or user_t 新用戶注冊 修改信息 修改密碼 忘記密碼 寫入 寫入 讀取 寫入 讀取 讀取 userpassword=or userpassword1=then 4 (必填信息不能為空，請?zhí)钔辏?) 5 elseif userpassworduserpassword1 then 6 (兩次輸入密碼不一致，請重新輸入！ ) 7 elseif len(username)10 then 8 (你輸入的用戶名太長，請重新輸入 !) 9 elseif len(userpassword)6 or len(userpassword)18 then 10 (密碼不符合要求，請重新輸入 !) 11 elseif not isvalid(user) then 12 (電子郵件地址錯誤，請重新輸入 ) 13 elseif a0 or b0 then 14 (請不要將‘ *’和‘ ’等符號作為密碼！ ) 15 elseif useronly(username,user) then 16 (用戶名被占用！ ) 17 else 18 驗證通過后將用戶信息寫入用戶信息表 user_t 19 end if % 程序說明：第 1～ 2行是取出密碼中“ *”和“ ”在字符串中的位置；第 11