Como acessar a fonte HTML no Modelo de Objeto do Documento HTML gerenciado
As propriedades DocumentStream e DocumentText no controle WebBrowser retornam o HTML do documento atual do modo que foi inicialmente exibido. No entanto, caso modificar a página usando chamadas de método e propriedade como AppendChild e InnerHtml, essas mudanças não aparecerão quando chamar DocumentStream e DocumentText. Para obter a fonte HTML mais atualizada do DOM, é necessário chamar a OuterHtml propriedade no elemento HTML.
O procedimento a seguir mostra como recuperar a fonte dinâmica e exibi-la em um menu de atalho separado.
Recuperação de fonte dinâmica com a propriedade OuterHtml
Crie um novo aplicativo Windows Forms. Comece com um único Form, e chame-o
Form1
de .Hospede o controle em seu aplicativo Windows Forms e nomeie-o WebBrowser
WebBrowser1
. Para obter mais informações, consulte Como adicionar recursos do navegador da Web a um Aplicativo dos Windows Forms.Crie um segundo Form em seu aplicativo chamado
CodeForm
.Adicione um RichTextBox controle a
CodeForm
e defina sua Dock propriedade comoFill
.Crie uma propriedade pública em
CodeForm
chamadaCode
.public string Code { get { if (richTextBox1.Text != null) { return (richTextBox1.Text); } else { return (""); } } set { richTextBox1.Text = value; } }
Public Property Code() As String Get If (RichTextBox1.Text IsNot Nothing) Then Code = RichTextBox1.Text Else Code = "" End If End Get Set(ByVal value As String) RichTextBox1.Text = value End Set End Property
Adicione um Button controle nomeado
Button1
ao seu Forme monitore o Click evento. Para obter detalhes sobre como monitorar eventos, consulte Eventos.Adicione o seguinte código ao manipulador de eventos do Click.
private void button1_Click(object sender, EventArgs e) { HtmlElement elem; if (webBrowser1.Document != null) { CodeForm cf = new CodeForm(); HtmlElementCollection elems = webBrowser1.Document.GetElementsByTagName("HTML"); if (elems.Count == 1) { elem = elems[0]; cf.Code = elem.OuterHtml; cf.Show(); } } }
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim elem As HtmlElement If (WebBrowser1.Document IsNot Nothing) Then Dim cf As New CodeForm() Dim elems As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("HTML") If (elems.Count = 1) Then elem = elems(0) cf.Code = elem.OuterHtml cf.Show() End If End If End Sub
Programação robusta
Sempre teste o valor de Document antes de tentar recuperá-lo. Se a página atual não tiver terminado de carregar, o Document ou um ou mais de seus objetos filhos podem não ser inicializados.
Confira também
.NET Desktop feedback