Concloo LotusScript Essentials Beispiele
Beispiele: CNCL_XML_GetElementContentByPath
Der Inhalt eines bestimmten Elementtyps wird ermittelt und als Liste zurückgegeben.
Unter dem Tag "count" der Ergebnisliste kann die Anzahl der gefundenen Elemente ermittelt werden.
Die einzelnen Elemnte des Strukturpfads werden durch einen Punkt (".") getrennt.
In Klammern hinter einem Element kann definiert werden, welches des gefundenen Elemente berücksichtigt werden soll - hier kann nicht nur eine Integerzahl definiert werden, sondern auch die Begriffe "first" und "last" sind zulässig. Des Weiteren können z.B. auch Ausdrücke wie "first+2" oder "last-1" verwendet werden.
Dim xml As String
Dim eintraege As Variant
xml = |<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<verzeichnis> // hier beginnt das Verzeichnis
<titel>Wikipedia Städteverzeichnis</titel>
/* dies ist der erste Eintrag */
<eintrag>
<stichwort>Genf</stichwort>
<eintragstext>Genf ist der Sitz von ...</eintragstext>
</eintrag>
<eintrag> // und dies der zweite
<stichwort>Köln</stichwort>
<eintragstext>Köln ist eine Stadt, die ...</eintragstext>
</eintrag>
</verzeichnis>
|
eintraege = CNCL_XML_GetElementContentByPath(xml,"verzeichnis.eintrag(1).stichwort")
GoSub AUSGABE
eintraege = CNCL_XML_GetElementContentByPath(xml,"verzeichnis.eintrag(1).eintragstext")
GoSub AUSGABE
eintraege = CNCL_XML_GetElementContentByPath(xml,"verzeichnis.eintrag(last)")
GoSub AUSGABE
Exit Sub
AUSGABE:
Forall eintrag In eintraege
Print ListTag(eintrag) + " > " + eintrag
End ForAll
Print
Return
Ausgabe:
1 > Genf
2 > Bern
count > 2
1 > Genf ist der Sitz von ...
2 > Bern ist der Regierungssitz von ...
count > 2
count > 1
1 > KölnKöln ist eine Stadt, die ...