Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Merge parent record and multiple child records
Message
From
01/12/2006 00:33:16
 
General information
Forum:
Visual FoxPro
Category:
XML, XSD
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01172180
Message ID:
01173992
Views:
7
Hi Sergey,

is it posibble to convert this to VB.Net?
CLOSE DATABASES 
OPEN DATABASE (HOME(2)) + "Northwind\northwind.dbc"

* Create XML
SELECT 0
USE northwind!OrderDetails 
SET ORDER TO ORDERID   && ORDERID
SELECT 0
USE northwind!Orders 
SET RELATION TO OrderID INTO OrderDetails
oXA = CREATEOBJECT("XmlAdapter")
oXA.RespectNesting = .T.
oXA.AddTableSchema("Orders")
oXA.AddTableSchema("OrderDetails")
oXA.ToXML("Orders.xml",,.T.)
***Modify Command Orders.xml 

CLOSE DATABASES ALL

* Load XML
oXA = CREATEOBJECT("XmlAdapter")
oXA.LoadXML("Orders.xml",.T.)
FOR i=1 TO oXA.Tables.Count
	oXA.Tables(i).Tocursor()
ENDFOR
SET
thanks and regards,
ryan.



>See Re: Is it possible to send parent-child records in single XM Message #1126943
>>
>> i have a 2 cursor/tables one is header files and the other one is the details, i want to create a single xml file using my 2 tables.
Previous
Reply
Map
View

Click here to load this message in the networking platform