Lianja

Download HTML from URL and Convert to XML

See more HTML-to-XML/Text Examples

Downloads an HTML page from a URL and converts it to XML. Lianja

llSuccess = .F.

// Note: This example requires the Chilkat Bundle license.

// Any string argument automatically begins the 30-day trial.
loGlob = createobject("CkGlobal")
llSuccess = loGlob.UnlockBundle("30-day trial")
if (llSuccess <> .T.) then
    ? loGlob.LastErrorText
    release loGlob
    return
endif

loHttp = createobject("CkHttp")

lcHtml = loHttp.QuickGetStr("http://www.intel.com/")
if (loHttp.LastMethodSuccess <> .T.) then
    ? loHttp.LastErrorText
    release loGlob
    release loHttp
    return
endif

loHtmlToXml = createobject("CkHtmlToXml")

// Indicate the charset of the output XML we'll want.
loHtmlToXml.XmlCharset = "utf-8"

// Set the HTML:
loHtmlToXml.Html = lcHtml

// Convert to XML:

lcXml = loHtmlToXml.ToXml()

// Save the XML to a file.
// Make sure your charset here matches the charset
// used for the XmlCharset property.
llSuccess = loHtmlToXml.WriteStringToFile(lcXml,"qa_output/out.xml","utf-8")

? "Finished."


release loGlob
release loHttp
release loHtmlToXml