thomasmaul / classes Goto Github PK

var $obj : Object
var $csv : cs.XMLToObject
var $cvs_text : Text
$cvs_text:="<gen9>\n\t<RootElement>\n\t\t<Elem1>\n\t\t\t<Elem2>\n\t\t\t\t<Elem3 Font=\"Verdana\" Size=\"10\">some value</Elem3>\n\t\t\t</Elem2>\n\t\t</Elem1>\n\t</RootElement>\n</gen9>"
$csv:=cs.XMLToObject.new($cvs_text)
$obj:=$csv.get()
SET TEXT TO PASTEBOARD($cvs_text+"\r\r"+JSON Stringify($obj; *))

If (OK=1)
	$obj:=New object

	// root
	DOM GET XML ELEMENT NAME($ref; $name)
	This._child($obj; $name; $ref; $ref)

	DOM CLOSE XML($ref)
End if