Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
931 connectés 

  FORUM HardWare.fr
  Programmation
  C#/.NET managed

  [VB.NET] Créer un fichier XML

 
 


 Mot :   Pseudo :  
 
 Page :   1  2
Page Suivante
Page Précédente
Bas de page 
Auteur Sujet :

[VB.NET] Créer un fichier XML

n°1039112
flaeticia
.:: Night Girl ::.
Posté le 07-04-2005 à 16:49:58  profilanswer
 

Bonjour
 
Je souhaiterai créer un fichier xml à partir de données contenues dans des textbox
Je ne sais pas du tout comment m'y prendre :s
Est ce que quelqu'un pourrait m'aider ??? :D
 
Merci

mood
Publicité
Posté le 07-04-2005 à 16:49:58  profilanswer
 

n°1039120
FlorentG
Unité de Masse
Posté le 07-04-2005 à 16:53:30  profilanswer
 

[:msdn] Y'a tout expliqué ;)


Message édité par FlorentG le 07-04-2005 à 16:53:38
n°1039135
flaeticia
.:: Night Girl ::.
Posté le 07-04-2005 à 17:02:54  profilanswer
 

FlorentG a écrit :

[:msdn] Y'a tout expliqué ;)


 
ben j'ai cherché mais j'ai pas trouvé !  
Je trouve bien la création d'un fichier comme ca mais ce n'est pas ça du tout que je veux faire :s
 
merci

n°1039422
FlorentG
Unité de Masse
Posté le 07-04-2005 à 21:55:48  profilanswer
 

Sache que si t'arrive pas à trouver dans la MSDN, t'es mal barré :D Sinon voici le lien utile : http://msdn.microsoft.com/library/ [...] sTopic.asp
 
Y'a une belle méthode 'Save' :)

n°1043829
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 10:34:44  profilanswer
 

FlorentG a écrit :

Sache que si t'arrive pas à trouver dans la MSDN, t'es mal barré :D Sinon voici le lien utile : http://msdn.microsoft.com/library/ [...] sTopic.asp
 
Y'a une belle méthode 'Save' :)


 
Merci tu es gentil

n°1043838
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 10:38:24  profilanswer
 

Maintenant j'ai un autre problème !
 
