VB. Net Webview2 Как получить исходный код html?

Question

Я успешно отображаю веб-сайт на WebView2 в моем проекте VB. net (Visual Studio 2017), но не могу получить исходный код html. Пожалуйста, посоветуйте мне, как получить код html.

Мой код:

Private Sub testbtn_Click(sender As Object, e As EventArgs) Handles testbtn.Click
        WebView2.CoreWebView2.Navigate("https://www.microsoft.com/")
End Sub

Private Sub WebView2_NavigationCompleted(sender As Object, e As CoreWebView2NavigationCompletedEventArgs) Handles WebView2.NavigationCompleted
        Dim html As String = ?????
End Sub

Спасибо за ваш совет заранее.

Answer 1

Я только начал сегодня возиться с WebView2 и искал то же самое. Мне удалось собрать это решение:

Dim html As String
html = Await WebView2.ExecuteScriptAsync("document.documentElement.outerHTML;")

' The Html comes back with unicode character codes, other escaped characters, and
' wrapped in double quotes, so I'm using this code to clean it up for what I'm doing.
html = Regex.Unescape(html)
html = html.Remove(0, 1)
html = html.Remove(html.Length - 1, 1)

Конвертировал мой код из C# в VB на лету, так что, надеюсь, не пропустил никаких синтаксических ошибок.