|
.版本 2
.支持库 HtmlView
.子程序 _超文本浏览框1_即将打开新窗口, 逻辑型
这样会出现不准确的情况。
建议使用一:WEB浏览器 (云外归鸟的支持库) 支持静态 二:SHDocVw(WebBrowser,系统自带,安装OCX组件 Microsoft Web Browser)无法静态
互联网浏览器1 是你主要的浏览框,互联网浏览器2 用来挂接跳转,可以 可视=假
.版本 2
.支持库 WebBrowser2
.子程序 _互联网浏览器1_即将打开新窗口
.参数 浏览器对象, 对象, 参考
.参数 取消打开, 逻辑型, 参考
互联网浏览器2.取浏览器对象 (浏览器对象)
取消打开 = 假
.子程序 _互联网浏览器2_即将跳转
.参数 地址, 文本型, 参考
.参数 标记, 整数型
.参数 目标窗口名称, 文本型, 参考
.参数 投送的数据指针, 整数型
.参数 投送的数据长度, 整数型
.参数 类型说明, 文本型, 参考
.参数 取消跳转, 逻辑型, 参考
互联网浏览器1.浏览 (地址, , , )
取消跳转 = 真
超文本浏览框1.地址 = 超文本浏览框1.状态条文本
返回 (假)
超文本浏览框1.静默 = 真 |
|