xml Datei auslesen

30/09/2008 - 07:56 von Mueller Juergen | Report spam
Ich habe folgende XML Datei:

<config>
<fields>
<field id="subject" visible="true" editable="false">
<label language="de">Betreff</label>
<label language="en">Subject</label>
</field>
<field id="filetype" visible="true" editable="true">
<label language="de">Dateityp</label>
<label language="en">File type</label>
<filetypes>
<file label="EMAIL" extension="_email" />
<file label="NOTE" extension="_note" />
</filetypes>
</field>
</fields>
<labels>
<buttons>
<button id="ok">
<label language="de">OK</label>
<label language="en">OK</label>
</button>
<button id="ignore">
<label language="de">Überspringen</label>
<label language="en">Skip</label>
</button>
<button id="cancel">
<label language="de">Abbrechen</label>
<label language="en">Cancel</label>
</button>
</buttons>

<window>
<label language="de">Text1</label>
<label language="en">Text2</label>
</window>


</labels>
</config>

Ich habe da nun schon einige xml Parser mir angesehen, bin da aber leider
nicht recht weitergekommen.
Kann mir jemand da ein Beispiel geben, mit dem ich da am besten einen
bestimmten Tag finden kann.
Ich möchte z.B. den Wert "Betreff" u.s.w. haben.

Vielen Dank für jede Antwort
Jürgen
 

Lesen sie die antworten

#1 Peter Fleischer
01/10/2008 - 19:57 | Warnen spam
"Mueller Juergen" schrieb im Newsbeitrag
news:48e1bf7a$0$26593$

Ich habe da nun schon einige xml Parser mir angesehen, bin da aber leider
nicht recht weitergekommen.
Kann mir jemand da ein Beispiel geben, mit dem ich da am besten einen
bestimmten Tag finden kann.
Ich möchte z.B. den Wert "Betreff" u.s.w. haben.



Hi Jürgen,
z.B. so:

Dim doc As New DOMDocument60
If doc.Load("c:\temp\xtest.xml") Then
Dim list As IXMLDOMNodeList
Set list = doc.selectNodes("descendant::fields[field/label='Betreff']")
For Each o In list
Debug.Print o.Text
Next
End If


Viele Gruesse

Peter

Ähnliche fragen