如何让WebBrowser1弹出页面在新窗口中打开？

lyzshuai

应该在WebBrowser1_NewWindow2里面怎么写？？？
原先是用cancel=true
现在发现这样我点网页上的连接也被禁了

maggic

自己再做一个窗口，弹出那个连接
  

jayzheng

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    Set ppDisp = WebBrowser2.Application ' 在指定窗口弹出
End Sub