Module Globals
    Public ConnectionFileName As String = ""
    Public sConnectionstring As String = ""
    Public Mitarbeiternr As Integer = 1
End Module