Initial commit

EDOKA_Toolset/Plugin_ScanToEDOKA/Utis/Gobals.vb

@@ -0,0 +1,14 @@
+Imports System.IO
+Imports System.Reflection
+
+Module Globals
+    Public ConnectionFilename As String
+    Public sConnectionstring As String
+    Public Mitarbeiternr As Integer
+
+    Public Function ApplicationPath() As String
+        Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
+    End Function
+
+
+End Module