在 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