Initial commit

EDOKA_Toolset/Plugin_FiVo/Utils/Globals.vb

@@ -0,0 +1,23 @@
+Imports System.IO
+Imports System.Reflection
+
+Module Globals
+    Public ConnectionFilename As String
+    Public sConnectionstring As String
+    Public Mitarbeiternr As Integer
+    Public Applikationsdaten As New DataTable
+    Public AppldataRow As Integer
+    Public Words As New Collection()
+    Public Apphandle As Int32
+    Public conn As New edokadb.clsConnectionProvider()
+    Public DivFnkt As New EDOKA.clsDivFnkt()
+
+
+
+
+    Public Function ApplicationPath() As String
+        Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
+    End Function
+
+
+End Module