, tableadapters XSD. XML , - -. XSD, , . , .
Dim XMLDoc As New System.Xml.XmlDocument
XMLDoc.Load("MyDataset.xsd")
Dim oSortedTableAdapters As New Collections.Generic.SortedDictionary(Of String, Xml.XmlElement)
Const WebApplication As Boolean = False
Dim TableAdapters = XMLDoc.GetElementsByTagName("TableAdapter")
For Each TableAdapter As Xml.XmlElement In TableAdapters
If WebApplication Then
'pre-compiled way'
oSortedTableAdapters.Add(TableAdapter.Attributes("GeneratorDataComponentClassName").Value, TableAdapter)
Else
'dynamic compiled way'
oSortedTableAdapters.Add(TableAdapter.Attributes("Name").Value, TableAdapter)
End If
Next
source
share