如何关闭网页的提示窗口（如网页内部由alert（..）产生的提示）?

Question

我用webbrowser的navigate方法去打开一网页，网页由alert脚本（JSCRIPT）产生一个提示，请问如何用语句把它关闭？谢谢！！！

Answer 1

Private Sub Form_Unload(Cancel As Integer)
If MsgBox("真的要关闭窗口吗？", vbYesNo, "提示") = vbYes Then
Else
Cancel = 1
End If
End Sub

Answer 2

一种方式是设置浏览器为静默模式，这样所有的消息框都不会弹出来
另外一种方式是在容器中实现IOleCommandTarget::Exec，处理 CGID_DocHostCommandHandler命令组的OLECMDID_SHOWSCRIPTERROR命令，参见http://support.microsoft.com/default.aspx?scid=kb;en-us;261003

Answer 3

谢谢，工作无烟和jiangsheng。我将浏览器设为静默模式（webbrowser.silent=ture)，提示还是出来，不知为何。第二种方式不懂使用，我用的是VB。