在 這 詢 問 了 不 少 問 題 ， 費 了 大 蝦 們 不 少 時 間 來 為 我 解 答 ， 有 點 覺 得 自 己 沒 什 么 貢 獻 ， 現 借 著 剛 發 現 的 小 小 心 得 ， 在 這 貢 獻 貢 獻 ：

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

在 使 用 前 有 個 必 需 注 意 的 事 項 ：
1。 在 FORM 中 使 用 的 Input Name 都 必 需 是 與 數 據 庫 中 使 用 的 一 樣

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

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

Set objRS = '你 的 數 據 庫 連 接'

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
%>