Je souhaiterai obtenir ce fichier xml (c'est un exemple)
 

Code :
  1. <?xml version="1.0"?>
  2. <book genre="novel" ISBN="1-861001-57-5">
  3.   <title>Pride And Prejudice</title>
  4.   <base>
  5.     <price>19.95</price>
  6.     <titre>appolon</titre>
  7.   </base>
  8.   <base>
  9.     <price>15</price>
  10.     <titre>application</titre>
  11.   </base>
  12. </book>


 
Le problème qui se pose c'est que j'obtient celui ci  

Code :
  1. <?xml version="1.0"?>
  2. <book genre="novel" ISBN="1-861001-57-5">
  3.   <title>Pride And Prejudice</title>
  4.   <base>
  5.     <price>15</price>
  6.     <titre>application</titre>
  7.   </base>
  8. </book>


 
Pour créer ce fichier xml jutilise cette procédure :  
 

Code :
  1. Public Sub esssai_xml()
  2.         Dim doc As New XmlDocument
  3.         doc.LoadXml("<book genre='novel' ISBN='1-861001-57-5'>" & _
  4.                     "<title>Pride And Prejudice</title>" & _
  5.                     "</book>" )
  7.         Dim root As XmlNode = doc.DocumentElement
  9.         'Create a new node.
  10.         Dim base As XmlElement = doc.CreateElement("base" )
  11.         Dim elem As XmlElement = doc.CreateElement("price" )
  12.         Dim elem2 As XmlElement = doc.CreateElement("titre" )
  14.         Dim objXmlNode As System.Xml.XmlNode
  15.         Dim objXmlNodeNew As System.Xml.XmlNode
  17.         elem.InnerText = "19.95"
  18.         elem2.InnerText = "appolon"
  19.         'Add the node to the document.
  20.         base.AppendChild(elem)
  21.         base.AppendChild(elem2)
  23.         'root.AppendChild(base) -> Avec cette ligne ou sans cette ligne, le résultat est le même
  25.         'objXmlNode.AppendChild(objXmlNodeNew) Celle ci n'a pas lieu d'être
  28.         elem.InnerText = "15"
  29.         elem2.InnerText = "application"
  30.         'Add the node to the document.
  31.         base.AppendChild(elem)
  32.         base.AppendChild(elem2)
  34.         root.AppendChild(base)
  36.         Dim writer As XmlTextWriter = New XmlTextWriter("essai_xml.xml", Nothing)
  37.         writer.Formatting = Formatting.Indented
  38.         doc.Save(writer)
  39.     End Sub


 
Il y a quelque chose que je ne fais pas correctement, forcément, mais comment puis arriver à un fichier comme cité plus haut (le premier fichier) ?
 
 
Merci d'avance :)


Message édité par flaeticia le 12-04-2005 à 10:46:34
n°1043845
FlorentG
Unité de Masse
Posté le 12-04-2005 à 10:41:36  profilanswer
 

Y'a une ligne en commentaire (la 23)

n°1043854
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 10:47:12  profilanswer
 

FlorentG a écrit :

Y'a une ligne en commentaire (la 23)


 
Le résultat est le meme que cette ligne soit présente ou absente :D

n°1043859
FlorentG
Unité de Masse
Posté le 12-04-2005 à 10:48:24  profilanswer
 

Faut peut-être recréer les objets après une première insertion ?

n°1043874
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 10:53:23  profilanswer
 

FlorentG a écrit :

Faut peut-être recréer les objets après une première insertion ?


 
 :sarcastic:  
 
C'est à dire ?
 

mood
Publicité
Posté le 12-04-2005 à 10:53:23  profilanswer
 

n°1043876
FlorentG
Unité de Masse
Posté le 12-04-2005 à 10:53:51  profilanswer
 

:??:
 
Bah refaire ' base = doc.CreateElement("base" )'


Message édité par FlorentG le 12-04-2005 à 10:53:59
n°1043903
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 11:10:04  profilanswer
 

FlorentG a écrit :

:??:
 
Bah refaire ' base = doc.CreateElement("base" )'


 
C'était bien ça !
tu es un dieu tu es trop fort ! :D
 
Sinon voici le code correct :  
 

Code :
  1. Public Sub esssai_xml()
  2.         Dim doc As New XmlDocument
  3.         doc.LoadXml("<book genre='novel' ISBN='1-861001-57-5'>" & _
  4.                     "<title>Pride And Prejudice</title>" & _
  5.                     "</book>" )
  7.         Dim root As XmlNode = doc.DocumentElement
  9.         'Create a new node.
  10.         Dim base As XmlElement = doc.CreateElement("base" )
  11.         Dim elem As XmlElement = doc.CreateElement("price" )
  12.         Dim elem2 As XmlElement = doc.CreateElement("titre" )
  15.         elem.InnerText = "19.95"
  16.         elem2.InnerText = "appolon"
  17.         'Add the node to the document.
  18.         base.AppendChild(elem)
  19.         base.AppendChild(elem2)
  21. base = doc.CreateElement("base" )
  22. elem = doc.CreateElement("price" )
  23. elem2 = doc.CreateElement("titre" )
  25.         elem.InnerText = "15"
  26.         elem2.InnerText = "application"
  27.         'Add the node to the document.
  28.         base.AppendChild(elem)
  29.         base.AppendChild(elem2)
  31.         root.AppendChild(base)
  33.         Dim writer As XmlTextWriter = New XmlTextWriter("essai_xml.xml", Nothing)
  34.         writer.Formatting = Formatting.Indented
  35.         doc.Save(writer)
  36.     End Sub


Message édité par flaeticia le 12-04-2005 à 11:12:12
n°1043910
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 11:12:40  profilanswer
 

Merci encore ! :D

n°1043911
FlorentG
Unité de Masse
Posté le 12-04-2005 à 11:12:44  profilanswer
 

Je ne suis pas un dieu ;) Juste un développeur :D

n°1043912
flaeticia
.:: Night Girl ::.
Posté le 12-04-2005 à 11:13:39  profilanswer
 

FlorentG a écrit :

Je ne suis pas un dieu ;) Juste un développeur :D


 
Et moi je ne suis pas une développeuse, confirmée on vas dire :D

n°1044067
Harkonnen
Modérateur
Un modo pour les bannir tous
Posté le 12-04-2005 à 12:50:01  profilanswer
 

y'a florangé qui s'est trouvé une copine [:pingouino]


