copyright 1999 - 2014 by heinz prelle - hannover  - lenbachstraße 42 - www.visual-basic5.de | impressum
Beispiel: VB .Net - HTML Seite ohne Grafiken in WebBrowser anzeigen - 1

'Hinweis : Die Grafiken werden nur entfernt wenn die aufgerufene Website nicht aus Framesets besteht.
'
Option Strict On
Option Explicit On

Public Class Form1

    Private WithEvents WebBrowser1 As New WebBrowser

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _
            Handles MyBase.Load

        With WebBrowser1
            .Dock = DockStyle.Fill
            With Me
                .Controls.Add(WebBrowser1)
                .WindowState = FormWindowState.Maximized
                With Me.WebBrowser1
                    AddHandler .DocumentCompleted, _
                        New WebBrowserDocumentCompletedEventHandler _
                        ( _
                        AddressOf Document_DownloadCompleted _
                        )
                    Dim url As String = "http://www.vbarchiv.net"
                    .Navigate(New Uri(url))
                End With
            End With
        End With
    End Sub

    Public Sub Document_DownloadCompleted(ByVal sender As Object, _
                                          ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)
        Try
            For Each Items As HtmlElement In Me.WebBrowser1.Document.Images
                Items.OuterHtml = ""
            Next
            Me.Text = "HTML - Seite wurde ohne Grafiken geladen..."
        Catch ex As Exception
            MessageBox.Show(ex.Message.ToString(), "Info")
        End Try
    End Sub

End Class