(Visual FoxPro) Load ucs2 XML File (utf-16)

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loXml
LOCAL lnSuccess
LOCAL loSb

* 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:

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Xml')
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:
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
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