Login | Register   
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB5,VB6
Expertise: Intermediate
Apr 15, 2000

Retrieve the textual or HTML text contained in a WebBrowser control

Here's a quick way to retrieve the textual (that is, without any HTML tag) contents of a WebBrowser control:

Dim Text As String
Text = WebBrowser1.Document.Body.InnerText
Getting the HTML text is a tad less intuitive, though:

Dim Text As String
Text = WebBrowser1.Document.documentElement.OuterHTML
The following procedure let's you save the contents of a WebBroser control to a file, as plain text or HTML text:

Sub SaveWebBrowser(WB As WebBrowser, ByVal FileName As String, _
    Optional SaveAsPlainText As Boolean)
    Dim Text As String, fnum As Integer

    If SaveAsPlainText Then
        Text = BW.Document.Body.innerHTML
    Else
        Text = BW.Document.documentElement.OuterHTML
    End If

    ' save to file
    fnum = FreeFile
    Open FileName For Output As #fnum
    Print #fnum, Text;
    Close #fnum
End Sub    

Francesco Balena
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap