LoadXML (MSXML)

Mit LoadXML kann ein XML-Knotenset aus einer Zeichenkette erstellt werden.

Result = Object.LoadXML(Zeichenkette)

Result	optional	Boolean	Gibt an, ob die Zeichenkette XML-konform war und daraus ein XML-Knotenset erstellt werden konnte
Object	erforderlich	DOMDocument oder FreeThreadedDOMDocument	Verweis auf das Objekt, welches das Knotenset vorhalten wird
Zeichenkette	erforderlich	String	Zeichenkette mit einer XML-Struktur

Beispiel

Dim objXml As MSXML2.FreeThreadedDOMDocument
Dim strXml As String

strXml = VBA.Constants.vbNullString
strXml = strXml & "<?xml version=""1.0""?>" & VBA.Constants.vbNewLine
strXml = strXml & "<bibliothek>" & VBA.Constants.vbNewLine
    strXml = strXml & vbTab & "<buecher>" & VBA.Constants.vbNewLine
        strXml = strXml & vbTab & vbTab & "<buch name=""VB für Dummies"" />" & VBA.Constants.vbNewLine
        strXml = strXml & vbTab & vbTab & "<buch name=""Turbo Pascal für Dummies"" />" & VBA.Constants.vbNewLine
    strXml = strXml & vbTab & "</buecher>" & VBA.Constants.vbNewLine
strXml = strXml & "</bibliothek>" & VBA.Constants.vbNewLine

Set objXml = New MSXML2.FreeThreadedDOMDocument
With objXml
    .async = False
    .validateOnParse = True

    If .LoadXML(strXml) Then
        Debug.Print .xml
    Else
        Debug.Print "[Fehler] " & .parseError.reason
    End If
End With

Set objXml = Nothing

Weblinks

MSDN Library: LoadXML

---