Whre can I get TXML

Marcelo Via Giglio · Post by **Marcelo Via Giglio** » Fri May 23, 2008 8:10 pm

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

James Bott · Post by **James Bott** » Sat May 24, 2008 1:14 am

Marcelo,

Sent to your private email.

James

Jonathan Hodder · Post by **Jonathan Hodder** » Sun May 25, 2008 11:39 pm

This sounds useful. James may I have a copy also.
It may be useful to others as well. Thanks.

James Bott · Post by **James Bott** » Wed May 28, 2008 12:27 am

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

Kleyber · Post by **Kleyber** » Thu May 29, 2008 1:47 pm

James,

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

TIA,

James Bott · Post by **James Bott** » Fri May 30, 2008 8:54 pm

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

James Bott · Post by **James Bott** » Fri May 30, 2008 9:11 pm

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