以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]WebBrowser打开网页后,如何获取网页中的链接继续在WebBrowser中打开 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93051) |
-- 作者:jyh7081 -- 发布时间:2016/11/19 10:44:00 -- [求助]WebBrowser打开网页后,如何获取网页中的链接继续在WebBrowser中打开 论坛里有开发版事例,能否发个试用版的? http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=64315&skin=0
|
-- 作者:有点蓝 -- 发布时间:2016/11/19 11:16:00 -- |
-- 作者:jyh7081 -- 发布时间:2016/11/19 13:37:00 -- 版主给的实例运行没问题,但把afterload代码放入我的窗口后,弹出: 我的WebBrowser控件放在一个分区面板的页面集合中,跟这有没有关系? afterload代码: Dim web As windows.Forms.webbrowser = e.Form.Controls("WebBrowser1").basecontrol \'web.OfficeToolBar = True web.ScriptErrorsSuppressed = True addhandler web.DocumentCompleted, addressof web_DocumentCompleted addhandler web.NewWindow, addressof web_NewWindow |
-- 作者:有点蓝 -- 发布时间:2016/11/19 14:53:00 -- 注意全局代码 |
-- 作者:jyh7081 -- 发布时间:2016/11/19 15:26:00 -- 谢谢版主! 网页中有个下载按钮,在浏览器中点击可以弹出下载窗口(显示保存路径),在狐表窗口不弹出,是什么原因?
|
-- 作者:有点蓝 -- 发布时间:2016/11/19 15:46:00 -- 因为本帖讨论的应用模式,限制了不能弹出窗口 |
-- 作者:有点蓝 -- 发布时间:2016/11/19 15:46:00 -- 去掉这句代码试试 addhandler web.NewWindow, addressof web_NewWindow
|
-- 作者:jyh7081 -- 发布时间:2016/11/19 16:06:00 -- 去掉以后,确实弹出下载窗口了,但是也启动了外部浏览器,并创建了个临时的“无标题”网页,下载完后,这个“无标题”网页没有了,页面停留在外部浏览器上。 再点击其他链接,又打开外部浏览器了,看来不能去掉这句。
[此贴子已经被作者于2016/11/19 16:12:22编辑过]
|
-- 作者:有点蓝 -- 发布时间:2016/11/19 16:12:00 -- 没有办法,鱼与熊掌不可兼得 |
-- 作者:jyh7081 -- 发布时间:2016/11/25 13:02:00 -- 版主,能否在窗口放两个WebBrowser控件,主页面在WebBrowser1显示,凡是弹出的窗口都在WebBrowser2中显示? |