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