Comment : modifier des littéraux XML (Visual Basic)

Visual Basic fournit des moyens pratiques de modifier les littéraux XML. Vous pouvez ajouter ou supprimer des éléments et des attributs, et vous pouvez également remplacer un élément existant par un nouvel élément XML. Cette rubrique fournit plusieurs exemples de modification d’un littéral XML existant.

Pour modifier la valeur d’un littéral XML

1. Pour modifier la valeur d’un littéral XML, obtenez une référence au littéral XML et définissez la propriété Value sur la valeur souhaitée.

   L’exemple de code suivant met à jour la valeur de tous les éléments <Price> dans un document XML.

   For Each book In From element In catalog.<Catalog>.<Book>
     book.<Price>.Value = (book.<Price>.Value * 1.05).ToString("#.00")
   Next
   

   L’exemple suivant montre l’exemple de code XML source et le code XML modifié à partir de cet exemple de code.

   Fichier XML source :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk331">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
     </Book>
   </Catalog>
   

   Fichier XML modifié :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>47.20</Price>
     </Book>
     <Book id="bk331">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>48.25</Price>
     </Book>
   </Catalog>
   

   Notes

   La propriété Value fait référence au premier élément XML d’une collection. S’il existe plusieurs éléments portant le même nom dans une collection, la définition de la propriété Value affecte uniquement le premier élément de la collection.

Pour ajouter un attribut à un littéral XML

1. Pour ajouter un attribut à un littéral XML, commencez par obtenir une référence au littéral XML. Vous pouvez ensuite ajouter un attribut en ajoutant une nouvelle propriété d’axe d’attribut XML. Vous pouvez également ajouter un nouvel objet XAttribute au littéral XML à l’aide de la méthode Add. L’exemple suivant montre deux options.

   Dim newAttribute = "editorEmail"
   Dim editorID = "someone@example.com"
   For Each book In From element In catalog.<Catalog>.<Book>
     ' Add an attribute by using an XML attribute axis property.
     book.@genre = "Computer"
   
     ' Add an attribute to the Attributes collection.
     book.Add(New XAttribute(newAttribute, editorID))
   Next
   

   L’exemple suivant montre l’exemple de code XML source et le code XML modifié à partir de cet exemple de code.

   Fichier XML source :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101" >
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk331">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
     </Book>
   </Catalog>
   

   Fichier XML modifié :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101" genre="Computer" editorEmail="someone@example.com">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk331" genre="Computer" editorEmail="someone@example.com">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
     </Book>
   </Catalog>
   

   Pour plus d’informations sur les propriétés de l’axe des attributs XML, consultez Propriété de l’axe des attributs XML.

Pour ajouter un élément à un littéral XML

1. Pour ajouter un élément à un littéral XML, commencez par obtenir une référence au littéral XML. Vous pouvez ensuite ajouter un nouvel objet XElement comme dernier sous-élément de l’élément à l’aide de la méthode Add. Vous pouvez ajouter un nouvel objet XElement en tant que premier sous-élément à l’aide de la méthode AddFirst.

   Pour ajouter un nouvel élément à un emplacement spécifique par rapport à d’autres sous-éléments, commencez par obtenir une référence à un sous-élément adjacent. Vous pouvez ensuite ajouter le nouvel objet XElement avant le sous-élément adjacent à l’aide de la méthode AddBeforeSelf. Vous pouvez également ajouter le nouvel objet XElement après le sous-élément adjacent à l’aide de la méthode AddAfterSelf.

   L’exemple suivant montre des exemples de chacune de ces techniques.

   Dim vbBook = From book In catalog.<Catalog>.<Book> 
                Where book.<Title>.Value = 
                  "Developing Applications with Visual Basic .NET"
   
   vbBook(0).AddFirst(<Publisher>Microsoft Press</Publisher>)
   
   vbBook(0).Add(<PublishDate>2005-2-14</PublishDate>)
   
   vbBook(0).AddAfterSelf(<Book id="bk999"></Book>)
   
   vbBook(0).AddBeforeSelf(<Book id="bk000"></Book>)
   

   L’exemple suivant montre l’exemple de code XML source et le code XML modifié à partir de cet exemple de code.

   Fichier XML source :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101" >
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk331">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
     </Book>
   </Catalog>
   

   Fichier XML modifié :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101" >
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk000"></Book>
     <Book id="bk331">
       <Publisher>Microsoft Press</Publisher>
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
       <PublishDate>2005-2-14</PublishDate>
     </Book>
     <Book id="bk999"></Book>
   </Catalog>
   

