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 |
Partager