Imports System.IO
Imports System.Reflection

Module Globals
    Public ConnectionFilename As String
    Public sConnectionstring As String
    Public Mitarbeiternr As Integer
    Public Vorlagendata_vollstaendig As New DataTable
    Public Vorlagendata As New DataTable()
    Public Paramdatei As String = ""

    Public hasmessage As Integer
    Public Applicationdata As String

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


End Module