Pour supprimer un élément ou un attribut d’un littéral XML

1. Pour supprimer un élément ou un attribut d’un littéral XML, obtenez une référence à l’élément ou à l’attribut et appelez la méthode Remove, comme illustré dans l’exemple suivant.

   For Each book In From element In catalog.<Catalog>.<Book>
     book.Attributes("genre").Remove()
   Next
   
   For Each book In From element In catalog.<Catalog>.<Book> 
                    Where element.@id = "bk999"
     book.Remove()
   Next
   

   L’exemple suivant montre l’exemple de code XML source et le code XML modifié à partir de cet exemple de code.

   Fichier XML source :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101" genre="Computer" editorEmail="someone@example.com">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk000"></Book>
     <Book id="bk331" genre="Computer" editorEmail="someone@example.com">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
     </Book>
     <Book id="bk999"></Book>
   </Catalog>
   

   Fichier XML modifié :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101" editorEmail="someone@example.com">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
     </Book>
     <Book id="bk000"></Book>
     <Book id="bk331" editorEmail="someone@example.com">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
     </Book></Catalog>
   

   Pour supprimer tous les éléments ou attributs d’un littéral XML, obtenez une référence au littéral XML et appelez la méthode RemoveAll.

Pour modifier un littéral XML

1. Pour modifier le nom d’un élément XML, commencez par obtenir une référence à l’élément. Vous pouvez ensuite créer un objet XElement qui a un nouveau nom et passer le nouvel objet XElement à la méthode ReplaceWith de l’objet existant XElement.

   Si l’élément que vous remplacez a des sous-éléments qui doivent être conservés, définissez la valeur du nouvel objet XElement sur la propriété Nodes de l’élément existant. Cela définit la valeur du nouvel élément sur le code XML interne de l’élément existant. Sinon, vous pouvez définir la valeur du nouvel élément sur la propriété Value de l’élément existant.

   L’exemple de code suivant remplace tous les éléments <Description> par un élément <Abstract>. Le contenu de l’élément <Description> est conservé dans le nouvel élément <Abstract> à l’aide de la Nodes propriété de l’objet <Description>XElement.

   For Each desc In From element In catalog.<Catalog>.<Book>.<Description>
     ' Replace and preserve inner XML.
     desc.ReplaceWith(<Abstract><%= desc.Nodes %></Abstract>)
   Next
   
   For Each price In From element In catalog.<Catalog>.<Book>.<Price>
     ' Replace with text value.
     price.ReplaceWith(<MSRP><%= price.Value %></MSRP>)
   Next
   

   L’exemple suivant montre l’exemple de code XML source et le code XML modifié à partir de cet exemple de code.

   Fichier XML source :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <Price>44.95</Price>
       <Description>
         An in-depth look at creating applications
         with <technology>XML</technology>. For
         <audience>beginners</audience> or
         <audience>advanced</audience> developers.
       </Description>
     </Book>
     <Book id="bk331">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <Price>45.95</Price>
       <Description>
         Get the expert insights, practical code samples, and best
         practices you need to advance your expertise with
         <technology>Visual Basic .NET</technology>.
         Learn how to create faster, more reliable applications
         based on professional, pragmatic guidance by today's top
         <audience>developers</audience>.
       </Description>
     </Book>
   </Catalog>
   

   Fichier XML modifié :

   <?xml version="1.0"?>
   <Catalog>
     <Book id="bk101">
       <Author>Garghentini, Davide</Author>
       <Title>XML Developer's Guide</Title>
       <MSRP>44.95</MSRP>    <Abstract>
         An in-depth look at creating applications
         with <technology>XML</technology>. For
         <audience>beginners</audience> or
         <audience>advanced</audience> developers.
       </Abstract>
     </Book>
     <Book id="bk331">
       <Author>Spencer, Phil</Author>
       <Title>Developing Applications with Visual Basic .NET</Title>
       <MSRP>45.95</MSRP>    <Abstract>
         Get the expert insights, practical code samples, and best
         practices you need to advance your expertise with
         <technology>Visual Basic .NET</technology>.
         Learn how to create faster, more reliable applications
         based on professional, pragmatic guidance by today's top
         <audience>developers</audience>.
       </Abstract>
     </Book>
   </Catalog>
   

Voir aussi

• Manipulation de code XML dans Visual Basic
• XML
• Guide pratique : charger du code XML à partir d’un fichier, d’une chaîne ou d’un flux
• LINQ
• Introduction à LINQ en Visual Basic