LOCAL lcXML CREATE CURSOR Customer (Name Char(20), QtyOrders Integer) INSERT INTO Customer VALUES ("Fabio Vazquez", 1) INSERT INTO Customer VALUES ("Another Customer", 0) CURSORTOXML("Customer", "lcXML", 1, 0, 0, "1") STRTOFILE(lcXML, "output.xml") MODIFY FILE ("output.xml") DELETE FILE "output.xml"Se você quiser mais informaçoes sobre este assunto, veja o artigo "Introducing XML for VFP Programmers - Part II", na edição de março/2002 da UTMag/RapoZine (em inglês) disçponível em: