Imports System.IO
Imports System.Reflection

Module Globals
    Public Connection_Overwritten As Boolean = False
    Public ConnectionFilename As String = ""
    Public sConnectionstring As String = ""
    Public Mitarbeiternr As Integer
    Public Vorlagendata_vollstaendig As New DataTable
    Public Vorlagendata As New DataTable()
    Public conn As New edokadb.clsConnectionProvider()
    Public hasmessage As Integer

    Public Function ApplicationPath() As String
        Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
    End Function


End Module