Imports Microsoft.VisualBasic
Imports System
Namespace LYB.VB
    Public Class SQLServerConfigException
        Inherits System.ApplicationException

        Public Sub New()
        End Sub

        Public Sub New(ByVal Message As String)
            MyBase.New(Message)
        End Sub
        Public Sub New(ByVal Message As String, ByVal Inner As Exception)
            MyBase.New(Message)
        End Sub
    End Class
    Public Class SQLServerLoginException
        Inherits System.ApplicationException

        Public Sub New()
        End Sub

        Public Sub New(ByVal Message As String)
            MyBase.New(Message)
        End Sub
        Public Sub New(ByVal Message As String, ByVal Inner As Exception)
            MyBase.New(Message)
        End Sub
    End Class
    Public Class SQLServerAccessException
        Inherits System.ApplicationException

        Public Sub New()
        End Sub

        Public Sub New(ByVal Message As String)
            MyBase.New(Message)
        End Sub
        Public Sub New(ByVal Message As String, ByVal Inner As Exception)
            MyBase.New(Message)
        End Sub

    End Class
End Namespace