54 lines
1.5 KiB
VB.net
54 lines
1.5 KiB
VB.net
Module modCurrent
|
|
|
|
Public MyConnectionString As String = ""
|
|
Public HotkeyFunctionKey As String = "strg"
|
|
Public HotkeySearchKey As String = "f"
|
|
Public LogErrorsOnly As Boolean = True
|
|
|
|
Public CURRENT_WINDOW_NAME As String
|
|
|
|
Public CURRENT_USER_SHORT As String
|
|
Public USER_USERNAME As String
|
|
Public USER_IS_ADMIN As Boolean = False
|
|
Public USER_ID
|
|
Public USER_PRENAME
|
|
Public USER_SURNAME
|
|
Public USER_SHORTNAME
|
|
Public USER_EMAIL
|
|
Public USER_LANGUAGE As String = "de-DE"
|
|
Public USER_EXISTS = False
|
|
Public USER_IN_MODULE = False
|
|
|
|
Public USERCOUNT_LOGGED_IN As Integer
|
|
|
|
Public LICENSE_COUNT As Integer
|
|
Public LICENSE_DATE As Date
|
|
Public LICENSE_EXPIRED As Boolean = False
|
|
|
|
Public DT_CLIENT_USER As DataTable
|
|
Public ERROR_INIT As String = ""
|
|
Public START_INCOMPLETE As Boolean = False
|
|
Public CONNECTION_CHANGED As Boolean = False
|
|
Public ESC_Hidden As Boolean = False
|
|
|
|
Public CURRENT_WD_TEMPSEARCH As String
|
|
Public TEMP_FILES As List(Of String) = New List(Of String)
|
|
|
|
Public WD_UNICODE As Boolean = False
|
|
|
|
Public DT_USER_PROFILES As DataTable
|
|
|
|
Public CLIPBOARD_TEXT As String
|
|
Public CURR_MATCH_RESULT
|
|
Public CURR_MATCH_WM_SEARCH
|
|
|
|
Public MONITORING_ACTIVE As Boolean = True
|
|
|
|
Public PROC_PID As String
|
|
Public PROC_Name As String
|
|
Public PROC_WindowTitle As String
|
|
Public LOGGER_FILEPATH As String
|
|
|
|
Public CLIENT_SELECTED As Integer = 0
|
|
End Module
|