動易2005整合論壇范例講解
2024-05-04 11:06:03
供稿：網友
整合環境：動易2005SP1正式版 Dvbbs7.1.0_AC正式版
整合前提：兩套系統已分別安裝調試完畢，均已正常運行
兩套系統均為官方最新標準版本，之前未做任何修改
說明：由于動易2005SP1正式版已內置對整合接口的支持，無需修改
整合接口文件說明：
1：UserInfo.asp ----動易2005用戶Cookies通用接口文件
2：PE_User.asp ----為動網系統特別編寫的處理通行注冊、登陸、密碼同步等事件的文件
整合過程：
1：將UserInfo.asp放到網站根目錄下；
2：將PE_User.asp放到論壇根目錄下；
3：修改論壇文件
動網7.x版的論壇整合共需修改以下文件：
1. Inc/Dv_ClsMain.asp --核心類文件，修改其以自動監測用戶的登陸、注銷、注冊狀態；
2. Conn.asp --核心數據鏈接及全局類初始化文件，修改其以初始化通行接口的類；
3. login.asp --論壇登陸文件，修改其以實現對通行登陸的支持；
4. logout.asp --論壇注銷文件，修改其以實現對通行注銷的支持；
5. reg.asp --論壇注冊文件，修改其以實現對通行注冊的支持；
正式開始修改文件之前，應該明確UserInfo.asp提供的屬性和函數，以及PE_User.asp的使用；
[UserInfo.asp]
該文件中定義了實現動易Cookies信息調用的類，用戶無需修改，只要將該文件放置到網站根目錄，并在任意ASP文件中包含該文件，就可以使用PE_UserInfo這個類，并通過讀取該類提供的8個公用屬性和1個公用函數來調用動易的相關資料。列舉如下：
公用屬性：
PE_Dir: 動易的安裝目錄；
Site_Sn: 動易的Cookies名稱；
UserName: 已經登陸動易的當前用戶的用戶名
Password: 已經登陸動易的當前用戶的密碼(16位MD5加密形式)
Email: 已經登陸動易的當前用戶的Email
Question: 已經登陸動易的當前用戶的密碼提示問題
Answer: 已經登陸動易的當前用戶的密碼提示問題答案(16位MD5加密形式)
CookieDate: 已經登陸動易的當前用戶設置的Cookies保存選項(0=不保存;1=保存1天;2=保存一月;3=保存一年)
公用函數：
Sex(ctype):已經登陸動易的當前用戶的性別。
說明：該函數包含一個數值型參數，取值范圍0-2（0=返回數字形式：0表示女性,1表示男性；1=返回字符形式："男"表示男性，"女"表示女性; 2=返回字符形式："male"表示男性，"female"表示女性）
[PE_User.asp]
該文件根據所接收到的URL請求的action來判斷并執行相應的操作。
action:
reg: 當收到action=reg的URL請求時，會提示用戶輸入密碼激活論壇身份；
login: 當收到action=login的URL請求時，會自動進行同步登陸(密碼必須一致)
pass: 當收到action=pass的URL請求時，會提示用戶輸入論壇密碼以進行登陸
pass3: 當收到action=pass3的URL請求時，會自動將論壇密碼改為和用戶的動易密碼一樣，并進行登陸
了解了通用接口和PE_User.asp之后，接下來修改論壇文件以完成整合：
1.Conn.asp
Conn.asp通常是論壇程序定義數據庫鏈接的文件，因此這個文件中定義的變量、函數、過程可以在任何文件中使用，所以我們選擇把通用接口類的初始化放在這個文件中。
a)在Conn.asp的第5行左右，找到
=========查找代碼========
Option Explicit
Response.Buffer = True
Dim Startime
=========================
修改為：
===========修改后的代碼==========
Option Explicit
Response.Buffer = True
%>
<!-- #Include Virtual="UserInfo.asp" -->
<%
Dim Startime
=============================
b)在Conn.asp的第7、8行左右，找到
=========查找代碼============
Dim Conn,Plus_Conn,Db,MyDbPath
Startime = Timer()
=============================
修改為：
===========修改后的代碼==========
Dim Conn,Plus_Conn,Db,MyDbPath
'定義動易通用接口類
Dim MyPE
'完畢
Startime = Timer()
=================================
c)在Conn.asp的32、33行左右，找到
=========查找代碼============
Set template = New cls_templates
Sub ConnectionDatabase
=============================
修改為：
===========修改后的代碼==========
Set template = New cls_templates
'初始化動易通用接口類
Set MyPE = New PE_UserInfo
'完畢
Sub ConnectionDatabase
=================================
Conn.asp的修改完畢
2.Inc/Dv_ClsMain.asp
Dv_ClsMain.asp中是動網論壇定義了動網論壇所有核心的類和屬性等，每次用戶刷新一個頁面，都會由這個文件中的函數、事件等來判斷是否登陸等信息，因此我們要把檢測和判斷登陸、注冊、注銷等放在這個文件中：
