From: Antoine Mensch (antoine.mensch@xquarkgroup.com)
Date: 19/06/2004 - 09:45
Bonjour,
je ne peux pas vous répondre sur les technos Microsoft. Par contre, si vous
êtes intéressé par une techno Java, vous pouvez regarder XQuark Bridge
(www.xquark.org), un outil open source qui permet d'extraire des documents
XML structurés d'une base de données relationnelle à l'aide de XQuery. Il
fonctionne sur SQL Server 2000.
Antoine Mensch
> -----Message d'origine-----
> De : xml-tech-bounce@xmlfr.org [mailto:xml-tech-bounce@xmlfr.org]De la
> part de mercano
> Envoyé : jeudi 17 juin 2004 11:56
> À : xml-tech@xmlfr.org
> Objet : [xml-tech] [BDD->XML] ADO
>
>
> Bonjour. Cherchant le moyen d'extraire des données de SQL
> Server, au format
> XML
>
> j'en suis arrivé (bien malgré moi) à tester ADO sous visual basic.
>
> A partir d'un exemple sur northwind (bdd sous sqlserver) je cherche à
> exporter
> un fichier xml valide pointant vers un schema xsd.
>
> J'ai la fonction suivante:
> -------------------------------------------------
> Public Function ForXMLAutoQuery() Dim adoConn As New
> ADODB.Connection
> Dim adoCmd As New ADODB.Command
> Dim adoStream As New ADODB.Stream adoConn.Open
> strConnectionString
> Set adoCmd.ActiveConnection = adoConn
> adoCmd.CommandType = adCmdText
> adoCmd.Properties("XML Root") = "Racine"
> adoCmd.Properties("Mapping Schema") = "Result.xsd"
> &nbs p;
> adoCmd.CommandText = "select Customers.ContactName, " &_
> "Customers.ContactTitle, " &_
> "Customers.CompanyName, Customers.CustomerID," &_
> "Orders.OrderID, Orders.OrderDate, Orders.ShippedDate, " &_
> "[Order Details].UnitPrice, [Order Details].Quantity, " &_
> "Products.ProductName , Products.UnitsInStock " &_
> "From Customers, Orders, [Order Details], Products " &_
> "Where Customers.CustomerID = Orders.CustomerID " &_
> "and Orders.OrderID = [Order Details].OrderID " &_
> "and [Order Details].ProductID = Products.ProductID " &_
> &n bsp; "and Customers.CustomerID='GROSR' for XML AUTO"
>
> adoStream.Open
> adoCmd.Properties("Output Stream").Value = adoStream
> adoCmd.Execute , , adExecuteStream
>
> txtResults.Text = adoStream.ReadText
> adoStream.SaveToFile ("Result.xml")
>
> End Function
>
>
> ----------------------------------------------------------
>
>
>
> elle produit un fichier XML bien formé avec entête
> (http://le.gros.flop.free.fr/Tumo/Docs/Result.xml[1])mais je n'obtiens pas
> dans ma balise racine le lien vers le schema correspondant.
>
> Je voudrais obtenir:
>
>
> <?xml version="1.0" encoding="utf-8" ?>
> <Racine xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance[2]"
> xsi:noNamespaceSchemaLocation="Result.xsd">
> (...)
> </Racine>
>
>
> Quelqu'un connaitrait-il la fonction permettant cet ajout?
> Merci
> ------------------------------------------
>
> Faites un voeu et puis Voila ! www.voila.fr
>
>
>
> --- Links ---
> 1 http://le.gros.flop.free.fr/Tumo/Docs/Result.xml
> 2 http://www.w3.org/2001/XMLSchema-instance
> --
> Devenez redacteur <XML>fr et contribuez au developpement du
> xml francophone (http://xmlfr.org/infos/redacteurs/) !
>
> Liste de diffusion "xml-tech@xmlfr.org" (http://xmlfr.org).
>
> Cette liste est a votre disposition pour discuter en francais de
> tout sujet technique lie a XML.
>
> Pour resilier votre abonnement, envoyez un message contenant
> la commande "unsubscribe" a xml-tech-request@xmlfr.org
> (mailto:xml-tech-request@xmlfr.org?Subject=unsubscribe)
>
>
--
Devenez redacteur <XML>fr et contribuez au developpement du
xml francophone (http://xmlfr.org/infos/redacteurs/) !
Liste de diffusion "xml-tech@xmlfr.org" (http://xmlfr.org).
Cette liste est a votre disposition pour discuter en francais de
tout sujet technique lie a XML.
Pour resilier votre abonnement, envoyez un message contenant
la commande "unsubscribe" a xml-tech-request@xmlfr.org
(mailto:xml-tech-request@xmlfr.org?Subject=unsubscribe)
Archive générée par hypermail 2.1.3 le 30/06/2004 - 08:32 UTC
webmaster@xmlfr.org
|
