l3.txt

asp txt版教程

第 一 课 ： 使 用  Ad Rotator （ 广 告 轮 换 器 ） 组 件 

Internet Web  节 点 通 常 提 供 广 告 空 间 。 要 让 节 点 看 起 来 有 趣 ， 并 且 要 在 有 限 的 空 
间 内 显 示 好 几 个 客 户 的 广 告 ， 您 也 许 希 望 循 环 显 示 不 同 的 广 告 。 Ad Rotator  组 件 
简 化 了 按 顺 序 显 示 每 幅 广 告 的 任 务 ， 并 且 让 添 加 新 广 告 的 工 作 变 得 更 轻 松 。 另 外 
， 您 能 够 轻 松 地 添 加 或 更 改 广 告 的 超 级 链 接 ， 这 样 用 户 就 可 以 通 过 单 击 广 告 来 访 
问 广 告 客 户 的  Web  节 点 。 在 本 课 中 ， 您 将 创 建 一 个 脚 本 ， 通 过 调 用  Ad Rotator 
  组 件 来 轮 换  4  个 随 机 选 择 的 广 告 。 单 击 下 面 的 “ 演 示  (Show Me) ” 按 钮 ， 可 以 
看 到 一 个 示 例 广 告 ， 然 后 再 次 单 击 该 按 钮 ， 轮 换 到 另 一 个 广 告 。 

　 

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

　 

　 

　 

　 

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

创 建 广 告 文 件 

我 们 已 经 为 一 项 虚 构 的 业 务 创 建 了 一 个  Web  页 ， 名 叫 “ Bayshore Travel ” ， 您 
将 在 该 页 中 插 入 广 告 轮 换 脚 本 。 您 可 以 创 建 一 个 简 单 的 文 本 文 件 来 告 诉  Ad Rota 
tor  组 件 要 插 入 哪 些 广 告 以 及 每 个 广 告 显 示 时 间 的 百 分 比 。 我 们 已 经 为 您 创 建 了 
一 个 包 含 广 告 的 文 件 。 要 查 看 它 ， 请 用 文 本 编 辑 器 打 开  localhost Web  服 务 器 上 
 Tutorial  目 录  (C:\WINNT\Help\iis\htm\tutorial)  中 的  Adrot.txt  文 件 。   


文 件 第 一 行 设 置 的 脚 本 文 件 （ 此 处 是  Redirect.asp ） 将 在 用 户 单 击 广 告 时 被 调 用 
。 通 过 修 改  Redirect.asp  文 件 ， 可 以 在 链 接 到 广 告 客 户 的  Web  节 点 之 前 执 行 指 
定 的 操 作 ， 比 如 追 踪 广 告 受 欢 迎 的 程 度 。 后 面  3  行 规 定 了 广 告 图 像 的 宽 、 高 和 边 
框 。 

redirect /iishelp/iis/htm/tutorial/redirect.asp 

width 180 

height 180 

border 1 

接 下 来 ， 文 件 包 含 了 广 告 数 据 。 对 每 一 个 广 告 ， 都 包 括 使 用 的 图 像 、 用 户 单 击 时 
转 向 的  URL （ 此 处 是 调 用  Redirect.asp  之 后 ） 、 图 像 的 说 明 文 字 以 及 广 告 显 示 
时 间 的 百 分 比 ： 

/iishelp/iis/htm/tutorial/nyc.jpg 

http://www.microsoft.com 

Big Deals in the Big Apple 

35 

通 过 在 分 离 的 文 件 中 维 护 广 告 信 息 ， 您 单 位 中 的 不 同 小 组 就 能 够 更 新  Adrot.txt 
  文 件 ， 而 不 用 您 来 更 新  ASP  页 。 不 同 的 小 组 能 够 维 护 节 点 中 不 同 部 分 的 广 告 文 
件 。   

创 建 脚 本 

