在 这 询 问 了 不 少 问 题 , 费 了 大 虾 们 不 少 时 间 来 为 我 解 答 , 有 点 觉 得 自 己 没 什 么 贡 献 , 现 借 着 刚 发 现 的 小 小 心 得 , 在 这 贡 献 贡 献 :
在 制 作 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
%>
相关专题
- asp+ajax打造无刷新新闻评论系统 (846次浏览)
- 绝对免费顶级域名+免费500MB ASP?? (728次浏览)
- ASP后门之终极伪装 (601次浏览)
- FTP的安全问题 《转》 (589次浏览)
- 如何正确显示数据库中的图片 (503次浏览)
- 用户登录/注册程序——Flash+ASP (492次浏览)
- SQL注入漏洞全接触 (381次浏览)
- asp+sqlserver 分页方法(不用存储过程) (314次浏览)
- Windows操作系统出现死机故障的解决方法 (202次浏览)
- 对ASP 动态包含文件方法的改进 (152次浏览)