---------------
J'ai un string dans l'array (Paris Hilton)
n°1044113
FlorentG
Unité de Masse
Posté le 12-04-2005 à 13:24:15  profilanswer
 

J'en ai déjà une :o

n°1045414
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 10:12:43  profilanswer
 

Bonjour !
 
c'est encore moi ! et j'ai un problème :D logique me direz vous  :hello:  
 
J'ai une procédure :  
 

Code :
  1. Public Sub cree_xml(ByVal p_frmParent As Form1, ByVal numero_salle As String, ByVal titre_film As String, ByVal duree As String, ByVal NombreCopieFR As String, ByVal Restrictions As String)
  2.         ' Dim Txtbox_titre_film = p_frmParent.txt_titre_film.Text
  4.         Try
  6.             Dim cls_laet As New cls_laeticia
  8.             ' creation du document xml
  9.             Dim doc As XmlDocument = New XmlDocument
  10.             doc.LoadXml("<cinema></cinema>" )
  11.             doc.Load("document_xml.xml" )
  13.             'Dim root As XmlNode = doc.LastChild
  18.             ' Add a price element.
  19.             Dim flm As XmlElement = doc.CreateElement("film" )
  20.             Dim numSalle As XmlElement = doc.CreateElement("num_salle" )
  21.             Dim Nom_film As XmlElement = doc.CreateElement("nom_film" )
  22.             Dim duree_film As XmlElement = doc.CreateElement("duree_film" )
  23.             Dim nbr_copies_France As XmlElement = doc.CreateElement("nb_copies_france" )
  24.             Dim restrics As XmlElement = doc.CreateElement("restrictions" )
  27.             If p_frmParent.lbl_num_salle.Text = 1 Then
  28.                 flm.RemoveAll()
  31.                 'doc.DocumentElement.AppendChild(flm)
  33.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  34.                 numSalle.InnerText = numero_salle
  36.                 Nom_film.InnerText = titre_film
  38.                 duree_film.InnerText = duree
  40.                 nbr_copies_France.InnerText = NombreCopieFR
  42.                 restrics.InnerText = Restrictions
  43.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  46.                 flm.AppendChild(numSalle)
  47.                 flm.AppendChild(Nom_film)
  48.                 flm.AppendChild(duree_film)
  49.                 flm.AppendChild(nbr_copies_France)
  50.                 flm.AppendChild(restrics)
  52.                 doc.DocumentElement.AppendChild(flm)
  54.                 '--------------------------------------
  55.                 Dim writer As XmlTextWriter = New XmlTextWriter("document_xml.xml", Nothing)
  56.                 writer.Formatting = Formatting.Indented
  57.                 doc.Save(writer)
  58.             Else
  60.                 doc.Load("document_xml.xml" )
  62.                 flm = doc.CreateElement("film" )
  63.                 numSalle = doc.CreateElement("num_salle" )
  64.                 Nom_film = doc.CreateElement("nom_film" )
  65.                 duree_film = doc.CreateElement("duree_film" )
  66.                 nbr_copies_France = doc.CreateElement("nb_copies_france" )
  67.                 restrics = doc.CreateElement("restrictions" )
  69.                 'doc.DocumentElement.AppendChild(flm)
  71.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  72.                 numSalle.InnerText = numero_salle
  74.                 Nom_film.InnerText = titre_film
  76.                 duree_film.InnerText = duree
  78.                 nbr_copies_France.InnerText = NombreCopieFR
  80.                 restrics.InnerText = Restrictions
  81.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  83.                 flm.AppendChild(numSalle)
  84.                 flm.AppendChild(Nom_film)
  85.                 flm.AppendChild(duree_film)
  86.                 flm.AppendChild(nbr_copies_France)
  87.                 flm.AppendChild(restrics)
  89.                 doc.DocumentElement.AppendChild(flm)
  90.                 '---------------------------------------
  93.                 ' Save the document to a file and auto-indent the output. 
  94.                 Dim writer As XmlTextWriter = New XmlTextWriter("document_xml.xml", Nothing)
  95.                 writer.Formatting = Formatting.Indented
  96.                 doc.Save(writer)
  98.             End If
  100.         Catch ex As Exception
  101.             MsgBox(ex.Message)
  103.         End Try
  104.     End Sub


 
 
J'explique un peu l'appli
 
