vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
schneller Daten aus XML-Dateien einlesen 
Autor: Robert Blutner
Datum: 31.10.04 01:46
Hi,

zum Einlesen von Daten aus XML-Dateien verwende ich folgenden Code: 

Dim Document As New Xml.XmlDocument
        Dim Node As Xml.XmlNode
        Dim Subnode As Xml.XmlNode
 
        Document.Load(Pfad)
        Anzahl = Document.DocumentElement.ChildNodes.Count
        Dim i As Integer = -1
 
        For Each Node In Document.DocumentElement
            i = i + 1
            Nummer(i) = Node.Attributes("Nummer").Value
            For Each Subnode In Node.ChildNodes
                Select Case Subnode.Name
                    Case "Einordnung"
                        Einordnung(i) = Subnode.InnerXml
                    Case "Thema"
                        Thema(i) = Subnode.InnerXml
                    Case "Ziel"
                        Ziel(i) = Subnode.InnerXml
                    Case "Mittel"
                        Mittel(i) = Subnode.InnerXml
                    Case "Anwendung"
                        Anwendung(i) = Subnode.InnerXml
                    Case "Keyword1"
                        Keyword1(i) = Subnode.InnerXml
                    Case "Keyword2"
                        Keyword2(i) = Subnode.InnerXml
                    Case "Keyword3"
                        Keyword3(i) = Subnode.InnerXml
                    Case "Forscher"
                        Forscher(i) = Subnode.InnerXml
                    Case "Einrichtung"
                        Einrichtung(i) = Subnode.InnerXml
                    Case "Notizen"
                        Notizen(i) = Subnode.InnerXml
                    Case "Literatur"
                        Literatur(i) = Subnode.InnerXml
                    Case "Bestellt"
                        Bestellt(i) = Subnode.InnerXml
                    Case "Erhalten"
                        Erhalten(i) = Subnode.InnerXml
                    Case "Quelle"
                        Quelle(i) = Subnode.InnerXml
                End Select
            Next
Der Code funktioniert wunderbar, doch dauert der ganze Vorgang bei mehreren Datensätzen ziemlich lange.

Kennt jemand vielleicht Methoden, mit denen man die Daten schneller einlesen kann?

Robert

Robert Blutner
robertblutner.de

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
schneller Daten aus XML-Dateien einlesen2.132Robert Blutner31.10.04 01:46
Re: schneller Daten aus XML-Dateien einlesen1.466Moderatorralf_oop31.10.04 09:18
Re: schneller Daten aus XML-Dateien einlesen1.448Robert Blutner31.10.04 10:17
Re: schneller Daten aus XML-Dateien einlesen1.450Moderatorralf_oop31.10.04 13:34
Re: schneller Daten aus XML-Dateien einlesen1.432Robert Blutner31.10.04 17:40
Re: schneller Daten aus XML-Dateien einlesen1.549ModeratorFZelle31.10.04 10:54
Re: schneller Daten aus XML-Dateien einlesen1.482Robert Blutner31.10.04 11:02
Re: schneller Daten aus XML-Dateien einlesen1.440ModeratorFZelle31.10.04 11:20
Re: schneller Daten aus XML-Dateien einlesen1.377Robert Blutner31.10.04 11:25

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel