(Visual Basic 6.0) 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

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

Dim xml As New ChilkatXml
Dim success As Long
success = xml.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:
Dim sb As New ChilkatStringBuilder
success = sb.LoadFile("qa_data/xml/sample_ucs2.xml","utf-16")
' Assuming success...
success = xml.LoadSb(sb,1)

' To convert to the XML from utf-16 to utf-8, do the following:
xml.Encoding = "utf-8"
Debug.Print xml.GetXml()
success = xml.SaveXml("qa_output/sample_utf8.xml")