1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| Imports System.Xml
Imports System.Xml.Serialization
<Serializable(), XmlRoot("databases")> _
Public Class CDataBases
Public DataBases() As CDataBase
End Class
<Serializable(), XmlRoot("database")> _
Public Class CDataBase
<XmlElement("alias")> Public AliasName As String = ""
<XmlElement("name")> Public Name As String = ""
<XmlElement("serveur")> Public Serveur As String = ""
<XmlElement("description")> Public Description As String = ""
<XmlElement("lastused")> Public bLastUsed As Boolean = False
<XmlElement("connectionstring")> Public ConnectionString As String = ""
<XmlElement("dbtype")> Public DataBaseType As ProviderType = ProviderType.SQLServer
End Class |
