Bonjour à tous,
Je penses avoir bien suivi le tuto sur la création de fichier XML avec l'aide de Xml.XmlDocument, mais lors de la compil, j'ai une erreur,
J'ai cherché longtemps aprés la solution sur le net, mais la je me retourne sur vous pour vous demander de l'aide
Voici mon code :
Et l'erreur :
Code : 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
19
20 Public Sub CreerCarnet(ByVal FileName As String) Dim XmlDoc As Xml.XmlDocument = New Xml.XmlDocument() ' Création du document XmlDoc.LoadXml("[amigo][/amigo]") Dim NContact As Xml.XmlElement ' Noeud Contact Dim NNom As Xml.XmlElement ' Noeud Nom Dim NPrenom As Xml.XmlElement 'Noeud Prénom NContact = XmlDoc.CreateElement("Contact") NNom = XmlDoc.CreateElement("Nom") NPrenom = XmlDoc.CreateElement("Prenom") NNom.InnerText = "Catinat" NPrenom.InnerText = "Youri" NContact.AppendChild(NNom) NContact.AppendChild(NPrenom) XmlDoc.DocumentElement.AppendChild(NContact) XmlDoc.Save(Application.StartupPath & FileName & ".xml") End Sub
L'erreur se déroule sur la ligne en gras."Données non valides au niveau racine. Ligne 1, position 1."
Merci d'avance de votre aide
ZbergK
Partager