Convert HTML to plain-text

Demonstrates how to convert HTML to plain-text. The HTML-to-text conversion component is included with the Chilkat HTML-to-XML license.

Download Chilkat HTML-to-XML ActiveX (also includes HTML-to-PlainText conversion)

Dim h2t As New HtmlToText

'  Any string argument automatically begins the 30-day trial.
Dim success As Long
success = h2t.UnlockComponent("30-day trial")
If (success <> 1) Then
    MsgBox h2t.LastErrorText
    Exit Sub
End If

'  Set the HTML:
Dim html As String
html = "<html><body><p>This is a test.</p><blockquote>Here is text within a blockquote</blockquote></body></html>"

Dim plainText As String

plainText = h2t.ToText(html)

Text1.Text = Text1.Text & plainText & vbCrLf

Need a specific example? Send a request to support@chilkatsoft.com