利用Delphi开发响应用户输入的数据库查询Web Server程序
---- 通 常 情 况 下,
用 户 通 过 浏 览 器 在Web 站 点 上 看 到 的 网 页 大 多 是 静 态
的, 随 着Internet/Intranet 的 飞 速 发 展 和 普 遍 应 用, 静 态 网 页
已 这 远 远 不 能 满 足 用 户 的 实 际 需 求, 用 户 希 望 更 多 地
看 到 根 据 要 求 而 动 态 生 成 的 网 页, 例 如 响 应 用 户 输
入( 选 择) 进 行 数 据 库 查 询、 动 态 生 成 报 表 等。 就 目
前 而 言, 采 用 运 行 在Web Server 端 的CGI、ISAPI/NSAPI 应 用 程 序 还
是 一 种 主 要 的 动 态 生 成 网 页 的 方 式。
---- 使 用Delphi 3 for
Client/Server 开 发Web Server 应 用 程 序 不 仅 简 单、 方 便, 而 且 其
开 发 能 力 十 分 强 大, 因 为Delphi 3 提 供 了WebModule、WebApplication、TwebRequest、TwebResponse、TPageProducer
等 大 量 的 组 件 和 对 象, 以 支 持Web Server 程 序 的 开 发, 能
够 非 常 简 单 地 生 成 专 业 性 的 ISAPI/NSAI、CGI 程 序。 而 且 由
于Delphi 强 大 的 数 据 库 开 发 能 力, 允 许DLL 来 处 理 大 量 并
发 的、 安 全 线 程 的 数 据 库 连 接, 使 得Web Server 程 序 的 开
发 更 是 锦 上 添 花。
---- 在Delphi 3 的Demos 中
提 供 了 简 单 的Web Server 应 用 程 序 开 发 的 范 例, 但 没 有 涉
及 到 响 应 用 户 输 入 的 问 题。 而 响 应 用 户 的 输 入 或 选
择, 并 通 过 数 据 库 查 询 来 返 回 查 询 结 果, 是 我 们 编 写Web
Server 应 用 程 序 的 一 种 主 要 形 式。
---- HTML 文 档 中 用 户
输 入 主 要 是 通 过< FORM > 语 句 段, 并 支 持POST、PUT、GET、HEAD
等 方 法, 而Web Server 应 用 程 序 是 怎 样 接 收 到 客 户 端 用 户
的 输 入( 选 择) 请 求 信 息 呢 ? 我 们 知 道, 在HTTP 协 议
中, 浏 览 器 客 户 端 向Web Server 应 用 程 序 传 送 请 求 数 据 主
要 是 通 过URL 和CONTENT 部 分。 例 如 在
URL:http://www.gtgaj.gov/scripts/wdcx.dll
/runquery?gdnd=1992&bgqx= 长 期
---- 中,gdnd=1992&bgqx= 长 期 是 数 据
参 数, 它 请 求ISAPI 程 序wdcx.dll( 对 应 的 动 作 事 件 为/runquery,
若 使 用 确 省 动 作 事 件, 则 不 需 要 这 个 字 符 串), 把 归
档 年 代(gdnd) 为1992 年 而 且 保 管 期 限(bgqx) 为 长 期 的 文 档 信
息 返 回 到 浏 览 器 并 显 示, 这 种 方 法 一 般 应 用 在 数 据 量
比 较 少 的 情 况 下, 优 点 是 比 较 容 易 输 入 参 数, 可 直 接
在URL 中 输 入 请 求 信 息, 缺 点 是 返 回 数 据 量 不 能 太 大,
并 影 响URL 的 显 示, 在 参 数 比 较 多 时, 将 出 现 一 个 长 串
的URL。 而 在CONTENT 中 保 存 数 据 信 息 的 优 点 是 不 影 响URL 的
显 示, 而 且 允 许 返 回 的 数 据 量 较 大, 缺 点 是 用 户 只 能
使 用< FORM > 语 句 段 让 浏 览 器 生 成 请 求 信 息, 不 能 直
接 在URL 中 输 入。 在POST、PUT、GET 和HEAD 四 种 方 法 中, 除 了POST
方 法 使 用CONTENT 向Web Server 应 用 程 序 传 送 数 据 以 外, 其 它
方 法 都 是 通 过URL 来 传 送 数 据 的。
---- Delphi 3 中 提 供 了
装 载 浏 览 器 请 求 信 息 的TWebRequest 对 象, 利 用 该 对 象 的methodtype
属 性 即 可 得 知HTTP 传 送 请 求 信 息 的 方 法, 再 利 用 该 对 象
的ContentFields 或QueryFields 属 性 即 可 将HTTP 传 送 的 信 息 进 行 分
析, 非 常 容 易 使 用。 例 如, 对 于CONTENT 中 的 数 据, 我 们 可
直 接 使 用Request.ContentFields.Values[' 用 户 输 入 项 的 名 称'] 来 读
取 用 户 的 输 入 信 息; 而 对 于URL 中 的 数 据, 则 可 直 接 使
用Request.QueryFields.Values[' 用 户 输 入 项 的 名 称'] 来 读 取。
---- 下 面 就 通 过 一
个 简 单 的 例 子 来 介 绍 如 何 开 发 一 个 响 应 用 户 输 入 的
数 据 库 查 询Web Server 程 序
---- 首 先, 在Web 服
务 器 端 安 装 数 据 库 引 擎BDE, 并 设 置 好 数 据 库 别 名wsda, 指
向 一 个 包 含 归 档 部 门、 归 档 年 代、 卷 号、 文 件 日 期、
文 件 字 号、 文 件 作 者、 标 题 等 字 段 的 数 据 库 文 件wsdak.dbf。
[1] [2] [3] 下一页
|