Ne0PHenIXXX
Messages postés2Date d'inscriptionmardi 28 novembre 2006StatutMembreDernière intervention 4 novembre 2007
-
3 nov. 2007 à 22:17
Ne0PHenIXXX
Messages postés2Date d'inscriptionmardi 28 novembre 2006StatutMembreDernière intervention 4 novembre 2007
-
4 nov. 2007 à 13:38
Bonjour,
Je suis en 2eme année de BTS et dans le cadre de PTI je souhaite develloper un logiciel ayant une petite base de donnée en XML codée sous le schéma suivant :
<JOUEURS>
<JOUEUR>
<NUM_IDENTIFIANT></NUM_IDENTIFIANT>
<NOM></NOM>
<COMMENTAIRE></COMMENTAIRE>
</JOUEUR>
<JOUEUR>
<NUM_IDENTIFIANT></NUM_IDENTIFIANT>
<NOM></NOM>
<COMMENTAIRE></COMMENTAIRE>
</JOUEUR>
</JOUEURS>
Dans ce programe de gestion, je désire enregistrer tout ces joueurs dans un tableau.
Je me suis doccumenté sur le web mais je commence a caller et fait apelle a votre aide.
Imports System.Xml
[...]
'creation d'une nouvelle instance du membre xmldocument
Dim XmlDoc As XmlDocument = New XmlDocument()
XmlDoc.Load(Application.StartupPath & "\joueurs.XML")
'listage de chaque joueur
Dim element As XmlNodeList
element = XmlDoc.DocumentElement.GetElementsByTagName("JOUEUR")
Dim noeud, noeudEnf As XmlNode
Dim i As Integer = 0
For Each noeud In element
For Each noeudEnf In noeud.ChildNodes
If noeudEnf.LocalName = "NUM_IDENTIFIANT" Then
'MsgBox Pour tester l'entrée et la validitée du parametre , la bonne 'information aparait
MsgBox(noeudEnf.InnerText)
Joueur_Intern(i).Num_L = noeudEnf.InnerText
ElseIf noeudEnf.LocalName = "NOM" Then
Joueur_Intern(i).Nom = noeudEnf.InnerText
ElseIf noeudEnf.LocalName = "PRENOM" Then
Joueur_Intern(i).Prenom = noeudEnf.InnerText
ElseIf noeudEnf.LocalName = "AGE" Then
Joueur_Intern(i).Nom = noeudEnf.InnerText
ElseIf noeudEnf.LocalName = "COMMENTAIRE" Then
Joueur_Intern(i).Comm = noeudEnf.InnerText
End If
Next
i = i + 1
Next
End Sub
Le probleme est que lors de l'execution du script ou j'obtiens un message d'erreur
"La référence d'objet n'est pas définie à une instance d'un objet."
Je ne vois pas trop ou est l'erreur malgrés des efforts ... Je débute .
Je remercie par avance toute personne qui m'aiderait.
Ne0PHenIXXX
Messages postés2Date d'inscriptionmardi 28 novembre 2006StatutMembreDernière intervention 4 novembre 2007 4 nov. 2007 à 13:38
Un mistère de l'informatique sans rien modifier je n'ai plus de probleme a la compilation, merci quand meme pour ceux qui ont pris la peinne de me lire :)