快速开发多媒体Web

一、 概 述
---- Web 技 术 的 诞 生 使 得Internet 在 世 界 范 围 内 迅 速 漫 延， 大 大 加 速 了 全 球 网 络 化 的 进 程， 人 们 通 过Web 浏 览 器， 可 以 浏 览 到 世 界 各 地 成 千 上 万 个Web 服 务 器 提 供 的Web 页 面， 获 取 各 种 信 息。 但 是， 如 今 的 许 多Web 页 面 功 能 单 一、 缺 乏 交 互 能 力， 谈 不 上 文 本、 图 像、 声 音、 视 频 的 真 正 多 媒 体 集 成， 这 是HTML 与 生 俱 来 的 限 制。 要 开 发 交 互 多 媒 体Web， 方 兴 未 艾 的Java 自 然 是 一 种 选 择， 但 要 学 好Java， 并 非 数 日 之 功。 对 于 世 界 各 地 众 多 的VB 程 序 员， 能 否 直 接 用VB 开 发 多 媒 体Web 呢 ？ 针 对 此 问 题， 本 文 论 述 了 一 种 开 发 多 媒 体Web 的 便 捷 方 法---- 利 用ActiveX 技 术。
---- ActiveX 是 一 套Windows 环 境 下 的 部 件 模 型 开 发 标 准， 它 提 供 了 一 种 使 部 件 嵌 入 到Web 页 面 中 以 扩 展 交 互 功 能 的 应 用 机 制。 基 于ActiveX 的 部 件 模 块 称 为ActiveX 控 件（OCX 文 件）， 是 一 类 可 重 用 控 件， 利 用ActiveX 控 件， 程 序 员 可 快 速 集 成Form 和 增 强Web 的 交 互 性 能。 在 最 新 的VB5.0 中，Microsoft 提 供 了ActiveX Documents， 它 是VB5.0 中 最 激 动 人 心 的 新 特 性、 新 功 能 之 一，ActiveX Documents 是 一 种 能 用 浏 览 器 浏 览 的Form， 具 有 超 链 接、 菜 单 协 商 等 新 性 能， 而 且 开 发 过 程 与 一 般 的VB Form 基 本 一 样。 利 用ActiveX Documents，VB 程 序 员 可 快 速 开 发 功 能 强 大 的 交 互 多 媒 体Web 应 用。

二、 多 媒 体Web 开 发 要 点
---- 1 ．Web 创 建。 首 先 建 立 一 个ActiveX Documents EXE 类 型 的New Project，VB 自 动 为 该Project 增 加 一 个 缺 省 的UserDocument 对 象， 就 如 一 般Project 中 的 缺 省Form 对 象， 我 们 可 以 更 改 该UserDocument 的 各 个 属 性（ 如 改 名 为DocFirst）， 可 以 在 其 上 放 置Text、Image/Picture、Timer、MMControl 等ActiveX 控 件 以 增 强 其 功 能， 完 成 后 编 译 运 行， 若 运 行 正 常 每 个UserDocument 会 产 生 一 个vbd 文 件， 如DocFirst.vbd， 在Internet Explorer 中 打 开 该vbd 文 件， 就 会 在 浏 览 窗 口 中 看 到 对 应 的UserDocument， 外 观 完 全 和VB 中 所 见 的 一 样， 真 正 的 所 见 即 所 得。
---- 2 ． 增 加 交 互 特 性。 改 变DocFirst 的Picture 属 性， 为DocFirst 增 加 一 幅 背 景 图 像（ 如c:\windows\setup.bmp）， 再 在DocFirst 上 放 置 两 个 按 钮（ 分 别 名 为CmdNavigate 和CmdGoSecond）， 一 个Text Control（ 名 为TxtAddr）， 另 外 给Project 增 加 一 个UserDocument（ 名 为DocSecond）, 在 其 上 放 置 一 个 按 钮（ 名 为CmdGoFirst）， 然 后 输 入 如 下 程 序 语 句：

‘按钮CmdNavigate的单击事件处理
Private Sub CmdNavigate_Click()
HyPerlink.NavigateTo TxtAddr.Text
End Sub
‘按钮CmdGoSecond的单击事件处理
Private Sub CmdGoSecond_Click()
Hyperlink.NavigateTo App.Path & "\DocSecond.vbd"
End Sub
‘按钮CmdGoFirst的单击事件处理
Private Sub CmdGoFirst_Click()
UserDocument.Hyperlink.GoBack
End Sub

---- 通 过UserDocument 内 嵌 的Hyperlink 对 象， 我 们 很 容 易 在Internet 的Webs 间 浏 览， 例 如， 在Internet Explorer 中 打 开DocFirst.vbd 后， 用 户 若 在TxtAddr 中 输 入 目 标Web 地 址URL（ 设 输 入http://www.microsoft.com/）， 再 单 击CmdNavigate 按 钮， 便 可 到 达Microsoft 公 司 主 页； 若 用 户 单 击CmdGoSecond 按 钮， 便 会 看 到DocSecond UserDocument， 单 击DocSecond 上 的CmdGoFirst 按 钮， 又 回 到DocFirst UserDocument。

---- 3 ． 增 加 多 媒 体 特 性。VB5.0 提 供 了 多 媒 体ActiveX 控 件MMControl（mci32.ocx）， 我 们 可 把 它 应 用 到UserDocuments 中 以 增 加 多 媒 体 特 性。 在 前 面 的DocFirst UserDocument 上 放 置 一 个MMControl 对 象（ 名 为MMCtrlWeb）， 再 输 入 如 下 程 序 语 句：

Private Sub UserDocument_Show()
MMCtrlWeb.DeviceType = "WaveAudio"
‘选择该MCI设备类型为声音播放器
MMCtrlWeb.filename = "The Microsoft Sound.wav"
‘选择声音文件名
MMCtrlWeb.Command = "open" ‘打开设备
End Sub

---- 用Internet Explorer 打 开DocFirst.vbd 后， 用 户 会 看 到 类 似 家 电 控 制 的 按 钮 条， 单 击 按 钮 条 中 的 播 放 按 钮， 就 会 听 到 声 音。 改 变MMCtrlWeb 的 设 备 类 型 或 媒 体 文 件， 我 们 也 可 在Web 中 播 放 动 画、 音 乐CD、 视 频 剪 辑 等 多 媒 体。

三、 结 论
---- 以 上 论 述 了 一 种 开 发 多 媒 体Web 的 方 法， 对 于 使 用Internet Explorer 的 众 多VB 程 序 员 来 说， 该 方 法 可 继 承 以 往 的 经 验， 简 单 快 捷， 不 失 为 开 发 多 媒 体Web 的 上 佳 选 择。

上一篇： VB应用程序中用DDE功能开发AutoCAD for Windows
下一篇： AutoCAD R14与VB

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有