Lire XML sur VB.net

Question

J'ai googlé pendant une heure ou deux sans aucune chance (j'aimerai penser que je suis aussi un super googler!), Alors je suis là.

J'ai un fichier XML que j'utilise pour mes paramètres des programmes, il ressemble à ceci:

<?xml version="1.0" encoding="utf-8"?> 
<config> 
    <store> 
     <number>0323</number> 
     <address>address</address> 
     <phone>phone</phone> 
    </store> 

    <emailsettings> 
     <emailfrom>emailfrom</emailfrom> 
     <emailpass>pass</emailpass> 
     <emailsubject>received</emailsubject> 
     <smtpserver>smtp.gmail.com</smtpserver> 
     <smtpport>587</smtpport> 
     <enablessl>true</enablessl> 
     <emailbody>package received</emailbody> 
    </emailsettings> 
    <dbconfig> 
     <dbpath>path</dbpath> 
    </dbconfig> 
</config> 

Comment puis-je utiliser vb.net pour obtenir chaque élément et renvoyer une valeur spécifique que je veux ? En soi, je voudrais retourner <number> (sous <store>) dans textbox1, et <emailbody> (sous <emailsettings>) dans textbox2.

Aide pleaseeeeee! Merci :)

Answer 1

Ah, un exemple parfait pour montrer les fonctionnalités XML de puissants VB.NET avec Framework 3.5:

Sub Main() 
    Dim xml = XDocument.Load("config.xml") 
    Console.WriteLine("Number: " & xml.<config>.<store>.<number>.Value) 
    Console.WriteLine("Body: " & xml.<config>.<emailsettings>.<emailbody>.Value) 
End Sub 

rendements:

Number: 0323 
Body: package received 

Answer 2

Vous pouvez utiliser la sérialisation XML. Créez des classes qui représentent votre structure XML et utilisez la classe de sérialisation XML pour désérialiser les données. Une fois que vous avez fait cela, vous pouvez utiliser les données dans votre application.

est Ci-dessous un lien vers un exemple de MSDN:

http://msdn.microsoft.com/en-us/library/ms950721.aspx

Answer 3

Voici une application console en utilisant le support XML littérales VB.Net.

Module Module1 

    Sub Main() 

     Dim xElem = <config> 
         <store> 
          <number>0323</number> 
          <address>address</address> 
          <phone>phone</phone> 
         </store> 

         <emailsettings> 
          <emailfrom>emailfrom</emailfrom> 
          <emailpass>pass</emailpass> 
          <emailsubject>received</emailsubject> 
          <smtpserver>smtp.gmail.com</smtpserver> 
          <smtpport>587</smtpport> 
          <enablessl>true</enablessl> 
          <emailbody>package received</emailbody> 
         </emailsettings> 
         <dbconfig> 
          <dbpath>path</dbpath> 
         </dbconfig> 
        </config> 

     Dim number = xElem.<store>.<number>.Value 
     Dim emailbody = xElem.<emailsettings>.<emailbody>.Value 

     Console.WriteLine(String.Format("Number={0}", number)) 
     Console.WriteLine(String.Format("emailbody={0}", emailbody)) 
     Console.ReadLine() 

     '--- What it'd look like if you loaded from a file using XDocument.Load 
     Dim xDoc = XDocument.Load(New IO.StringReader(xElem.ToString)) 
     number = xDoc.Root.<store>.<number>.Value 
     emailbody = xDoc.Root.<emailsettings>.<emailbody>.Value 

     Console.WriteLine(String.Format("Number={0}", number)) 
     Console.WriteLine(String.Format("emailbody={0}", emailbody)) 
     Console.ReadLine() 


    End Sub 

End Module 

Les résultats seront:

Number=0323 
emailbody=package received 

Number=0323 
emailbody=package received 

Answer 4

Si vous connaissez des jeux de données et datatables, c'est un moyen facile de le faire:

Dim DS As New DataSet 
DS.ReadXml("Data.xml") 

DataSets peuvent lire tout XML. Je l'utilise même pour appeler des services XML reposés.