Whre can I get TXML

Post Reply
Marcelo Via Giglio
Posts: 1033
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Whre can I get TXML

Post by Marcelo Via Giglio »

Hello,

I'm trying to get txml, but until now I don't know where can I get it, some body can help me to find it.

regards

Marcelo
User avatar
James Bott
Posts: 4654
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA
Contact:

Post by James Bott »

Marcelo,

Sent to your private email.

James
Jonathan Hodder
Posts: 77
Joined: Sun Aug 26, 2007 11:53 pm

Post by Jonathan Hodder »

This sounds useful. James may I have a copy also.
It may be useful to others as well. Thanks.
User avatar
James Bott
Posts: 4654
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA
Contact:

Post by James Bott »

Jonathan,

TXML is included in the xHarbour source code if you have it. If not, then send me your email address and I will send you a copy.

James
User avatar
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Post by Kleyber »

James,

Could you send to me also? Is there any samples? My email is kleyber.ribeiro@grupoferraz.com.br

TIA,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
James Bott
Posts: 4654
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA
Contact:

Post by James Bott »

I found the following in my notes. It may be of some help. I think it is what I used to get started.

James

--------------------------
1/4/2007 10:46 AM

There is a XMLDocument class in xHarbour. Below is from an Bablefish translated message on the newgroup.

------------------------------------
We created the document IN MEMORY!
oDoc: = TXmlDocument():New()

We added different nodes:
oDoc:oRoot:AddBelow(TxmlNode():New(HBXML_TYPE_PI, 'xml', ' version="1.0" encoding="iso-8859-1" '))
oDoc:oRoot:AddBelow(TxmlNode():New(HBXML_TYPE_COMMENT,, "Example USE"))
oDoc:oRoot:AddBelow(TxmlNode():New(HBXML_TYPE_COMMENT,, "Dates: "+ DToC(Date()) +" Time: "+ Time()))
oDoc:oRoot:AddBelow(TxmlNode():New(HBXML_TYPE_COMMENT,, "Last Access: "+ GetEnv("Username")))

Like habiamos commented, oRoot is the raiz, therefore, we are using
the raiz of arbol to be adding to nodes children, through method
AddBelow(oNode)

Also, we can observe like creating a node, and this with other nodes
with its properties:

oNewNodo: = TxmlNode():New(HBXML_TYPE_TAG, "NEW")

oConfig: = TxmlNode():New(HBXML_TYPE_TAG, "config")
oConfig:SetAttribute("reserve", "222")
oConfig:SetAttribute("habitacion", "AB2")

Fijaros as we added to the called node oConfig, to the node oNewNodo.
oNewNodo:AddBelow(oConfig)

And the node, oNewNodo, to arbol main of the document of the XML
oDoc:oRoot:AddBelow(oNewNodo)

Well, now, simply we created the file where to overturn all this information
hFile: = FCreate("Pepe.xml")
If hFile = -1
//And THIS I KEEP The WORK THAT MADE HABIAMOS!
oDoc:Write(hFile, HBXML_STYLE_INDENT + HBXML_STYLE_THREESPACES)
FClose(hFile)
Endif

Already this! It seems lie, is not so dificil when you see this position in
I cosay source, that it is what we needed.

Agracedimientos:
To freddy,
without its explanation, I do not believe that it had included/understood the importance
of the use of the classes of xHarbour

To Giancar It,
by its wonderful work made in xHarbour.
(By the way, this documented, but... english is not my fort...
to have if somebody is animated to translate the text hbxml.)
_________________
Greetings
User avatar
James Bott
Posts: 4654
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA
Contact:

Post by James Bott »

More help.

See xHarbour\tests\xmltests.prg for example of using xHarbour's TXMLDocument class.

You should have this file even in the standard xHarbour setup (without CVS).

James
Post Reply