l7.txt

asp txt版教程

第 二 课 ： 从 脚 本 调 用  Finance  组 件 

要 测 试 组 件 ， 可 以 从  ASP 、 Visual Basic 、 Microsoft? Office  产 品 的  Visual  
Basic for Applications  或 任 何  OLE  自 动 控 件 来 调 用 组 件 。 

要 使 用  VBScript  从  ASP  调 用  Finance  组 件 ， 可 以 使 用 一 个  HTML  表 格 作 为 输 
入 来 计 算 某 人 存 款 计 划 的 未 来 值 。 

所 需 的  HTML  表 格 

我 们 将 使 用 一 个  HTML  表 格 后 ， 就 能 用  Request("APR")  的 方 式 引 用 。 HTML  标 记 
  〈 INPUT TYPE=TEXT NAME=APR 〉   提 供 了 输 入 数 值 所 需 的 字 段 。 

要 将 表 格 标 记 的  ACTION  属 性 指 定 的 网 页 。 “ Submit ” 按 钮 的  HTML  标 记  ( 〈 INP 
UT TYPE=SUBMIT VALUE=" Calculate Future Value " 〉 )  使 用  ACTION  的 值 ， 从 
 HTML  表 格 标 记  ( 〈 FORM METHOD=POST ACTION="Finance.asp" 〉 )  来 调 用  ASP  页 
 Finance.asp 。 

我 们 已 经 为 您 创 建 好 了 表 格 。 用 文 本 编 辑 器 打 开  localhost Web  服 务 器 上  Tuto 
rial  目 录  (C:\WINNT\Help\iis\htm\tutorial)  中 的  FVform.asp  文 件 即 可 。 


脚 本 

我 们 使 用  VBScript  来 调 用 您 的  Finance  服 务 器 组 件 。 脚 本 首 先 确 认 来 自  HTML 
  表 格 中 任 何 没 有 输 入 的 变 量 赋 默 认 值 。   

Server.CreateObject  创 建 一 个  Finance  组 件 的 实 例 （ 也 就 是 使 组 件 可 用 ） ， 名 
为  MS.Finance 。 为 组 件 创 建 实 例 以 后 ， 就 可 以 使 用 组 件 的 方 法 和 属 性 了 。 在 脚 本 
中 紧 随  Server.CreateObject  之 后 ， 使 用 了  CalcFV  方 法 来 计 算 存 款 计 划 的 未 来 
值 。 计 算 结 果 将 出 现 在 请 求 这 个 信 息 的 浏 览 器 中 。 

要 查 看 脚 本 ， 请 用 文 本 编 辑 器 打 开  Tutorial  目 录  (C:\WINNT\Help\iis\htm\tu 
torial)  中 的  Finance.asp  文 件 。 

用 浏 览 器 进 行 测 试 

要 运 行  Finance.asp ASP  页 ， 请 打 开  FVform.asp  文 件 ， 该 文 件 将 绘 制 一 个 表 格 
并 调 用  Finance.asp  脚 本 来 计 算 表 格 中 描 述 的 存 款 计 划 的 未 来 值 。 

要 打 开  FVform.htm ， 请 将 浏 览 器 导 向  http://localhost/iishelp/iis/htm/tut 
orial/FVform.asp 。   

在 “ Savings Plan ” 表 格 中 输 入 数 值 。   

单 击 “ Calculate Future Value ” 按 钮 。 存 款 计 划 的 结 果 将 会 出 现 。   

经 过 不 长 时 间 的 学 习 ， 您 已 经 创 建 了 一 个 有 用 的  ActiveX  服 务 器   组 件 。 如 果 需 
要 使 用 其 他 财 务 函 数 ， 只 要 通 过  Visual Basic  将 其 他 方 法 添 加 到  Finance  服 务 
器 组 件 中 ， 就 可 以 执 行 其 他 财 务 函 数 了 。 我 们 鼓 励 您 进 行 尝 试 并 提 出 创 造 性 的 方 
法 来 利 用 自 己 的  ActiveX  组 件 。 您 很 快 将 会 发 现 ， 用 组 件 来 开 发  Web  应 用 程 序 
几 乎 没 有 任 何 限 制 。 



---------------------------------------------------------------------- 
---------- 

　 
( 全 文 完 ）