Visual FoxPro

Load ucs2 XML File (utf-16)

See more XML Examples

Demonstrates how to load a ucs2 (utf-16 little-endian) XML file into Chilkat XML. Visual FoxPro

LOCAL lnSuccess
LOCAL loXml
LOCAL loSb

lnSuccess = 0

* If the XML file specifies the encoding in the XML declaration, such as:
* <?xml version = "1.0" encoding = "UTF-16" standalone = "no" ?>
* Then it's simply a matter of calling LoadXmlFile.
* Chilkat will automatically read the XML declaration and will
* process the file correctly.   For example:

loXml = CreateObject('Chilkat.Xml')
lnSuccess = loXml.LoadXmlFile("qa_data/xml/sample_ucs2.xml")

* If, however, there is no XML declaration to indicate the character encoding,
* then you must explicitly read the file according to what you know
* is the correct encoding.  For example:
loSb = CreateObject('Chilkat.StringBuilder')
lnSuccess = loSb.LoadFile("qa_data/xml/sample_ucs2.xml","utf-16")
* Assuming success...
lnSuccess = loXml.LoadSb(loSb,1)

* To convert to the XML from utf-16 to utf-8, do the following:
loXml.Encoding = "utf-8"
? loXml.GetXml()
lnSuccess = loXml.SaveXml("qa_output/sample_utf8.xml")

RELEASE loXml
RELEASE loSb