Jai des textboxs que je remplie.
Je veux que le contenu des ces textboxs soit inséré dans mon fichier xml, mais pas de n'importe quelle façon !
 
Ceci étant, il jai un problème :  
 
certaines fois, lorsque je lance cette procédure, une msgbox arrive en me précisant que le fichier est en train detre utilisé par un autre processus :  :fou:  
Ca ça m'énerve plus qu'autre chose !
 
puis le second problème, c'est que je souhaiterai, que les noeuds de mon fichiers soit effacés au début, mais visiblement je n'utilise pas la bonne méthode  :??:  
 
Pourriez vous m'aider ?
 
Si vous avez pas compris, faut me dire !

n°1045419
FlorentG
Unité de Masse
Posté le 13-04-2005 à 10:16:32  profilanswer
 

Hmmmmmmmmmm miammmm les noms de variables avec des underscore dedans :miam: Hmmmmmmmmmm miammmm les variables du formulaire publiques :miam:
 
 
 
:D

n°1045436
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 10:37:45  profilanswer
 

FlorentG a écrit :

Hmmmmmmmmmm miammmm les noms de variables avec des underscore dedans :miam: Hmmmmmmmmmm miammmm les variables du formulaire publiques :miam:
 
 
 
:D


 :non:  :bounce:  :bounce:  :bounce:  
 
un peu plus explicite ????

n°1045441
FlorentG
Unité de Masse
Posté le 13-04-2005 à 10:40:57  profilanswer
 

Nan, c'était juste pour dire qu'en .NET, par convention, on ne met jamais de variables ou de nom de fonctions avec des underscore. Seules exceptions les méthodes évenementielles, et les membres privés qui ont une propriété à leur nom

n°1045442
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 10:44:20  profilanswer
 

FlorentG a écrit :

Nan, c'était juste pour dire qu'en .NET, par convention, on ne met jamais de variables ou de nom de fonctions avec des underscore. Seules exceptions les méthodes évenementielles, et les membres privés qui ont une propriété à leur nom


 
ah
 
pourquoi ? ça change quelque chose ?

n°1045453
FlorentG
Unité de Masse
Posté le 13-04-2005 à 10:49:12  profilanswer
 

C'est par convention [:spamafote] Si chacun y va de sa méthode ne nommage, on s'y retrouve pas. Ce qui est mon cas avec tous ces underscores, j'ai l'impression de voir du PHP :D

n°1045458
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 10:52:20  profilanswer
 

FlorentG a écrit :

C'est par convention [:spamafote] Si chacun y va de sa méthode ne nommage, on s'y retrouve pas. Ce qui est mon cas avec tous ces underscores, j'ai l'impression de voir du PHP :D


 
ok  
mais  je vais pas tout reprendre  :non:  
 
est ce que pour ma question, tu vois ?  

n°1045460
FlorentG
Unité de Masse
Posté le 13-04-2005 à 10:53:24  profilanswer
 

Tu utilise quoi pour tout virer ?

n°1045488
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 11:02:58  profilanswer
 

lignes 27/28

n°1045494
FlorentG
Unité de Masse
Posté le 13-04-2005 à 11:04:53  profilanswer
 

'If p_frmParent.lbl_num_salle.Text = 1 Then'
 
C'est quoi cette ligne :heink:

n°1045581
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 11:34:48  profilanswer
 

FlorentG a écrit :

'If p_frmParent.lbl_num_salle.Text = 1 Then'
 
C'est quoi cette ligne :heink:


 
si le numero de la salle c'est 1, alors  
écrit le premier noeud et cie ...
sinon
 
rajoute ces noeuds  
 
comme l'écriture d'un premier noeud est différente d'un rajout :)

n°1045586
FlorentG
Unité de Masse
Posté le 13-04-2005 à 11:37:25  profilanswer
 

Mais la propriété Text renvoi un String, que tu compares à un Integer :heink:

If p_frmParent.lbl_num_salle.Text = "1" Then


Ce sera mieux ;)
 
En paramétrant Option Explicit dans ton projet, tu évitera ce genre d'erreurs

n°1045689
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 12:34:04  profilanswer
 

FlorentG a écrit :

Mais la propriété Text renvoi un String, que tu compares à un Integer :heink:

If p_frmParent.lbl_num_salle.Text = "1" Then


Ce sera mieux ;)
 
