(Tcl) Load ucs2 XML File (utf-16)

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

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

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

set xml [new_CkXml]

set success [CkXml_LoadXmlFile $xml "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:
set sb [new_CkStringBuilder]

set success [CkStringBuilder_LoadFile $sb "qa_data/xml/sample_ucs2.xml" "utf-16"]
# Assuming success...
set success [CkXml_LoadSb $xml $sb 1]

# To convert to the XML from utf-16 to utf-8, do the following:
CkXml_put_Encoding $xml "utf-8"
puts [CkXml_getXml $xml]
set success [CkXml_SaveXml $xml "qa_output/sample_utf8.xml"]

delete_CkXml $xml
delete_CkStringBuilder $sb