Hallo Zusammen,
ich suche schon seit ein paar Tagen nach einer Lösung.
Leider bekomme ich es selber nicht gebacken. Wer kann mir einige Zeilen Code zur
Verfügung stellen?
Habe die XML-Datei geöffnet
Delphi-Quelltext
1:
| FDoc := XMLToDomParser1.ParseFile(Datei, False); |
Hier ein Auszug aus der Datei:
XML-Daten
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| <?xml version="1.0" encoding="UTF-8"?><ONIXmessage><header><m172>4026635100003</m172><senderidentifier><m379>02</m379><b244>LIB_GESAMT</b244></senderidentifier><m174>Libri GmbH</m174><m175>Katalog</m175><m180>392</m180><m182>20080808</m182></header> <product> <a001>A405</a001> <a002>03</a002> <productidentifier><b221>02</b221><b244>3920880102</b244></productidentifier> <productidentifier><b221>03</b221><b244>9783920880105</b244></productidentifier> <productidentifier><b221>03</b221><b244>9790003000701</b244></productidentifier> <productidentifier><b221>01</b221><b233>LI</b233><b244>2003899</b244></productidentifier> <productidentifier><b221>01</b221><b233>BESTNR</b233><b244>219</b244></productidentifier> ..... </product> |
Jetzt habe ich in der Datei z.B. 500 Produkte die ich einzeln durchgehen möchte.
Der Inhalt soll dann in eine DB gespeichert werden.
Wie kann ich nun von produkt zu produkt springen (while-Schleife etc.) und die
Felder auslesen?
Hoffe jemand kann mir helfen!
Gruß aus Ostfriesland
Christian
Moderiert von
Narses: Delphi-Tags hinzugefügt