En paramétrant Option Explicit dans ton projet, tu évitera ce genre d'erreurs


 
ok  :hello:  
 
ceci étant, est ce que ça peut influer de quelque façon que ce soit ? Parce que lorsque je debuggue ligne par ligne, il passe bien à l'else  :??:

n°1045761
FlorentG
Unité de Masse
Posté le 13-04-2005 à 13:43:29  profilanswer
 

Mais il devrait passer au bloc Else, ou non ?

n°1045842
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 14:29:01  profilanswer
 

FlorentG a écrit :

Mais il devrait passer au bloc Else, ou non ?


 
ben oui  
 
je reprend : peut etre que c'est un problème de ma part
 
si le numéro de salle est 1 alors  
il prend le contenu des textbox et le met dans le fichier xml, de telle sorte à créer un premier noeud film  :  
<film>
dffodfoifhf
</film>
 
voilà
 
sinon,  
 
c la mm opération sauf que l'on considère que l'on est déja passé par la salle 1, et que le noeud film de base, est déja déclaré  ! alors, on plus qu'à faire comme hier  : une sorte de réalocation (appele ca comme tu veux :)) flm = doc.createdocument("film" )....
voilà
 
 :hello:

n°1046279
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 17:29:32  profilanswer
 

Pas d'idée Flo ? :pt1cable:

n°1046369
Harkonnen
Modérateur
Un modo pour les bannir tous
Posté le 13-04-2005 à 17:57:05  profilanswer
 

va voir sur le topic blabla@programmation, il y traine régulièrement, tu pourras lui reposer ta question là bas :o


---------------
J'ai un string dans l'array (Paris Hilton)
n°1046387
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 18:11:56  profilanswer
 

Harkonnen a écrit :

va voir sur le topic blabla@programmation, il y traine régulièrement, tu pourras lui reposer ta question là bas :o


 
moué !  :sarcastic:  
 
Il va venir, je le sens huhu :lol:

n°1046388
Harkonnen
Modérateur
Un modo pour les bannir tous
Posté le 13-04-2005 à 18:13:19  profilanswer
 

bah va poster là bas, ils vont pas te bouffer :spamafote:


---------------
J'ai un string dans l'array (Paris Hilton)
n°1046416
flaeticia
.:: Night Girl ::.
Posté le 13-04-2005 à 18:52:12  profilanswer
 

Harkonnen a écrit :

bah va poster là bas, ils vont pas te bouffer :spamafote:


 
je comprend pas : poster quoi ?  :heink:

n°1046784
FlorentG
Unité de Masse
Posté le 13-04-2005 à 23:36:33  profilanswer
 

C'est quoi qui ne marche pas encore, de nouveau ? :D

n°1049484
flaeticia
.:: Night Girl ::.
Posté le 16-04-2005 à 10:53:04  profilanswer
 

FlorentG a écrit :

C'est quoi qui ne marche pas encore, de nouveau ? :D


 
certaines fois, lorsque je lance cette procédure, une msgbox arrive en me précisant que le fichier est en train detre utilisé par un autre processus :    
Ca ça m'énerve plus qu'autre chose !  
 
puis le second problème, c'est que je souhaiterai, que les noeuds de mon fichiers soit effacés au début, mais visiblement je n'utilise pas la bonne méthode     :??:  
 

n°1054986
flaeticia
.:: Night Girl ::.
Posté le 21-04-2005 à 11:38:40  profilanswer
 

pas d'idée florent G ? :(

mood
Publicité
Posté le   profilanswer
 

 Page :   1  2
Page Suivante
Page Précédente
Haut de page 

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  C#/.NET managed

  [VB.NET] Créer un fichier XML

 

Sujets relatifs
[résolu][wxWidgets]Sauvegarde dans un fichier...Créer un controle activeX
VB.NET : Appel d'un tableau d'un autre formulaire[ VB.net ] besoin d'aide pour créer une dll
enregistrer un fichier temporaire à partir d'une servletapplication VB.NET
[ASP] Création de fichier RTF avec ASPProbleme creation de fichier excel a partir de php
créer une page automatiqueExporter un état Acess dans un fichier excel
Plus de sujets relatifs à : [VB.NET] Créer un fichier XML

Forum MesDiscussions.Net, Version 2010.2
(c) 2000-2011 Doctissimo
Page générée en 0.163 secondes

Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR