Mega Code Archive

 

Categories / VisualBasic Script / XML

 

Loading and Retrieving the Contents of an XML File

Sub ReadXMLDoc()      Dim xmldoc As MSXML2.DOMDocument50      Set xmldoc = New MSXML2.DOMDocument50      xmldoc.async = False      If xmldoc.Load("C:\yourFile.xml") Then          Debug.Print xmldoc.XML          Debug.Print xmldoc.Text      End If  End Sub