[求助]webbrowser模拟浏览器时页面关闭 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]webbrowser模拟浏览器时页面关闭

共有6314人关注过本帖树形打印复制链接主题：[求助]webbrowser模拟浏览器时页面关闭

jframe

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：112 积分：1383 威望：0 精华：0 注册：2012/10/18 14:22:00

[求助]webbrowser模拟浏览器时页面关闭 发帖心情

Post By：2022/11/23 17:13:00 [显示全部帖子]

用webbrowser模拟浏览器，就是在TabControl1里面放WebBrowser1，

当页面点击链接弹出新窗口时，不在弹出新窗口，而是动态增加TabControl1的页面，和动态增加WebBrowser

现在有个问题，当新页面完成操作，自动关闭网页时，会出现图中提示，

然后点击“是”之后，动态增加TabControl1的页面不会自动关闭，也就是点完之后，一点反应都没有。

我看后台好像是用window.close()来关闭页面的

现在希望能不提示是否关闭，能直接自动关闭当前的TabControl1的页面。

或者提示之后，点击“是”，能自动关闭当前的TabControl1的页面。

请高手赐教。

此主题相关图片如下：1669194327873.png

[此贴子已经被作者于2022/11/23 17:27:19编辑过]

jframe

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：112 积分：1383 威望：0 精华：0 注册：2012/10/18 14:22:00

Post By：2022/11/23 20:26:00 [显示全部帖子]

你好，在ie浏览器和微信浏览器里面，是直接自动关闭网页，并没有提示。

请问一下，狐表的webbrowser有没有windowclosing事件？要怎么写？

jframe

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：112 积分：1383 威望：0 精华：0 注册：2012/10/18 14:22:00

Post By：2022/11/24 9:20:00 [显示全部帖子]

在窗体aflerload里面是这样写的

AddHandler DirectCast(web.ActiveXInstance, SHDocVw.WebBrowser).NewWindow3, AddressOf NewWindow3

AddHandler DirectCast(web.ActiveXInstance, SHDocVw.WebBrowser).WindowClosing, AddressOf WindowClosing

在全局变量里面是这样写的

Public Sub NewWindow3(ByRef ppDisp As Object, ByRef Cancel As Boolean, _

ByVal dwFlags As UInteger, _

ByVal bstrUrlContext As String, ByVal bstrUrl As String)

Functions.Execute("newWindow", bstrUrl, cancel)

End Sub

但是Public Sub WindowClosing 我不知道怎么写参数

主题：[求助]webbrowser模拟浏览器时页面关闭