Visual FoxPro

Convert HTML to Plain Text

Demonstrates how to convert HTML to plain text. Visual FoxPro

LOCAL loH2t
LOCAL lcHtml
LOCAL lcPlainText

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

loH2t = CreateObject('Chilkat.HtmlToText')

lcHtml = loH2t.ReadFileToString("c:/temp/test.html","utf-8")
IF (loH2t.LastMethodSuccess = 0) THEN
    ? loH2t.LastErrorText
    RELEASE loH2t
    CANCEL
ENDIF

lcPlainText = loH2t.ToText(lcHtml)
IF (loH2t.LastMethodSuccess = 0) THEN
    ? loH2t.LastErrorText
    RELEASE loH2t
    CANCEL
ENDIF

? lcPlainText

RELEASE loH2t