RosettaCodeData/Task/XML-DOM-serialization/Mathematica/xml-dom-serialization.math
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

4 lines
230 B
Text

DOM = XMLObject["Document"][{XMLObject["Declaration"]["Version" -> "1.0","Encoding" -> "utf-8"]},
XMLElement["root", {}, {XMLElement["element", {}, {"Some text here"}]}], {}];
ExportString[DOM, "XML", "AttributeQuoting" -> "\""]