Discussion :

[Ya7yaKech]

Salut

j'ai deux fichier XMl f1 et f2 qui ont par exemple la structure suivante :

f1 :

Code xml :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
<rocords>
</rocord>
 
<rocord_name>text</rocord_name>
<rocord_id>1</rocord_id>
 
</rocord>
</rocords>

f2 :

Code xml :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
<enregistrements>
</enregistrement>
 
<enre_numero></enre_numero>
<enre_nom></enre_nom>
 
</enregistrement>
</enregistrements>

je veux stocker les informations qui sont dans f1 dans f2 pour obtenir a la fin

f2 :

Code xml :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
<enregistrements>
</enregistrement>
 
<enre_numero>1</enre_numero>
<enre_nom>text</enre_nom>
 
</enregistrement>
</enregistrements>

pour cela j'ai fais une base de données sql et j'ai cree une table pour lier chaque champ avec son correspondant :
EX. :
enre_numero = rocord_id
au niveau du vb.net j'ai pu recuperer chque champ et son correspondant .
mais le probleme comment avoir en sortie le fichier xml f2 ?

Merci

[Ya7yaKech]

on m'a proposé ceci:
creer 2 DataSet et charger les 2 fichiers XML. Apres partourir la 1ere DataSet Row par Row et les inserer dans la 2eme DataSet. A la fin serialiser la 2eme DataSet dans le meme fichier XML

mais je suis pas trop doué pour ce qui est manipulation xml par vb alors c'est toujours flou pour moi
en plus c'est quoi la serialisation ?

quelqu'un peut il me faire comprendre comment on s'y prend ?

Merci d'avance

[tomlev]

en plus c'est quoi la serialisation ?

http://dico.developpez.com/html/3030...ialisation.php

Le plus simple à mon avis serait de passer par une transformation XSL

[Ya7yaKech]

autrement dit !!

[tomlev]

autrement dit !!

Euh... autrement dit quoi ? C'est une question ?

[Ya7yaKech]

bon je suis coincé la vraiment je voix pas comment m'y prendre pour regler mon prb.
bon qu'est ce que vous en penser de mettre mon f1 dans une dataset et le manipuler apres avoir en sortie f2 (c'est ce qu'on ma proposé)

mais au niveau de la manipulation je sais pas trop quoi faire !!

est ce que vous pouvez m'aider a y voire claire

Merci

[tomlev]

bon qu'est ce que vous en penser de mettre mon f1 dans une dataset et le manipuler apres avoir en sortie f2 (c'est ce qu'on ma proposé)

Ca me parait foireux comme méthode... ton fichier XML n'a pas le schema d'un DataSet, tu ne peux donc pas le charger directement dans un DataSet.

La transformation XSL me semble être le meilleur moyen. C'est un système qui permet de transformer la structure d'un fichier XML en n'importe quoi d'autre (par exemple HTML, texte, ou dans ton cas, du XML avec une structure différente)

[Ya7yaKech]

pouvez vous me donner un exemple ?car j'ai jamais fais cela avant.
Merci

[tomlev]

tu définis la transformation dans un fichier transform.xsl :

Code XML :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
<?xml version="1.0" encoding="ISO-8859-1"?>
 
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
 
    <xsl:template match="/">
      <enregistrements>
        <xsl:for-each select="rocords/rocord">
          <enregistrement>
            <enre_numero><xsl:value-of select="rocord_id"/></enre_numero>
            <enre_nom><xsl:value-of select="rocord_name"/></enre_nom>
          </enregistrement>
        </xsl:for-each>
      </enregistrements>
    </xsl:template>
 
</xsl:stylesheet>

Et tu l'appliques à ton fichier d'entrée comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Dim inputFile As String = "D:\tmp\rocords.xml"
Dim outputFile As String = "D:\tmp\enregistrements.xml"
Dim xsltFile As String = "D:\tmp\transform.xsl"
 
Dim xslt As New XslCompiledTransform()
xslt.Load(xsltFile)
xslt.Transform(inputFile, outputFile)