用 文 本 编 辑 器 打 开  localhost Web  服 务 器 上  Tutorial  目 录  (C:\WINNT\Help\i 
is\htm\tutorial)  中 的  Bayshore.asp  文 件 。   

　 

在  Bayshore.asp  文 件 的 开 头 ， 在 任 何  HTML  标 记 或  ASP  语 句 之 前 ， 粘 贴 以 下 脚 
本 ：   

〈 %@ LANGUAGE = "VBScript" % 〉 

此 脚 本 是 一 个  ASP  指 令 语 句 ， 告 诉  Web  服 务 器 您 的 脚 本 是 用  VBScript  编 写 的 
。 这 个 指 令 语 句 必 须 位 于  ASP  文 件 的 第 一 行 。 

　 

查 找 文 字 “ Tutorial Lesson: Ad Rotator. ”   ， 您 的 脚 本 将 插 入 到 这 一 行 之 后 。 


　 

下 列 脚 本 命 令 创 建 一 个  Ad Rotator  组 件 实 例 ， 然 后 将 其 赋 值 给 变 量  Ad 。 请 将 下 
列 脚 本 命 令 复 制 并 粘 贴 到 文 本 编 辑 器 中 （ 在 上 一 步 找 到 的 文 字 行 之 下 ） ：   

〈 % Set Ad = Server.CreateObject("MSWC.Adrotator") % 〉   

将 一 个 组 件 实 例 赋 值 给 一 个 变 量 ， 这 样 就 能 在 随 后 的 脚 本 中 引 用 这 个 组 件 。 

　 

如 果 在 此 以 前 ， 另 一 个 用 户 已 经 学 完 了 教 程 的 这 一 部 分 ， 那 么 此 脚 本 命 令 就 已 经 
存 在 了 。 请 用 复 制 的 脚 本 覆 盖 已 有 的 脚 本 ， 或 者 将 未 使 用 过 的  Bayshore.asp  从 
 Template  目 录 (C:\WINNT\Help\iis\htm\tutorial\template) 复 制 到  Tutorial 
  目 录 中 。 

　 

若 要 显 示 新 广 告 ， 可 以 使 用  Ad Rotator  组 件 的  GetAdvertisement  方 法 。 将 以 
下 命 令 添 加 到 您 的 脚 本 中 ：   

〈 %= Ad.GetAdvertisement("adrot2.txt")% 〉   

GetAdvertisement  方 法 需 要 一 个 参 数 ， 就 是 包 含 广 告 信 息 的 文 件 的 名 称 。 该 名 称 
可 以 与  Adrot.txt  不 同 ， 此 处 是  Adrot2.txt 。 以 该 参 数 为 基 础 ， 此 方 法 返 回 一 
个 全 格 式 的  HTML  〈 IMG 〉   标 记 ， 其 中 包 含 适 当 的 广 告 。 您 赋 予  Ad Rotator  组 件 
实 例 的 变 量 名  Ad  在 前 ， 然 后 是  GetAdvertisement  方 法 ， 最 后 是 文 件 路 径  Adr 
ot2.txt 。 等 号 将 方 法 返 回 的 值 （ 真 正 的 广 告 ） 发 送 给 用 户 的 浏 览 器 。 

　 

以 纯 文 本 格 式 保 存 文 件  Bayshore.asp ， 然 后 退 出 文 本 编 辑 器 。 注 意 文 件 后 缀  .a 
sp  不 要 被 文 本 编 辑 器 替 换 。   

　 

若 要 验 证 您 创 建 的  ASP  页 是 否 正 常 运 行 ， 请 将 您 的 浏 览 器 导 向  http://localho 
st/IISHelp/IIS/Help/Htm/Tutorial/Bayshore.asp 。 （ 此 后 若 要 返 回 本 教 程 ， 只 
要 在 浏 览 器 中 单 击 “ 上 一 页 ” 或 “ Back ” 按 钮 即 可 。 ）