Imports System.IO
Imports System.Reflection
Module Globals
#Region "Allgemeine Deklarationen"
Public Class MyLoginInfo
Public UserId As String
Public Password As String
Public Server As String
Public Db As String
End Class
#End Region
'''
''' Applikationsversion
'''
'''
Public Version As String = "1.18"
Public Versionsdatum As String = "5. September 2010"
Public LoginInfo As New MyLoginInfo
'''
''' Applikationsdaten
'''
'''
Public Applikationsdaten As DataTable
Public AppldataRow As Integer
'Public TTContextMenuStrip As New ContextMenuStrip
'''
''' Angemelderter Mitarbeiter
'''
'''
Public clsmitarbeiter As New TKB.VV.DB.clsMitarbeiter
'''
''' Applikationsparameter
'''
'''
Public clsapplication As New TKB.VV.DB.clsApplication
'''
''' DB-Verbindungsklasse
'''
'''
Public sConnectionString As String
Public conn As New TKB.VV.DB.clsConnectionProvider
Public ConnectionFileName As String = ""
Public SecurityDaten As New DataSet
Public Spaltendaten As New DataTable
Public ToolTipDaten As New DataSet
Public Set_ToolTips As Boolean = False
Public WithEvents MyEventHanlder As New MyGenericEventHandler
'''
''' Aktueller Applikationspfad
'''
'''
'''
Public Function ApplicationPath() As String
Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
End Function
End Module