Office: (Office 2010) XML Datei einlesen

Leider hat Access ja keinen Assistenten für das Einlesen von XML Dateien.
Oder habe ich etwas übersehen?

Ich stehe vor folgendem Problem:
die XML Datei ist so aufgebaut, das einige Felder direkt mit den Feldnamen getagt sind (kundenname und id) und andere eine Feldbeschreibung enthalten, hier mal ein Satz auszugsweise zur Probe:

PHP:

         <kunden>
<id>27242</id>
<kundenname>Müller GmbH</kundenname>
<field name="strasse" type="text">Konsul-Smidt-Weg</field>
<field name="hausnummer" type="text">2</field>
<field name="plz" type="text">27574</field>
<field name="ort" type="text">Bremerhaven</field>
</kunden>


:)

 

Das XML-Beispiel kommt verstümmelt an... Vermutlich ein Tag-Problem...

Zum XML-Import gibts aber noch die Alternative via DOM-Modell... die ist aber VBA-basiert.

 

Jetzt nicht mehr. *biggrin.gif*

 

Na dann vertief dich mal in XML per VBA. Das Suchstichwort dafür ist MSXML2.DOMDocument. Evtl. auch mit höheren XML-Versionen... *Smilie

Bin auch nicht so der Crack mit XML, aber hier im Forum gabs schon ganz gute Beiträge dazu.

 

Hallo Hans-Christian,

wenn das eine wiederkehrende Aufgabe ist und die Struktur
auf absehbare Zeit gleich bleibt, würde ich eine kleine Funktion per
DOM erstellen.

Du kannst zwar xml direkt importieren, jedoch scheitert es in diesem Fall tatsächlich an den Attributen (Feldname/Feldtyp).
Die kennt der Access Import-Assi nicht.

Ich habe mal angefangen einen XML-Praser zu schreiben.
Wenn du noch ein vierteljährchen Zeit hast ... *wink.gif*
(Tabellen erstellen inkl. Daten einlesen funktioniert schon in einfacher Form.
Das Einlesen ohne Tabellenerstellung ist noch in Entwicklung.)

PS: wenn du gar nicht zurecht kommst, melde dich!

 

Hallo Hans Christian,

eine Alternative könnte sein, die Datei vor dem Einlesen zu korrigieren. Ich könnte mit vorstellen, dass man da mit einer Regular Expression schnell gute Ergebnisse erzielen kann.

CU

 

Da Olympia gerade nichts spannendes zu bieten hat *wink.gif*
Code:

 

Hallo zusammen und einen guten Morgen.

Danke für die Anregungen schon mal.
@Thomas: da hatte ich auch zuerst drüber nachgedacht ...
Code:

@Marsu: das ist ein interessanter Ansatz mit dem XML Parser.
Ein Vierteljahr werde ich aber nicht drauf warten können *wink.gif*

Ich hoffe, ich komme heute dazu, beides mal anzugehen und auszuprobieren.

 

\@hcscherzer:
Marsus Code liest deine Datei ein und gibt dir Zugriff auf die Daten. Das war doch dein Ziel? Ein Parser, im Sinne von "da und dort ist die Datei nicht wohlgeformt", war doch gar nicht erwünscht?

 

Die RegEx-Reparatur der XML-Datei könnte etwa so aussehen:
Code:

PHP:

         Public Function ChangeXML(ByVal Content As String) As String
ChangeXML = RegExReplace(Content, _
"<field name=" & Chr(34) & "([a-z]+)" & Chr(34) & " type=" & Chr(34) & _
"text" & Chr(34) & ">([A-Za-z0-9 -]+)</field>", _
"<$1>$2</$1>")
End Function


 

\@Martin: ich hatte genau das unter "Parser" verstanden, Daten einlesen.
Siehe auch hier.

@Eberhard: auch Dir danke für Deine Function. Ich werde wohl erst morgen dazu kommen, mich mit dem Thema intensiver zu beschäftigen. Heute ist hier zu viel los ... nicht nur Olympia *wink.gif*

 

Den Begriff Parser hatte ich gewählt, weil es u.a. möglich sein wird XML-Strukturen in Tabellenstrukturen mit ref.Int zu transferieren.
Den "einfachen" Teil der Datenübernahme in bestehende Tabellenstrukturen habe ich bisher ausgespart. *wink.gif*

Bei den oben gezeigten Beispieldaten gehe ich davon aus, dass es jeweils ein Datensatz ist, der komplett in einer Tabelle landen soll.
Damit wäre die kleine Funktion aus #7 imho ausreichend.

 

\@Marsu65: Könnte man eigentlich in deiner For Each-Schleife aus dem xKunde-Objekt eine Collection aller field-Elemente abfragen, welche man dann wieder mit For Each durchlaufen kann?

 

Hi Sten,
xKunde ist ein Node, der wiederum Childnodes (Aufzählung als Nodelist-Collection) und/oder Attributes (Attributes-Collection)haben kann.
Nodelists gezielt nach nach Childnodes mit einem bestimmten Tagname (in dem Fall "field"-Elemente als Unterknoten) zu suchen geht über die selectNodes-Methode der Nodes:

Code:

bzw. mit For Each ...
Code:

 

\@Marsu65:

Besten Dank, ich war beim ausprobieren irgendwie auf getElementsByTagName fixiert und hab das selectNodes komplett übersehen.... *Smilie

Code: