Autor Thema: XML parsen DOM  (Gelesen 1441 mal)

Offline skywook

  • Senior Mitglied
  • ****
  • Beiträge: 445
  • Ich liebe dieses Forum!
XML parsen DOM
« am: 27.04.17 - 20:09:51 »
Hallo,

ich versuche mich gerade an der DOM-Klasse um eine XML-Datei einzulesen. Das funktioniert soweit auch gut.
Habe aber jetzt das Problem an einem Knoten. Wie kann ich den Wert finden bzw. einlesen, wenn der Knoten so aufgebaut ist:

<File Name="Dateiname" EX = "txt" MB = "22" />

Wie komme ich z.B. an das Attribut EX und an dessen Wert?

Offline Sven Hasselbach

  • Senior Mitglied
  • ****
  • Beiträge: 316
  • Geschlecht: Männlich
    • blog@hasselba.ch
Re: XML parsen DOM
« Antwort #1 am: 03.05.17 - 08:26:19 »
Hier ist eine Funktion, die das gewünschte Attribut als String ausliest:

Code
Function getAttributeByName( node As NotesDOMNode, attrName As String ) As String
	Dim attrs As NotesDOMNamedNodeMap
	Dim a As NotesDOMAttributeNode
	Dim i As Integer
	Dim numAttributes As Integer
	Dim numChildren As Integer
	
	If node.IsNull Then Exit Function
	
	Set attrs = node.Attributes    
	numAttributes = node.attributes.numberofentries
	
	For i = 1 To numAttributes 
		Set a = attrs.GetItem(i)
		
		If a.Nodename = attrName Then
			getAttributeByName = a.Nodevalue
			Exit function
		End If
		
	Next

End Function

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz