Merci Anor, mais ce message n'est pas celui que je voulais envoyé, bizarrement l'autre n'a pas voulu partir et je n'ai pas fais de copier coller, j'ai juste refais "vite fait"... et j'ai oublié le principal.
En fait c'est le SQL que je voudrais transformer en XML, pas le résultat. Ouais, je sais, je suis tordu, mais ça c'est pas un scoop ;-)))))))))
J'ai un programme (très) spécifique qui sait importer du XML (ressemblant à du SQL) pour faire une requête dans une base particulière. Je voudrais juste ne pas me taper le XML à la main (et éviter si possible le VBA) car ce n'est rien de plus qu'une requête SQL entourée par ci par là de balises XML...
Je posterais un exemple de ce que je voudrais récupérer, ça sera sûrement plus clair. En attendant, merci pour ta réponse.
-- JièL / Jean-Louis GOUBERT http://forums.offices.free.fr/ là bas mieux qu'en face ;-)
Bonjoir(c) Anor
Le 06/07/2006 01:01 vous avez écrit ceci :
Salut JièL
D'après cette conversation dont je souviens vaguement, ça semble possible ... en VBA :-)
Merci Anor, mais ce message n'est pas celui que je voulais envoyé,
bizarrement l'autre n'a pas voulu partir et je n'ai pas fais de copier
coller, j'ai juste refais "vite fait"... et j'ai oublié le principal.
En fait c'est le SQL que je voudrais transformer en XML, pas le résultat.
Ouais, je sais, je suis tordu, mais ça c'est pas un scoop ;-)))))))))
J'ai un programme (très) spécifique qui sait importer du XML (ressemblant
à du SQL) pour faire une requête dans une base particulière. Je voudrais
juste ne pas me taper le XML à la main (et éviter si possible le VBA) car
ce n'est rien de plus qu'une requête SQL entourée par ci par là de balises
XML...
Je posterais un exemple de ce que je voudrais récupérer, ça sera sûrement
plus clair. En attendant, merci pour ta réponse.
--
JièL / Jean-Louis GOUBERT
http://forums.offices.free.fr/
là bas mieux qu'en face ;-)
Merci Anor, mais ce message n'est pas celui que je voulais envoyé, bizarrement l'autre n'a pas voulu partir et je n'ai pas fais de copier coller, j'ai juste refais "vite fait"... et j'ai oublié le principal.
En fait c'est le SQL que je voudrais transformer en XML, pas le résultat. Ouais, je sais, je suis tordu, mais ça c'est pas un scoop ;-)))))))))
J'ai un programme (très) spécifique qui sait importer du XML (ressemblant à du SQL) pour faire une requête dans une base particulière. Je voudrais juste ne pas me taper le XML à la main (et éviter si possible le VBA) car ce n'est rien de plus qu'une requête SQL entourée par ci par là de balises XML...
Je posterais un exemple de ce que je voudrais récupérer, ça sera sûrement plus clair. En attendant, merci pour ta réponse.
-- JièL / Jean-Louis GOUBERT http://forums.offices.free.fr/ là bas mieux qu'en face ;-)
Salut JièL
ok on attend l'exemple, a ne devrait pas être bien difficile : déjà tu peux obtenir le code SQL de la requête avec
MsgBox CurrentDb.QueryDefs("TaRequête").SQL Ensuite, il n'y a plus qu'à entourer ça avec tes balises xml et générer un fichier
En gros, ça donnera quelque chose comme ça :
Private Sub jiel() Dim i As Integer Dim F As Integer Dim ChaineDebut as string Dim ChaineFin as string ChaineDebut = "ta chaine de début" ChaineFin = "ta chaine de fin"
F = FreeFile Open "E:TonFichier.xml" For Output As #F Print #F, CahineDebut Print #F, CurrentDb.QueryDefs("TaRequête").SQL Print #F, ChaineFin Close #F End Sub
Merci Anor, mais ce message n'est pas celui que je voulais envoyé, bizarrement l'autre n'a pas voulu partir et je n'ai pas fais de copier coller, j'ai juste refais "vite fait"... et j'ai oublié le principal.
En fait c'est le SQL que je voudrais transformer en XML, pas le résultat. Ouais, je sais, je suis tordu, mais ça c'est pas un scoop ;-)))))))))
J'ai un programme (très) spécifique qui sait importer du XML (ressemblant à du SQL) pour faire une requête dans une base particulière. Je voudrais juste ne pas me taper le XML à la main (et éviter si possible le VBA) car ce n'est rien de plus qu'une requête SQL entourée par ci par là de balises XML...
Je posterais un exemple de ce que je voudrais récupérer, ça sera sûrement plus clair. En attendant, merci pour ta réponse.
-- JièL / Jean-Louis GOUBERT http://forums.offices.free.fr/ là bas mieux qu'en face ;-)
Salut JièL
ok on attend l'exemple, a ne devrait pas être bien difficile :
déjà tu peux obtenir le code SQL de la requête avec
MsgBox CurrentDb.QueryDefs("TaRequête").SQL
Ensuite, il n'y a plus qu'à entourer ça avec tes balises xml et générer un fichier
En gros, ça donnera quelque chose comme ça :
Private Sub jiel()
Dim i As Integer
Dim F As Integer
Dim ChaineDebut as string
Dim ChaineFin as string
ChaineDebut = "ta chaine de début"
ChaineFin = "ta chaine de fin"
F = FreeFile
Open "E:TonFichier.xml" For Output As #F
Print #F, CahineDebut
Print #F, CurrentDb.QueryDefs("TaRequête").SQL
Print #F, ChaineFin
Close #F
End Sub
Merci Anor, mais ce message n'est pas celui que je voulais envoyé, bizarrement l'autre n'a pas voulu partir et je n'ai pas fais de
copier coller, j'ai juste refais "vite fait"... et j'ai oublié le principal.
En fait c'est le SQL que je voudrais transformer en XML, pas le résultat.
Ouais, je sais, je suis tordu, mais ça c'est pas un scoop ;-)))))))))
J'ai un programme (très) spécifique qui sait importer du XML (ressemblant à du SQL) pour faire une requête dans une base
particulière. Je voudrais juste ne pas me taper le XML à la main (et éviter si possible le VBA) car ce n'est rien de plus qu'une
requête SQL entourée par ci par là de balises XML...
Je posterais un exemple de ce que je voudrais récupérer, ça sera sûrement plus clair. En attendant, merci pour ta réponse.
--
JièL / Jean-Louis GOUBERT
http://forums.offices.free.fr/
là bas mieux qu'en face ;-)
ok on attend l'exemple, a ne devrait pas être bien difficile : déjà tu peux obtenir le code SQL de la requête avec
MsgBox CurrentDb.QueryDefs("TaRequête").SQL Ensuite, il n'y a plus qu'à entourer ça avec tes balises xml et générer un fichier
En gros, ça donnera quelque chose comme ça :
Private Sub jiel() Dim i As Integer Dim F As Integer Dim ChaineDebut as string Dim ChaineFin as string ChaineDebut = "ta chaine de début" ChaineFin = "ta chaine de fin"
F = FreeFile Open "E:TonFichier.xml" For Output As #F Print #F, CahineDebut Print #F, CurrentDb.QueryDefs("TaRequête").SQL Print #F, ChaineFin Close #F End Sub
Merci Anor, mais ce message n'est pas celui que je voulais envoyé, bizarrement l'autre n'a pas voulu partir et je n'ai pas fais de copier coller, j'ai juste refais "vite fait"... et j'ai oublié le principal.
En fait c'est le SQL que je voudrais transformer en XML, pas le résultat. Ouais, je sais, je suis tordu, mais ça c'est pas un scoop ;-)))))))))
J'ai un programme (très) spécifique qui sait importer du XML (ressemblant à du SQL) pour faire une requête dans une base particulière. Je voudrais juste ne pas me taper le XML à la main (et éviter si possible le VBA) car ce n'est rien de plus qu'une requête SQL entourée par ci par là de balises XML...
Je posterais un exemple de ce que je voudrais récupérer, ça sera sûrement plus clair. En attendant, merci pour ta réponse.
-- JièL / Jean-Louis GOUBERT http://forums.offices.free.fr/ là bas mieux qu'en face ;-)
JièL
Bonjoir(c) Anor
Salut JièL
ok on attend l'exemple, a ne devrait pas être bien difficile :
ben eeeeuuuuuhhhhh pas très simple en fin de compte... voila ce que ça devrait donner -------------------------------- <?xml version="1.0" encoding="utf-8"?> <managementsuite core="ordi" exported-utc="11/07/2006 06:37:41"> <query> <name value="MaRequête" /> <where value=""Ordinateur"."Parc"."0 Num parc" Not Exists" /> <field value=""Ordinateur"."Nom d'affichage"" header="Nom du périphérique" /> <field value=""Ordinateur"."Type"" header="Type" /> <field value=""Ordinateur"."SE"."Nom"" header="Nom du S.E." /> <sort value=""Ordinateur"."Nom d'affichage"" /> </query> </managementsuite> --------------------------------
MsgBox CurrentDb.QueryDefs("TaRequête").SQL
Va falloir que j'analyse ce qui est retourné finalement
Merci pour le coup de main, je crois bien que je vais devoir me taper du VBA... bon, tant pis ;-)
-- JièL / Jean-Louis GOUBERT les nouveaux forums offices sont la http://forums.offices.free.fr/ Là bas mieux qu'en face
Bonjoir(c) Anor
Salut JièL
ok on attend l'exemple, a ne devrait pas être bien difficile :
ben eeeeuuuuuhhhhh pas très simple en fin de compte...
voila ce que ça devrait donner
--------------------------------
<?xml version="1.0" encoding="utf-8"?>
<managementsuite core="ordi" exported-utc="11/07/2006 06:37:41">
<query>
<name value="MaRequête" />
<where value=""Ordinateur"."Parc"."0 Num
parc" Not Exists" />
<field value=""Ordinateur"."Nom d'affichage""
header="Nom du périphérique" />
<field value=""Ordinateur"."Type"" header="Type" />
<field
value=""Ordinateur"."SE"."Nom""
header="Nom du S.E." />
<sort value=""Ordinateur"."Nom d'affichage"" />
</query>
</managementsuite>
--------------------------------
MsgBox CurrentDb.QueryDefs("TaRequête").SQL
Va falloir que j'analyse ce qui est retourné finalement
Merci pour le coup de main, je crois bien que je vais devoir me taper du
VBA... bon, tant pis ;-)
--
JièL / Jean-Louis GOUBERT
les nouveaux forums offices sont la
http://forums.offices.free.fr/
Là bas mieux qu'en face
ok on attend l'exemple, a ne devrait pas être bien difficile :
ben eeeeuuuuuhhhhh pas très simple en fin de compte... voila ce que ça devrait donner -------------------------------- <?xml version="1.0" encoding="utf-8"?> <managementsuite core="ordi" exported-utc="11/07/2006 06:37:41"> <query> <name value="MaRequête" /> <where value=""Ordinateur"."Parc"."0 Num parc" Not Exists" /> <field value=""Ordinateur"."Nom d'affichage"" header="Nom du périphérique" /> <field value=""Ordinateur"."Type"" header="Type" /> <field value=""Ordinateur"."SE"."Nom"" header="Nom du S.E." /> <sort value=""Ordinateur"."Nom d'affichage"" /> </query> </managementsuite> --------------------------------
MsgBox CurrentDb.QueryDefs("TaRequête").SQL
Va falloir que j'analyse ce qui est retourné finalement
Merci pour le coup de main, je crois bien que je vais devoir me taper du VBA... bon, tant pis ;-)
-- JièL / Jean-Louis GOUBERT les nouveaux forums offices sont la http://forums.offices.free.fr/ Là bas mieux qu'en face
