Question

易语言互联网浏览器怎么处理才可以在本窗口打开新的超链接?

Answer 1

你好，这个问题很好解决的。

只需要在浏览器的  即将打开事件中加入个拦截阻止打开新窗口的命令就行了

请参考如下

.程序集 窗口程序集_启动窗口
.程序集变量 text, 文本型

.子程序 _互联网浏览器1_即将打开新窗口
.参数 浏览器对象, 对象, 参考
.参数 取消打开, 逻辑型, 参考

取消打开 ＝ 真
互联网浏览器1.浏览 (text, , , )

.子程序 _互联网浏览器1_状态文本被改变
.参数 状态文本, 文本型, 参考

text ＝ 状态文本

希望我的回答对你有所帮助！Kiss灬小猪

Answer 2

超文本浏览框的：
.程序集变量 IHTMLDocument2, 对象
_超文本浏览框1_即将打开新窗口

IHTMLDocument2 ＝ 超文本浏览框1.取文档对象 ()
url ＝ IHTMLDocument2.读文本属性 (“url”, )'这样可以获取到地址

超文本浏览框1.地址 ＝ url
互联网浏览器的：
.版本 2
.支持库 WebBrowser2
.支持库 spec

.子程序 _互联网浏览器1_即将打开新窗口
.参数 浏览器对象, 对象, 参考
.参数 取消打开, 逻辑型, 参考

取消打开 ＝ 真
互联网浏览器1.取网页文档对象 (对象1)
url ＝ 对象1.读文本属性 (“url”, )
调试输出 (url)