易语言超文本链接框如何阻止弹出窗口

就是在超文本连接框里我点开一个网页,可是这个网页是需要新建一个网页打开的,也就是说不能在超文本连接框内打开它,请问怎么才能让它在超文本连接框内打开?谢谢了

不弹出IE窗口打开可以这样子写:
.版本 2
.支持库 HtmlView

.子程序 _超文本浏览框1_即将打开新窗口, 逻辑型

超文本浏览框1.地址 = 超文本浏览框1.状态条文本
返回 (假)
或者下面这个也行:
webbrowser 有个WebBrowser_NewWindow2的事件
.版本 2
.支持库 shdocvw

.子程序 _WebBrowser_NewWindow2, , , 将本事件的“Cancel”参数设为“真”,即可阻止弹出窗口
.参数 ppDisp, 对象, 参考
.参数 Cancel, 逻辑型, 参考

' Cancel = 真
ppDisp = WebBrowser1.GetApplication ()
WebBrowser.可视 = 假
WebBrowser1.可视 = 真
因为超文本浏览框这个组件不完美,存在一些BUG(漏洞)建议去下载其他的WEB支持库。也就是浏览器的支持库。超文本浏览框没啥用。最多用来弄一些小广告。
温馨提示:内容为网友见解,仅供参考
第1个回答  2013-05-11
就是在即将打开新窗口时,使超文本浏览框1打开即将打开的网页,然后阻止新窗口打开就行,以下是源码:.版本 2.支持库 HtmlView
.子程序 _超文本浏览框1_即将打开新窗口, 逻辑型
超文本浏览框1.地址 = 超文本浏览框1.状态条文本返回 (假)本回答被网友采纳
第2个回答  2013-05-11
因为超文本浏览框这个组件不完美,存在一些BUG(漏洞)建议楼主去下载其他的WEB支持库。也就是浏览器的支持库。超文本浏览框没啥用。最多用来弄一些小广告!希望采纳!
相似回答