在WebBrowser控件VB.NET中捕获新窗口

Question

我一直在寻找，但我无法找到我需要的东西。我需要在VB.NET中的WebBrowser控件中包含一个弹出窗口

我找到了这个项目：http://www.codeproject.com/KB/cpp/ExtendedWebBrowser.aspx

但我一直在解析我需要的东西。看起来它实现了我需要的东西，但我不确定它是如何做到的。我只需要捕获一个弹出窗口并将其显示在一个新的WebBrowser对象中。

Answer 1

Private Sub WebBrowser1_NewWindow(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
    Dim myelement As HtmlElement = WebBrowser1.Document.ActiveElement
    Dim target As String = myelement.GetAttribute("href")
    Dim newinstance As New WebBrowser
    newinstance.Show()
    newinstance.Navigate(target)
    e.Cancel = True
End Sub