1 2 3 4 5 6 7 8
Sub ReadXMLFileDS(ByVal strFile As String) Dim XMLData As New System.Data.DataSet XMLData.ReadXml(strFile, Data.XmlReadMode.Auto) '' was auch immer machen.... End Sub