⑴ 求ASP網路聊天室 畢業論文
----經 常 在Internet上 沖 浪 的 網 友 恐 怕 很 少 有 人 沒 有 去 過 聊 天 室 神 侃 胡 吹 過。 你 只 要 稍 微 留 意 一 下 就 會 發 現 這 些 聊 天 室 大 多 是 用CGI程 序 或 者 用JAVA開 發 的Applet維 護 的。 開 發 過 這 類CGI或Applet的 程 序 員 都 知 道， 這 種 開 發 工 作 是 費 時 費 力 的。 那 么 有 沒 有 一 種 更 簡 單、 省 力 的 開 發 方 式 呢 ？ 答 案 是 肯 定 的。 筆 者 利 用ASP很 快 就 開 發 了 一 個 聊 天 室， 該 聊 天 室 不 光 速 度 快， 維 護 也 特 方 便。 在 這 里 筆 者 想 把 開 發 過 程 中 的 技 術、 技 巧 和 心 得 介 紹 給 大 家。
<p style=line-height: 150%>----關 於ASP在《 計 算 機 世 界 報》 上 有 很 多 文 章 都 有 介 紹， 這 里 不 再 贅 述。 筆 者 工 作 的 單 位 里 有 一 個 由Windows NT4.0組 織 的LAN。NT服 務 器 上 安 裝 了IIS3.0， 設 置 了 若 干 各WEB站 點， 其 中 一 個 取 名 為fyb.cam.gov.cn。 本 單 位 的WEB站 點 並 沒 有 接 入Internet， 由 於 有 聊 天 室 卻 也 吸 引 了 不 少 本 單 位 的 員 工。 如 果 您 的 工 作 環 境 與 我 們 的 相 同， 不 妨 也 在 自 己 的LAN里 面 如 法 炮 制 一 個 聊 天 室。
<p style=line-height: 150%>一、 聊 天 室 的 規 劃：
---- 1、 談 話 內 容 儲 存 方 式 的 選 擇： 在 客 戶 機 上 顯 示 即 時 談 話 的 內 容 應 以 什 么 方 式 儲 存 在 服 務 器 呢 ？ASP有 兩 種 選 擇， 一 種 是 以 文 本 文 件 方 式， 一 種 是 以 數 據 庫 方 式。 但 筆 者 感 覺ASP對 文 本 文 件 操 作 的 指 令 遠 不 如ADO(ActiveDataObject)提 供 的 對 數 據 庫 操 作 的 指 令 多。 所 以 利 用ADO，ASP能 對 數 據 庫 靈 活 地 操 作， 比 如 插 入、 刪 除、 更 新、 查 詢 等 等。 筆 者 選 擇Access數 據 庫 來 儲 存 談 話 的 內 容。 該 數 據 庫 內 容 只 保 留 一 天（ 可 根 據LAN的 實 際 情 況 確 定 時 間 長 短） 的 談 話 內 容。
<p style=line-height: 150%>---- 2、 聊 天 室 界 面 的 設 計： 為 了 客 戶 能 夠 方 便 地 瀏 覽 站 點 的 內 容， 又 能 盡 可 能 地 顯 示 聊 天 室 的 內 容， 筆 者 在 一 幅 主 頁 里 設 計 了 三 幀。 左 邊 一 幀 顯 示 的 是 站 點 的Index。 右 邊 一 幀 又 分 成 上 下 兩 幀。 上 幀 佔70%， 用 來 顯 示 當 前 聊 天 室 的 內 容； 下 幀 佔30%， 用 來 提 供 一 個 文 本 輸 入 框 和 供 用 戶 反 饋 的 按 鈕
<p style=line-height: 150%>---- 3、 進 入 聊 天 室 的 步 驟： 象 大 多 數 聊 天 室 一 樣， 首 先 應 該 提 供 給 用 戶 一 個 登 錄 界 面， 由 用 戶 輸 入 自 己 的 名 字 或 別 名 和 自 己 隨 意 給 定 的 密 碼。 如 果 輸 入 的 用 戶 名 與 在 線 的 用 戶 名 相 同， 則 提 示 用 戶 重 新 選 擇 用 戶 名 或 重 新 輸 入 密 碼， 以 保 證 在 線 的 所 有 用 戶 名 都 是 唯 一 的。 登 陸 成 功 後 進 入 聊 天 室， 內 容 顯 示 幀 顯 示「歡 迎 加 入」的 歡 迎 信 息。 用 戶 就 可 以 在 文 本 輸 入 區 內 輸 入 談 話 內 容 了。
<p style=line-height: 150%>二、 設 計 過 程 和 開 發 技 巧：
---- 1、 設 計ODBC系 統 數 據 源： 如 前 所 述， 本 開 發 采 用ASP對ADO進 行 操 作， 因 此 必 須 先 對 數 據 源 進 行 設 置。 在NT服 務 器 的 控 制 面 板 里 雙 擊ODBC圖 標， 在 系 統DSN頁 添 加 系 統DSN， 選 擇Microsoft Access Driver，Data Source Name為『fybchat』, Database選 擇Chat目 錄 下 的chat.mdb.該 數 據 庫 包 括 下 面 幾 個 字 段：name, content,password,chattime,chatdate,分 別 以 來 存 儲 姓 名、 談 話 內 容、 密 碼、 談 話 時 間 和 談 話 日 期。
<p style=line-height: 150%>---- 2、 登 錄 界 面 設 計： 登 錄 界 面 為 一html頁， 包 含 一 些 警 告 信 息 和 一 個Form。 該Form以 來 獲 取 用 戶 名 和 密 碼， 如 下 所 示：
<p style=line-height: 150%><formmethod="post"action="receivedata.asp" >
姓 名：<inputtype="text"name="usname" >
密 碼：<inputtype="password"name="uspassword" >
< /center >< br >< br >
< center ><inputtype="submit"value="進 入" >
<inputtype="reset"value="清 除" >< /center >
<inputtype="hidden"name="content"value="" >
< /form >
----通 過 提 交 按 鈕 來 激 發receivedata.asp。 該ASP文 件 主 要 來 保 證 在 聊 天 室 里 沒 有 兩 個 用 戶 是 同 名 的。 用 戶 提 交 信 息 後， 該 文 件 打 開chat.mdb檢 查 是 否 已 經 有 該 用 戶 名， 如 果 有 但 密 碼 不 對 就 提 醒 用 戶 重 新 輸 入 密 碼， 如 果 沒 有 那 么 用 戶 就 順 利 進 入 了 聊 天 室。 進 入 聊 天 室 界 面 的 功 能 由 下 列 語 句 完 成：
<p style=line-height: 150%><FRAMESETROWS="70%,30%" >
<FRAMESRC="forum.asp"NAME="main"
MARGINWIDTH="1"MARGINHEIGHT="1" Noresize >
<FRAMESRC="frft.asp?kname=
< % =name% >" NAME="footnotes"MARGINWIDTH="1"
MARGINHEIGHT="1" Noresize >
< /FRAMESET >
----注 意 這 里 有 一 個 技 巧， 通 過 參 數kname將 用 戶 的 姓 名 隱 藏 在 客 戶 的 瀏 覽 器 里 面 了， 這 樣 一 來， 用 戶 每 次 提 交 談 話 內 容 的 同 時 也 把 他 的 姓 名 提 交 了。
<p style=line-height: 150%>---- 3、 文 本 輸 入 區 的 設 計： 文 本 輸 入 區 是 由frft.asp產 生 的。 如 上 所 述， 用 戶 每 次 提 交 談 話 內 容 的 同 時 也 把 他 的 姓 名 提 交 了， 用 戶 提 交 談 話 內 容 的 動 作 是 激 活forum.asp。forum.asp的 作 用 是 刷 新 聊 天 室 的 內 容。Frft.asp內 容 如 下：
<p style=line-height: 150%><!DOCTYPE HTML PUBLIC "
-//IETF//DTDHTML//EN" >
< html >
< head >
<metahttp-equiv="Content-Type"
content="text/html;charset=gb_2312-80" >
<metaname="GENERATOR"
content="Microsoft FrontPage 2.0" >
< title >< /title >
< /head >
< body >
<%kname=request.QueryString("kname")% >
<basetarget="main" >
<formname="fm1" method="POST"action="forum.asp" >
<palign="center" ><inputtype="text"size="90"
name="content" >< /p >
<palign="center" ><inputtype="button"name="B1"
value="提 交/刷 新" ><inputtype="reset"
name="B2" value="重 寫" >< /p >
<inputtype="hidden"name="kname"
value=<%=kname% > >
< /form >
<SCRIPTLANGUAGE="VBScript" >
< !--
<p style=line-height: 150%>Sub IeTimer1_Timer()
if fm1.content.value="" then
fm1.content.value=""
fm1.submit
else
end if
end sub
<p style=line-height: 150%>sub b1_onclick()
fm1.submit
fm1.content.value=""
end sub
-- >
< /SCRIPT >
<OBJECTID="IeTimer1" WIDTH=39 HEIGHT=39
CLASSID="CLSID:59CCB4A0-727D-
11CF-AC36-00AA00A47DD2"
CODEBASE="http://208.208.208.201/asp/ietimer.ocx" >
< PARAM NAME="_ExtentX"VALUE="1005" >
< PARAMNAME="_ExtentY"VALUE="1005" >
< PARAM NAME="Interval"VALUE="7000" >
< /OBJECT >
<p style=line-height: 150%>< /body >
< /html >
----這 時 又 出 現 了 一 個 問 題， 用 戶 必 須 不 停 提 交 才 能 看 到 最 新 的 聊 天 室 內 容， 這 顯 然 給 用 戶 帶 來 了 不 便。 於 是 考 慮 用 一 個timer的ActiveX控 件 來 控 制 聊 天 室 的 內 容 豈 不 更 好 ？ 於 是 選 用 了Ietimer， 如 上< object > … …< /object >所 引 用， 每 隔7秒 鍾 聊 天 室 內 容 自 動 更 新 一 次。 這 樣 即 使 用 戶 不 想 參 加 聊 天 也 可 以 坐 在 機 器 邊 看 別 人 聊 天 了。
<p style=line-height: 150%>三、 總 結
----由 上 述 開 發 過 程 我 們 可 以 知 道， 利 用ASP程 序 可 以 很 靈 活 地 傳 遞 參 數， 並 且 可 以 很 靈 活 地 將 程 序 流 程 分 割 成 幾 個 單 獨 的ASP程 序， 非 常 利 於 程 序 的 調 試， 對ActiveX控 件 的 支 持 和 對DAO的 強 大 操 作 能 力 使 得 利 用ASP能 夠 開 發 功 能 非 常 強 大 的 程 序。