在 這 詢 問 了 不 少 問 題 ， 費(fèi) 了 大 蝦 們 不 少 時(shí) 間 來 為 我 解 答 ， 有 點(diǎn) 覺 得 自 己 沒 什 么 貢 獻(xiàn) ， 現(xiàn) 借 著 剛 發(fā) 現(xiàn) 的 小 小 心 得 ， 在 這 貢 獻(xiàn) 貢 獻(xiàn) ：

在 制 作 ASP 網(wǎng) 頁 時(shí) ， 常 有 的 是 把 Form POST 上 來 的 內(nèi) 容 作 儲(chǔ) 存 或 更 新 。 只 是 寫 相 關(guān) 的 程 式 就 非 常 的 煩 人 了 。 我 在 制 作 畢 業(yè) 作 業(yè) 時(shí) ， 無 意 中 發(fā) 現(xiàn) 了 以 下 這 方 式 來 減 少 編 程 。 雖 然 不 是 相 當(dāng) 的 Flexible ， 希 望 能 夠 拋 磚 引 玉 一 番 。 如 果 有 哪 位 大 蝦 有 更 好 的 主 義 ， 歡 迎 提 出 ， 大 家 啟 發(fā) 一 番 。 。 。 :P

在 使 用 前 有 個(gè) 必 需 注 意 的 事 項(xiàng) ：
1。 在 FORM 中 使 用 的 Input Name 都 必 需 是 與 數(shù) 據(jù) 庫 中 使 用 的 一 樣

#########################################
Sample.asp
#########################################
<%
'當(dāng) FORM POST 到 此 頁 時(shí) '
If Request.Form("Submit") <> "" Then
SQL = "Select * From myTable"
%>
<!--#include file="SaveForm.inc" -->
<%
End If
%>

#################################################
SaveForm.inc
#################################################
<%
'## Module for saving Records ##'

Set objRS = '你 的 數(shù) 據(jù) 庫 連 接'

If objRS.EOF Then
objRS.AddNew
Response.Write "<p><center>Saving record"
For X = 1 to Request.Form.Count -1
objRS(Request.Form.Key(x)) = Request.Form(x)
Response.Write "."
Next
objRS.Update
Response.Write "<p>Update Completed!"
Else
Response.Write "<center>Your Error Message Here!</center>"
End If
Response.End
%>