VB.NET 从 Webbrowser1 获取 URL [关闭]

Question

如何获取此网址并将其粘贴到文本框中？

注销（Kassy Daniels）·帮助

从这个在 webbrowser1 中

我希望它获取 /logout.php？ url 因为每个用户都不一样

点击按钮时将其粘贴到文本框1

Answer 1

假设你的浏览器是WebBrowser1，

使用WebBrowser1.Document.Links 将为您提供页面上所有链接的HTMLElementCollection。

您可以遍历这些，并检查每个链接的 OuterHtml 元素（这将为您提供一个包含原始链接、ID 等的字符串）以查找您正在寻找的文本（在此案例logout?)。

使用 substring 命令，提取该 URL，并消除周围的文本，然后您可以将其直接插入文本框。

更新：使用 Firebug 或者你喜欢的 DOM 工具，可以发现注销链接在文档的根 div 中

    Dim rootDiv As HtmlElement = WebBrowser1.Document.GetElementById("root")
    Dim links As HtmlElementCollection = rootDiv.GetElementsByTagName("a")
    Dim index As Integer
    For i As Integer = 0 To links.Count - 1
        If links(i).InnerHtml.Contains("Logout") Then
            index = i
            Exit For
        End If
    Next i

    Dim stringofLink As String = links(index).OuterHtml

如果页面结构发生变化，这应该有一定的弹性，但您可能需要进一步概括它。处理 stringofLink 但是您想将其分解（找到您需要的＆符号，然后从问号复制到该点）。