topic-24240

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

XML tutorial
Posted: Sat Jun 09, 2012 12:44 PM

Really simple XML tests:

function Main()

   local oXml  := TXmlDocument():New(), oNode

   oNode = oXml:oRoot:AddBelow( TXmlNode():New( 0, "FORM" ) )
   
   oNode:AddBelow( TXmlNode():New( 0, "CAPTION",, "Hello world" ) )
   oNode:AddBelow( TXmlNode():New( 0, "TOP",, "100" ) )
   oNode:AddBelow( TXmlNode():New( 0, "LEFT",, "100" ) )
   oNode:AddBelow( TXmlNode():New( 0, "WIDTH",, "400" ) )
   oNode:AddBelow( TXmlNode():New( 0, "HEIGHT",, "300" ) )

   MsgInfo( oXml:oRoot:ToString() ) 

return nil

Result:

regards, saludos

Antonio Linares
www.fivetechsoft.com

Eoeo

Posts: 222

Joined: Mon Jun 04, 2012 12:00 PM

Re: XML tutorial
Posted: Mon Jun 11, 2012 04:01 PM

Good Antonio,
and if I a xml and I wish create for a sample a dbf How I can make :

sample test for xml from dbf :

Code (fw): Select all Collapse

 <?xml version="1.0" encoding="ISO-8859-1" ?> 
- <ROOT DATABASE="fornito.dbf">
- <Structure>
- <Field>
  <Field_name>PRNOMBRE</Field_name> 
  <Field_type>Character</Field_type> 
  <Field_length>40</Field_length> 
  <Field_decimals>0</Field_decimals> 
  </Field>

<Data>
<Record>
  <PRNOMBRE>test1</PRNOMBRE> 
</Record>
<Record>
  <PRNOMBRE>test2</PRNOMBRE> 
</Record>
  </Data>
  </ROOT>

FiveTech Support Forums

Continue the discussion