问专家-如何避免java或vb脚本window.close时，关闭掉webbrowser控件

如何避免java或vb脚本window.close时，关闭掉webbrowser控件

编号：	QA004742
建立日期：	2003年11月1日	最后修改日期：	2005年4月24日
所属类别：	Visual Basic - Web浏览器

    操作系统：windows
    编程工具：vb,delphi
    问题：在webbrowser中，当网页中含有java或vb脚本window.close时，将会关闭掉webbrowser控件。有没有办法对这一事件进行拦截和处理？webbrowser有一个事件叫做onquit。不过webbrowser好像不对其处理，忽略这一事件，所以没有办法使用这一事件来处理。所以请教高手帮忙解答。
    水平: 中级(jianyu)

    这不是用OnQuit的，而是用WindowClosing。如果你想他不会这样而关掉，可以这样：
    Private Sub wb1_WindowClosing(ByVal IsChildWindow As Boolean, Cancel As Boolean)
     Cancel=False '取消结束
    End Sub

tonton的意见：
    '
    ' 请在窗体上加入一个Timer控件及一个WebBrowser控件
    '
    Dim bCanClose As Boolean

    Private Sub Form_Load()
     WebBrowser1.Navigate "某一个可以关闭掉窗口的网页"
    End Sub

    Private Sub Timer1_Timer()
     If bCanClose Then
     If WebBrowser1.Visible = False Then
     MsgBox "WebBrowser控件已经被关闭了！"
     Unload Me
     End If
     End If
    End Sub

    Private Sub WebBrowser1_WindowClosing(ByVal IsChildWindow As Boolean, Cancel As Boolean)
     If IsChildWindow = False Then
     bCanClose = True
     Timer1.Interval = 100
     Timer1.Enabled = True
     End If
    End Sub

此问题由LifePlayer回答。

附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, Web浏览器, ie, netscape。

	把这个问题推荐给朋友

Web Designed by ZebraStudio