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

  FORUM HardWare.fr
  Programmation
  C#/.NET managed

  [VB.NET] Créer un fichier XML

 



 Mot :   Pseudo :  
 
 Page :   1  2
Page Précédente
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

---------------
last.fmflickr
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' :)


---------------
last.fmflickr
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>" )
  6.         Dim root As XmlNode = doc.DocumentElement
  7.         'Create a new node.
  8.         Dim base As XmlElement = doc.CreateElement("base" )
  9.         Dim elem As XmlElement = doc.CreateElement("price" )
  10.         Dim elem2 As XmlElement = doc.CreateElement("titre" )
  11.         Dim objXmlNode As System.Xml.XmlNode
  12.         Dim objXmlNodeNew As System.Xml.XmlNode
  13.         elem.InnerText = "19.95"
  14.         elem2.InnerText = "appolon"
  15.         'Add the node to the document.
  16.         base.AppendChild(elem)
  17.         base.AppendChild(elem2)
  18.         'root.AppendChild(base) -> Avec cette ligne ou sans cette ligne, le résultat est le même
  19.         'objXmlNode.AppendChild(objXmlNodeNew) Celle ci n'a pas lieu d'être
  20.         elem.InnerText = "15"
  21.         elem2.InnerText = "application"
  22.         'Add the node to the document.
  23.         base.AppendChild(elem)
  24.         base.AppendChild(elem2)
  25.         root.AppendChild(base)
  26.         Dim writer As XmlTextWriter = New XmlTextWriter("essai_xml.xml", Nothing)
  27.         writer.Formatting = Formatting.Indented
  28.         doc.Save(writer)
  29.     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)


---------------
last.fmflickr
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 ?


---------------
last.fmflickr
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

---------------
last.fmflickr
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>" )
  6.         Dim root As XmlNode = doc.DocumentElement
  7.         'Create a new node.
  8.         Dim base As XmlElement = doc.CreateElement("base" )
  9.         Dim elem As XmlElement = doc.CreateElement("price" )
  10.         Dim elem2 As XmlElement = doc.CreateElement("titre" )
  11.         elem.InnerText = "19.95"
  12.         elem2.InnerText = "appolon"
  13.         'Add the node to the document.
  14.         base.AppendChild(elem)
  15.         base.AppendChild(elem2)
  16. base = doc.CreateElement("base" )
  17. elem = doc.CreateElement("price" )
  18. elem2 = doc.CreateElement("titre" )
  19.         elem.InnerText = "15"
  20.         elem2.InnerText = "application"
  21.         'Add the node to the document.
  22.         base.AppendChild(elem)
  23.         base.AppendChild(elem2)
  24.         root.AppendChild(base)
  25.         Dim writer As XmlTextWriter = New XmlTextWriter("essai_xml.xml", Nothing)
  26.         writer.Formatting = Formatting.Indented
  27.         doc.Save(writer)
  28.     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


---------------
last.fmflickr
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


---------------
last.fmflickr
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
  3.         Try
  4.             Dim cls_laet As New cls_laeticia
  5.             ' creation du document xml
  6.             Dim doc As XmlDocument = New XmlDocument
  7.             doc.LoadXml("<cinema></cinema>" )
  8.             doc.Load("document_xml.xml" )
  9.             'Dim root As XmlNode = doc.LastChild
  10.             ' Add a price element.
  11.             Dim flm As XmlElement = doc.CreateElement("film" )
  12.             Dim numSalle As XmlElement = doc.CreateElement("num_salle" )
  13.             Dim Nom_film As XmlElement = doc.CreateElement("nom_film" )
  14.             Dim duree_film As XmlElement = doc.CreateElement("duree_film" )
  15.             Dim nbr_copies_France As XmlElement = doc.CreateElement("nb_copies_france" )
  16.             Dim restrics As XmlElement = doc.CreateElement("restrictions" )
  17.             If p_frmParent.lbl_num_salle.Text = 1 Then
  18.                 flm.RemoveAll()
  19.                 'doc.DocumentElement.AppendChild(flm)
  20.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  21.                 numSalle.InnerText = numero_salle
  22.                 Nom_film.InnerText = titre_film
  23.                 duree_film.InnerText = duree
  24.                 nbr_copies_France.InnerText = NombreCopieFR
  25.                 restrics.InnerText = Restrictions
  26.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  27.                 flm.AppendChild(numSalle)
  28.                 flm.AppendChild(Nom_film)
  29.                 flm.AppendChild(duree_film)
  30.                 flm.AppendChild(nbr_copies_France)
  31.                 flm.AppendChild(restrics)
  32.                 doc.DocumentElement.AppendChild(flm)
  33.                 '--------------------------------------
  34.                 Dim writer As XmlTextWriter = New XmlTextWriter("document_xml.xml", Nothing)
  35.                 writer.Formatting = Formatting.Indented
  36.                 doc.Save(writer)
  37.             Else
  38.                 doc.Load("document_xml.xml" )
  39.                 flm = doc.CreateElement("film" )
  40.                 numSalle = doc.CreateElement("num_salle" )
  41.                 Nom_film = doc.CreateElement("nom_film" )
  42.                 duree_film = doc.CreateElement("duree_film" )
  43.                 nbr_copies_France = doc.CreateElement("nb_copies_france" )
  44.                 restrics = doc.CreateElement("restrictions" )
  45.                 'doc.DocumentElement.AppendChild(flm)
  46.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  47.                 numSalle.InnerText = numero_salle
  48.                 Nom_film.InnerText = titre_film
  49.                 duree_film.InnerText = duree
  50.                 nbr_copies_France.InnerText = NombreCopieFR
  51.                 restrics.InnerText = Restrictions
  52.                 '////////////////////\\\\\\\\\\\\\\\\\\\\\
  53.                 flm.AppendChild(numSalle)
  54.                 flm.AppendChild(Nom_film)
  55.                 flm.AppendChild(duree_film)
  56.                 flm.AppendChild(nbr_copies_France)
  57.                 flm.AppendChild(restrics)
  58.                 doc.DocumentElement.AppendChild(flm)
  59.                 '---------------------------------------
  60.                 ' Save the document to a file and auto-indent the output. 
  61.                 Dim writer As XmlTextWriter = New XmlTextWriter("document_xml.xml", Nothing)
  62.                 writer.Formatting = Formatting.Indented
  63.                 doc.Save(writer)
  64.             End If
  65.         Catch ex As Exception
  66.             MsgBox(ex.Message)
  67.         End Try
  68.     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


---------------
last.fmflickr
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


---------------
last.fmflickr
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


---------------
last.fmflickr
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 ?


---------------
last.fmflickr
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:


---------------
last.fmflickr
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


---------------
last.fmflickr
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 ?


---------------
last.fmflickr
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


---------------
last.fmflickr
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 Précédente

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


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