Gérer le forum:  Aide  •  Rechercher  •  Liste des Membres  •  Groupes d'utilisateurs   •  S'enregistrer  •  Profil  •  Se connecter pour vérifier ses messages privés  •  Connexion 
 [VB] Application pour PTI Voir le sujet suivant
Voir le sujet précédent
Poster un nouveau sujetRépondre au sujet
Auteur Message
ChickenIG
Forumeur occasionnel
Forumeur occasionnel




Messages: 22

MessagePosté le: Sam 08 Mai 2010 - 14:40 Répondre en citantRevenir en haut

Salut tous le monde !

Je suis entrain de faire une application de gestion de PTI (original hein ^^) et je voudrais enregistrer mes données au format XML ! j'ai donc écris une fonction pour ça mais c'est la que ça coince !
Mon algo compte bien le nombre d'objet à enregistrer mais il m'enregistre 3 fois les mêmes données !

voila le code:

Citation:
Public Sub AddPti(ByVal unListView As ListView)
'création d'une nouvelle instance du membre xmldocument
Dim XmlDoc As XmlDocument = New XmlDocument()
'création du document
XmlDoc.LoadXml("<mesPti></mesPti>")

For i As Integer = 0 To unListView.Items.Count - 1


'a savoir :
Dim elemPti As XmlElement
Dim elemNom As XmlElement
Dim elemFiche As XmlElement
Dim elemAppli As XmlElement
Dim elemCompet As XmlElement

'creation de la balise <PTI></PTI>
elemPti = XmlDoc.CreateElement("PTI" + i.ToString())

elemNom = XmlDoc.CreateElement("NOM")
elemNom.InnerText = Nom
elemPti.AppendChild(elemNom)

elemFiche = XmlDoc.CreateElement("FICHE")
elemFiche.InnerText = Fiche
elemPti.AppendChild(elemFiche)

elemAppli = XmlDoc.CreateElement("APPLI")
elemAppli.InnerText = Appli
elemPti.AppendChild(elemAppli)

For cpt As Integer = 1 To ListCompetences.Count
elemCompet = XmlDoc.CreateElement("COMPET" + cpt.ToString())
elemCompet.InnerText = ListCompetences.Item(cpt).ToString()
elemPti.AppendChild(elemCompet)
Next

'on ajoute la balise parent au document
XmlDoc.DocumentElement.AppendChild(elemPti)

'Ecriture du Xml
XmlDoc.Save(Application.StartupPath & "\mesPTI.xml")
'MsgBox("Enregistrement réussi")
Next

End Sub


si quelqu'un voit où ça déconne il me sauve la vie ! Merci d'avance à ceux qui m'auront lu !
Voir le profil de l'utilisateurEnvoyer un message privé

N'oubliez pas de vous inscrire à la communauté pour participer. Si vous êtes déjà membre, connectez-vous pour faire disparaître ce bandeau publicitaire.
ficoba
Forumeur fréquent
Forumeur fréquent


Post-BTS
Sexe: Sexe:Masculin
Messages: 52
Localisation: Devant mon ordinateur

MessagePosté le: Lun 10 Mai 2010 - 21:21 Répondre en citantRevenir en haut

Je n'ai jamais eu l'occasion de générer du XML avec VB .NET pour le moment, mais "ListCompetences.Count" te renvoi bien le nombre que tu attends ?

Sinon niveau du débuggeur de Visual si tu mets un point d'arrêt au niveau de la boucle sa dit quoi ?

Sans la boucle il fait quoi dans ton fichier ?

Au pire envoye le l'algo de la partie graphique et j'essayerai de la regarder pour ce week-end au plus tard.

_________________
---
AixpérienceLAN Staff Ficoba

"Un jour, Chuck Norris a perdu son alliance.
Depuis c'est le bordel dans les terres du milieu..."
Voir le profil de l'utilisateurEnvoyer un message privéVisiter le site web du posteur
ChickenIG
Forumeur occasionnel
Forumeur occasionnel




Messages: 22

MessagePosté le: Lun 10 Mai 2010 - 22:15 Répondre en citantRevenir en haut

Merci de m'avoir répondu c'est cool ! J'ai trouvé la solution avec un pote ce week end ! je m'y prenais pas comme il faut enfaite ! la je révise mais dès que j'ai le temps je met le code que j'ai refais ! Me reste maintenant à récupérer les données de mon fichier XML pour les recharger dans l'appli !
Voir le profil de l'utilisateurEnvoyer un message privé
Montrer les messages depuis:      
Poster un nouveau sujetRépondre au sujet
 Sauter vers:   



Voir le sujet suivant
Voir le sujet précédent
Vous ne pouvez pas poster de nouveaux sujets dans ce forum
Vous ne pouvez pas répondre aux sujets dans ce forum
Vous ne pouvez pas éditer vos messages dans ce forum
Vous ne pouvez pas supprimer vos messages dans ce forum
Vous ne pouvez pas voter dans les sondages de ce forum