VBScript

Convert HTML to plain-text

Demonstrates how to convert HTML to plain-text.

Chilkat VBScript Downloads

VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set h2t = CreateObject("Chilkat.HtmlToText")

' Set the HTML:

html = "<html><body><p>This is a test.</p><blockquote>Here is text within a blockquote</blockquote></body></html>"

plainText = h2t.ToText(html)

outFile.WriteLine(plainText)

' The output looks like this:

' This is a test.
' 
'     Here is text within a blockquote

outFile.Close