EDIT: avec ce code ça n'indente pas les éléments, ça met tout sur une ligne... Pour avoir un formatage plus "propre" il faut passer par un XmlWriter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Dim inputFile As String = "D:\tmp\rocords.xml"
Dim outputFile As String = "D:\tmp\enregistrements.xml"
Dim xsltFile As String = "D:\tmp\transform.xsl"
Dim xslt As New XslCompiledTransform()
Dim settings As New XmlWriterSettings()
settings.Indent = True
Dim wr As New XmlWriter(outputFile, settings)
xslt.Load(xsltFile)
xslt.Transform(inputFile, wr)
wr.Close()

[Ya7yaKech]

Dim wr As New XmlWriter(outputFile, settings)


il montre une erreur au niveau de XmlWriter
il me demande de supprimer new et quand je le fais il ya autre erreures qui apparaisse

[Ya7yaKech]

A quoi sert le deuxieme code ?Merci

[tomlev]

Dim wr As New XmlWriter(outputFile, settings)


il montre une erreur au niveau de XmlWriter
il me demande de supprimer new et quand je le fais il ya autre erreures qui apparaisse

Ah oui c'est vrai, il n'y a pas de constructeur public... en fait il faut faire comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim wr As XmlWriter = XmlWriter.Create(outputFile, settings)

A quoi sert le deuxieme code ?Merci

C'est juste pour le formatage, parce que le 1er code écrit tout le fichier sur une seule ligne. Fonctionnellement ça ne change rien, c'est juste que ça génère un fichier plus facile à lire pour un humain

[Ya7yaKech]

BON CA MARCHE
MAIS CA NE CHANGE RIEN MEME SI JE N'UTILISE PAS LE CODE N° 2 IL M'AFFICHE LES FICHIER LISIBLE (SAUF SI JE NE SUIS PAS UNETRE HUMAIN ) LOL

MERCI BEAUCOUP

[tomlev]

MAIS CA NE CHANGE RIEN MEME SI JE N'UTILISE PAS LE CODE N° 2 IL M'AFFICHE LES FICHIER LISIBLE

Ah bon ? Il écrit pas tout sur la même ligne ? Bizarre, chez moi ça fait ça...

N'oublie pas de marquer le sujet comme stp

[Ya7yaKech]

oui ca marche nikel
merci

[Ya7yaKech]

Salut ;

http://www.developpez.net/forums/d67...-fichiers-xml/

sur cette discussion vous m'avez aider a faire une correspondance entre deux fichiers xml

en donnant f1 en entré et f2 en sortie.(f1 et f2 sont de vrai fichiers XML)
bon est ce que c'est possible d'avoir le contenu de f2 dans une variable string sans meme creer f2?

Merci

[tomlev]

bon est ce que c'est possible d'avoir le contenu de f2 dans une variable string sans meme creer f2?

Oui, il faut utiliser un StringWriter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Dim inputFile As String = "D:\tmp\rocords.xml"
'Dim outputFile As String = "D:\tmp\enregistrements.xml"
Dim xsltFile As String = "D:\tmp\transform.xsl"
Dim xslt As New XslCompiledTransform()
Dim settings As New XmlWriterSettings()
settings.Indent = True
Dim swr As New StringWriter()
Dim wr As XmlWriter = XmlWriter.Create(swr, settings)
xslt.Load(xsltFile)
xslt.Transform(inputFile, wr)
Dim resultat As String = swr.ToString()
wr.Close()

[Ya7yaKech]

alors dans ce cas "swr" jouera le rôle de mon fichier f2
mais avant que je change tout mon code
je veux savoir si c'est possible de faire des manipulations sur swr autrement dit :
parcourir , modifier , repérer les élément (la racine du XML, les éléments...) ,....

Merci

[tomlev]

je veux savoir si c'est possible de faire des manipulations sur swr autrement dit :
parcourir , modifier , repérer les élément (la racine du XML, les éléments...)

Pas directement, non
Par contre tu peux charger le contenu de swr dans un XmlDocument, et manipuler le XmlDocument

[Ya7yaKech]

oui j'ai voulu le faire mais ca marche pas

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
        Dim Xmldoc As New XmlDocument
        Xmldoc.Load(swr)

Merci