用一套論壇程序架設(shè)多個論壇
作者：Iasky | 文章出處：未知 | 閱讀次數(shù)：400 | 發(fā)布日期：2005-03-27
對付摳門的空間服務(wù)商，以前大家想到了用鏈接數(shù)據(jù)表的方法存放更大的數(shù)據(jù)庫?，F(xiàn)在再給大家講述另一個方法：用一個論壇的代碼運行兩個論壇程序。這樣可以繞開那些以服務(wù)器CPU占用率過大為理由，不許在一個空間架設(shè)兩套論壇程序的空間服務(wù)規(guī)定。
一、準備數(shù)據(jù)庫
網(wǎng)上主流的ASP論壇程序(例如動網(wǎng)論壇6.1)大都是以Access數(shù)據(jù)庫為基礎(chǔ)的。論壇的全部帖子、用戶信息、論壇設(shè)置等等都存放在一個數(shù)據(jù)庫文件中。我們需要準備兩個論壇數(shù)據(jù)庫文件，然后讓論壇程序根據(jù)不同的條件打開不同的數(shù)據(jù)庫文件。
將本地機的論壇上傳到服務(wù)器，然后準備兩個數(shù)據(jù)庫分別命名為bbs1.mdb和bbs2.mdb(為了保證論壇的安全，文件名可以改得復(fù)雜一些)，并上傳到服務(wù)器的/abc/bbs/data/目錄下。數(shù)據(jù)庫既可以使用已有論壇的，也可以用論壇的初始數(shù)據(jù)庫。
二、判定條件
用作判定進入論壇的條件有很多，比如來訪者的IP地址、操作系統(tǒng)、訪問論壇的時間等。這里筆者用的是來訪者提交的URL地址。
一個論壇有可能出現(xiàn)兩個不同的地址，例如“www.cpcw.com”和“WWW.CPCW.COM”，兩個網(wǎng)址雖然都指向電腦報網(wǎng)站，但在VbScript看來它們是兩個不同的ASCII字符串，因為大小寫字母被認作不同的字符。所以，大小寫不同的兩個地址可以做判定的條件。
Request.ServerVariables是獲取環(huán)境變量的ASP內(nèi)置對象。用代碼Request.ServerVariables("SCRIPT_NAME")的值就是當前執(zhí)行的ASP頁面的路徑。例如，訪問 我們規(guī)定兩個論壇的地址分別為http://www.scat.com/ABC/bbs和http://www.scat.com/abc/bbs。其實可以用這種方法打開兩個以上的論壇，因為從排列組合的角度來看，長度為n的一個URL的大小寫組合可以有2的n次方種！ 三、修改論壇程序 用文本編輯器打開conn.asp，找到如下代碼： Dim Db ‘免費用戶第一次使用請修改本處數(shù)據(jù)庫地址...... DB="\data\dvbbs6.mdb" 程序定義了Db這個變量，數(shù)據(jù)庫的相對地址被賦給了這個字符串變量。稍后程序打開數(shù)據(jù)庫對象的時候會用到這個變量的值。 我們把這幾行改成： Dim Db Dim Whichbbs Whichbbs =Request.ServerVariables("SCRIPT_NAME ") if left(Whichbbs，4)="/ABC" then ‘使用取左函數(shù)截取需要長度的字符串進行驗證 Db="/data/bbs1.mdb" else Db="/data/bbs2.mdb" end if 這段代碼的意思就是，將訪問者提交的地址賦值到Whichbbs這個變量中。由于訪問者在論壇中活動時，URL地址的后半段是變化的，所以只用Whichbbs的前4位與“/ABC”這個字符串做比較。如果兩字符串相同，就給Db賦值"/data/bbs1.mdb"；否則Db被賦值"/data/bbs2.mdb"。然后將會打開Db對應(yīng)的數(shù)據(jù)庫。訪問者提交的地址如果是 3. 根據(jù)自己的需要，用其他信息作判定條件，打造你富有個性、多姿多彩的論壇。
現(xiàn)在大多數(shù)的ASP論壇程序為了編程方便，開啟數(shù)據(jù)庫對象的代碼都被獨立出來放在conn.asp中，其他頁面都通過引用這個文件來訪問數(shù)據(jù)庫。這樣為我們接下來的操作提供了方便。
