Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Valores decimais com XML
Message
 
To
23/01/2003 09:00:23
General information
Forum:
Visual FoxPro
Category:
XML, XSD
Miscellaneous
Thread ID:
00744695
Message ID:
00744739
Views:
10
This message has been marked as the solution to the initial question of the thread.
Oi Frederico,

O esquema gerado pelo ADO é baseado em XDR, uma implementação intermediária da Microsoft que ainda é suportada por várias tecnologias. Ocorre que o VFP não entende estes esquemas, somente XSD Schemas (que é a recomentação do W3C). Uma alternativa seria, usando VFP 7.0 SP1 ou superior, usar a flag 8192 da função XMLTOCURSOR e definir a estrutura do cursor base. A partir da estrutura deste cursor o VFP criará os campos e os importará do XML apropriadamente. O exemplo abaixo conecta-se no database Northwind do SQL Server 2000 e exemplifica esta abordagem:
LOCAL loConexao as "ADODB.Connection"
LOCAL loRS      as "ADODB.Recordset"

loConexao = CREATEOBJECT("ADODB.Connection")
loConexao.Open("DRIVER={SQL Server}; Server=(local); DATABASE=Northwind; UID=sa; PASSWORD=;")

loRS = loConexao.Execute("select * from [Order Details]")
loRS.Save("\Pedidos.xml", 1)

CREATE CURSOR Pedidos (OrderID Integer, ProductID Integer, UnitPrice Numeric(19,4), Quantity Integer, Discount Numeric(19,4) )
XMLTOCURSOR("\Pedidos.xml", "Pedidos", 512 + 8192)

BROWSE

loRS = null
loConexao = null
Uma outra alternativa seria usar a biblioteca wwXML da WW, que suporta esquemas XDR...

Um abraço!
-----
Fabio Vazquez
http://www.fabiovazquez.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform