Initial commit

EDOKA_Toolset/Plugin_Connection/utils/Globals.vb

@@ -0,0 +1,18 @@
+Imports System.IO
+Imports System.Reflection
+
+
+Module Globals
+    Public Userdata As New DataSet
+    Public UserRechte As Integer = -1
+    Public Mitarbeiternr As String
+    Public tgnummer As String
+    Public DefaultExtension As Integer = 0
+    Public Applikationsdaten As New DataTable
+
+
+    Public Function ApplicationPath() As String
+        Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
+    End Function
+
+End Module