Datenbank Datei knoten auslesen (ähnlich XML)

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von 200dvd.

    Datenbank Datei knoten auslesen (ähnlich XML)

    Hallo ich bin der neue. :D
    so ich habe folgendes problem ich möchteaus einer datei, wo das drin steht:

    XML-Quellcode

    1. <WKAQuiz>
    2. <Name>Name</Name>
    3. <Punkte>10</Punkte>
    4. <Wohnort>Entenhausen</Wohnort>
    5. <FWKR>0</FWKR>
    6. <IWV>38</IWV>
    7. <Nachricht>Halo</Nachricht>
    8. </WKAQuiz>

    die werte auslesen und in 6 Variablen Schreiben.
    Das ganze soll auch funktioniren wenn nicht jeder knoten eine eigende Zeile hat!
    Also so:

    XML-Quellcode

    1. <WKAQuiz><Name>Name</Name><Punkte>10</Punkte><Wohnort>Entenhausen</Wohnort><FWKR>0</FWKR><IWV>38</IWV><Nachricht>Halo</Nachricht></WKAQuiz>

    Also dann, schon mal Danke!

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „200dvd“ ()

    Ich Habe Jetzt Schon Was Gefunden...

    VB.NET-Quellcode

    1. Imports System.Xml
    2. Public Class Form1
    3. Dim NAMEXMLDATEI As String = "C:\1.xml"
    4. Dim xml_Doc As XmlDocument ' XML-Dokument (Datei)
    5. Dim xml_Knoten As XmlNode ' Einzelknoten
    6. Dim xml_NewsListe As XmlNodeList
    7. Dim Name
    8. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    9. Call check()
    10. End Sub
    11. Private Sub check()
    12. xml_Doc = New XmlDocument() ' Instanz bilden
    13. xml_Doc.Load(NAMEXMLDATEI) ' XML-Datei laden
    14. xml_Knoten = xml_Doc.SelectSingleNode("WKAQuiz") ' Stammknoten <news> ermitteln
    15. xml_NewsListe = xml_Knoten.ChildNodes ' Alle Kinder des Stammknotens
    16. For Each xml_Knoten In xml_NewsListe
    17. Name = xml_Knoten.SelectSingleNode("Name").InnerText
    18. Next
    19. Me.Text = Name
    20. End Sub

    aber es geht noch nicht so richtig.
    es kommt immer

    Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.

    bei

    VB.NET-Quellcode

    1. Name = xml_Knoten.SelectSingleNode("Name").InnerText
    habe es mit

    VB.NET-Quellcode

    1. Dim reader As XmlReader
    2. Dim myXMLDoc As New XmlDocument
    3. reader = XmlReader.Create(datei)
    4. myXMLDoc.Load(reader)
    5. Dim myNode As XmlNode = myXMLDoc.SelectSingleNode("/WKAQuiz/Name")
    6. myNode = myNode.FirstChild
    7. ListBox1.Items.Add(myNode.Value.ToString)

    geschaft