有的网页会弹出很多新窗口,是ie打开的

解决方案 »

  1.   

    怎么使webbrowser不弹出所有的新窗口
      

  2.   

    Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    On Error Resume Next
    Set ppDisp = NOTHING
    End Sub
      

  3.   

    Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
     Cancel=FALSEEnd Sub
    上面那个错了,是这个参数,不是 TRUE 就是FALSE你试验 下,我忘了
      

  4.   

    真要这样的话,你什么新窗口都打不开了。我觉得最难的是弹出窗口。
    至于你的问题,根据判断后再设置Cancel=true
      

  5.   

    在WebBrowser1_NewWindow2事件里检查ppDisp内容,看是什么,不是你指定的就不要打开,将cancel=true就好了。