XML parsen DOM

[skywook]

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?

[Sven Hasselbach]

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