merge redesign into master

Global_Indexer/AboutBox1.Designer.vb

@@ -97,10 +97,10 @@ Partial Class AboutBox1
         Me.LinkLabel1.AutoSize = True
         Me.LinkLabel1.Location = New System.Drawing.Point(281, 200)
         Me.LinkLabel1.Name = "LinkLabel1"
-        Me.LinkLabel1.Size = New System.Drawing.Size(93, 13)
+        Me.LinkLabel1.Size = New System.Drawing.Size(127, 13)
         Me.LinkLabel1.TabIndex = 6
         Me.LinkLabel1.TabStop = True
-        Me.LinkLabel1.Text = "www.didalog.de"
+        Me.LinkLabel1.Text = "www.digitaldata.works"
         '
         'AboutBox1
         '

Global_Indexer/AboutBox1.vb

@@ -12,16 +12,13 @@
         If USER_LANGUAGE = "de-DE" Then
             Me.Text = String.Format("Information zu: {0}", ApplicationTitle)
         Else
-            Me.Text = String.Format("Informations about: {0}", ApplicationTitle)
+            Me.Text = String.Format("Information about: {0}", ApplicationTitle)
         End If
 
-        ' Initialisieren Sie den gesamten Text, der im Infofeld angezeigt wird.
-        ' TODO: Die Assemblyinformationen der Anwendung im Bereich "Anwendung" des Dialogfelds für die 
-        '    Projekteigenschaften (im Menü "Projekt") anpassen.
         lblProduktname.Text = My.Application.Info.ProductName
-        Me.lblVersion.Text = String.Format("Version {0}", My.Application.Info.Version.ToString)
-        Me.lblCompanyName.Text = My.Application.Info.CompanyName
-        Me.txtDescription.Text = My.Application.Info.Description
+        lblVersion.Text = String.Format("Version {0}", My.Application.Info.Version.ToString)
+        lblCompanyName.Text = My.Application.Info.CompanyName
+        txtDescription.Text = My.Application.Info.Description
     End Sub
 
     Private Sub OKButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKButton.Click
@@ -33,6 +30,6 @@
         ' Specify that the link was visited.
         Me.LinkLabel1.LinkVisited = True
         ' Navigate to a URL.
-        System.Diagnostics.Process.Start("http://www.didalog.de")
+        System.Diagnostics.Process.Start("https://digitaldata.works")
     End Sub
 End Class

Global_Indexer/App.config

@@ -1,54 +1,13 @@
 <?xml version="1.0" encoding="utf-8"?>
 <configuration>
     <configSections>
-        <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-            <section name="Global_Indexer.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
-        </sectionGroup>
-        <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-            <section name="Global_Indexer.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false"/>
-        </sectionGroup>
     </configSections>
     <connectionStrings>
         <add name="Global_Indexer.My.MySettings.DD_ECMConnectionString"
-            connectionString="Data Source=172.24.12.41\TESTS;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
+            connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
             providerName="System.Data.SqlClient" />
     </connectionStrings>
     <startup>
         <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1"/>
     </startup>
-    <userSettings>
-        <Global_Indexer.My.MySettings>
-            <setting name="SplitterDistance_Viewer" serializeAs="String">
-                <value>526</value>
-            </setting>
-            <setting name="WDSearch_maximized" serializeAs="String">
-                <value>True</value>
-            </setting>
-            <setting name="Show_IndexResult" serializeAs="String">
-                <value>True</value>
-            </setting>
-            <setting name="DoNot_Show_Documents" serializeAs="String">
-                <value>False</value>
-            </setting>
-            <setting name="AppTerminate" serializeAs="String">
-                <value>False</value>
-            </setting>
-            <setting name="DA_Vorauswahlaktiv" serializeAs="String">
-                <value>False</value>
-            </setting>
-            <setting name="REGEX_Replace" serializeAs="String">
-                <value />
-            </setting>
-            <setting name="FilenameTest" serializeAs="String">
-                <value>myFilename.pdf</value>
-            </setting>
-        </Global_Indexer.My.MySettings>
-    </userSettings>
-    <applicationSettings>
-        <Global_Indexer.My.MySettings>
-            <setting name="Test" serializeAs="String">
-                <value>DigitalData\windream_CLIENT_WMCC_Neustart</value>
-            </setting>
-        </Global_Indexer.My.MySettings>
-    </applicationSettings>
 </configuration>

Global_Indexer/ClassConfig.vb

@@ -8,10 +8,14 @@ Public Class ClassConfig
     Public Property FolderWatchStarted As Boolean = False
     Public Property FolderWatchScanStarted As Boolean = False
 
-    ' PDF Viewer Settings
+    ' Index Form Settings
     Public Property FilePreview As Boolean = True
+    Public Property SplitterDistanceViewer As Integer = 500
+    Public Property ProfilePreselection As Boolean = False
+    Public Property ShowIndexResult As Boolean = True
+    Public Property DeleteOriginalFile As Boolean = False
 
     ' Misc Settings
-    Public Property DeleteOriginalFile As Boolean = False
     Public Property LogErrorsOnly As Boolean = True
+    Public Property WindreamSearchMaximized As Boolean = False
 End Class

Global_Indexer/ClassControls.vb

@@ -48,7 +48,8 @@ Public Class ClassControls
 
             Return chk
         Catch ex As Exception
-            ClassLogger.Add("Unhandled Exception in AddCheckBox: " & ex.Message, True)
+            LOGGER.Info("Unhandled Exception in AddCheckBox: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return Nothing
         End Try
     End Function
@@ -74,21 +75,35 @@ Public Class ClassControls
                 }
             }
 
+            If Not String.IsNullOrEmpty(Vorgabe) Then
+                Dim oDefaultValues = Vorgabe.
+                    Split(",").ToList().
+                    Select(Function(item) item.Trim()).
+                    ToList()
+                oControl.SelectedValues = oDefaultValues
+            End If
+
             AddHandler oControl.SelectedValuesChanged, AddressOf Lookup_SelectedValuesChanged
 
             oConnectionString = ClassFormFunctions.GetConnectionString(conid)
+
             If oConnectionString IsNot Nothing Then
+                LOGGER.Debug("Connection String (redacted): [{0}]", oConnectionString.Substring(0, 30))
+
                 If ClassPatterns.HasComplexPatterns(oSql) Then
                     LOGGER.Debug(" >>sql enthält Platzhalter und wird erst während der Laufzeit gefüllt!", False)
                 Else
                     Dim oDatatable = ClassDatabase.Return_Datatable_Combined(oSql, oConnectionString, False)
                     oControl.DataSource = oDatatable
                 End If
+            Else
+                LOGGER.Warn("Connection String for control [{0}] is empty!", oControl.Name)
             End If
 
             Return oControl
         Catch ex As Exception
-            ClassLogger.Add(" - Unvorhergesehener Unexpected error in AddVorschlag_ComboBox - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Info(" - Unvorhergesehener Unexpected error in AddVorschlag_ComboBox - Indexname: " & indexname & " - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Unexpected error in AddVorschlag_ComboBox:")
             Return Nothing
         End Try
@@ -265,20 +280,21 @@ Public Class ClassControls
                 Next
             End If
         Catch ex As Exception
-            ClassLogger.Add(" - Unvorhergesehener Unexpected error in Renew_ComboboxResults - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Info(" - Unvorhergesehener Unexpected error in Renew_ComboboxResults - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Unvorhergesehener Unexpected error in Renew_ComboboxResults:")
         End Try
     End Sub
 
     Public Function AddTextBox(indexname As String, y As Integer, text As String, DataType As String) As TextBox
-        Dim txt As New TextBox
-        txt.Name = "txt" & indexname
-
-        txt.Size = New Size(260, 27)
-        txt.Location = New Point(11, y)
-        txt.Tag = New ControlMeta() With {
-            .IndexName = indexname,
-            .IndexType = DataType
+        Dim txt As New TextBox With {
+            .Name = "txt" & indexname,
+            .Size = New Size(260, 27),
+            .Location = New Point(11, y),
+            .Tag = New ControlMeta() With {
+                .IndexName = indexname,
+                .IndexType = DataType
+            }
         }
 
         If text <> "" Then
@@ -327,6 +343,27 @@ Public Class ClassControls
         End If
     End Sub
 
+
+    Public Function AddDateTimePicker(indexname As String, y As Integer, DataType As String)
+        Dim dtp As New DateTimePicker With {
+            .Name = "dtp" & indexname,
+            .Format = DateTimePickerFormat.Short,
+            .Size = New Size(133, 27),
+            .Location = New Point(11, y),
+            .Tag = New ControlMeta() With {
+                .IndexName = indexname,
+                .IndexType = DataType
+            }
+        }
+
+        AddHandler dtp.ValueChanged, AddressOf OndtpChanged
+
+        Return dtp
+    End Function
+    Sub OndtpChanged()
+        'offen was hier zu tun ist
+    End Sub
+
     Private Sub PrepareDependingControl(Control As Control)
         If TypeOf Control Is Label Then
             Exit Sub
@@ -339,6 +376,8 @@ Public Class ClassControls
             Dim oDatatable As DataTable = ClassDatabase.Return_Datatable(oSQL)
 
             If Not IsNothing(oDatatable) Then
+                LOGGER.Debug("Found [{0}] depending controls for [{1}]", oDatatable.Rows.Count, Control.Name)
+
                 For Each oRow As DataRow In oDatatable.Rows
                     Dim oControlName As String = NotNull(oRow.Item("NAME"), "")
                     Dim oConnectionId As Integer = NotNull(oRow.Item("CONNECTION_ID"), -1)
@@ -353,9 +392,11 @@ Public Class ClassControls
                     oControlSql = ClassPatterns.ReplaceInternalValues(oControlSql)
                     oControlSql = ClassPatterns.ReplaceControlValues(oControlSql, Panel)
 
+
+                    LOGGER.Debug("SQL After Preparing: [{0}]", oControlSql)
+                    LOGGER.Debug("Setting new value for [{0}]", oControlName)
                     SetDependingControlResult(oControlName, oControlSql, oConnectionId)
                 Next
-
             End If
         Catch ex As Exception
             LOGGER.Error(ex)
@@ -364,6 +405,11 @@ Public Class ClassControls
 
     Private Sub SetDependingControlResult(IndexName As String, SqlCommand As String, SqlConnectionId As Integer)
         Try
+            If SqlCommand Is Nothing OrElse SqlCommand = String.Empty Then
+                LOGGER.Warn("New Value for Index [{0}] could not be set. Supplied SQL is empty.")
+                Exit Sub
+            End If
+
             Dim oConnectionString = ClassFormFunctions.GetConnectionString(SqlConnectionId)
             Dim oDatatable As DataTable = ClassDatabase.Return_Datatable_CS(SqlCommand, oConnectionString)
             Dim oFoundControl As Control = Nothing
@@ -382,14 +428,31 @@ Public Class ClassControls
                 End If
             Next
 
-            If oFoundControl IsNot Nothing Then
-                If TypeOf oFoundControl Is TextBox Then
-                    DirectCast(oFoundControl, TextBox).Text = oDatatable.Rows.Item(0).Item(0)
-                ElseIf TypeOf oFoundControl Is LookupControl2 Then
-                    DirectCast(oFoundControl, LookupControl2).DataSource = oDatatable
-                ElseIf TypeOf oFoundControl Is ComboBox Then
-                    DirectCast(oFoundControl, ComboBox).DataSource = oDatatable
+            If oFoundControl Is Nothing Then
+                LOGGER.Warn("Depending Control for Index [{0}] not found!", IndexName)
+            End If
+
+            If oDatatable Is Nothing Then
+                LOGGER.Warn("Error in SQL Command: {0}", SqlCommand)
+            End If
+
+            If TypeOf oFoundControl Is TextBox Then
+                If oDatatable.Rows.Count > 0 Then
+                    Dim oFirstRow As DataRow = oDatatable.Rows.Item(0)
+
+                    If oFirstRow.ItemArray.Length > 0 Then
+                        Dim oValue = oFirstRow.Item(0).ToString()
+
+                        LOGGER.Debug("Setting Value for control [{0}]: [{1}]", oFoundControl.Name, oValue)
+                        DirectCast(oFoundControl, TextBox).Text = oValue
+                    End If
                 End If
+            ElseIf TypeOf oFoundControl Is LookupControl2 Then
+                LOGGER.Debug("Setting Value for control [{0}]: [{1}]", oFoundControl.Name, "DATATABLE")
+                DirectCast(oFoundControl, LookupControl2).DataSource = oDatatable
+            ElseIf TypeOf oFoundControl Is ComboBox Then
+                LOGGER.Debug("Setting Value for control [{0}]: [{1}]", oFoundControl.Name, "DATATABLE")
+                DirectCast(oFoundControl, ComboBox).DataSource = oDatatable
             End If
         Catch ex As Exception
             LOGGER.Error(ex)

Global_Indexer/ClassDatabase.vb

@@ -17,7 +17,8 @@ Public Class ClassDatabase
             SQLconnect.Close()
             Return True
         Catch ex As Exception
-            ClassLogger.Add("Unexpected error in Database-Init: " & ex.Message, True)
+            LOGGER.Info("Unexpected error in Database-Init: " & ex.Message)
+            LOGGER.Error(ex.Message)
             Return False
         End Try
     End Function
@@ -47,11 +48,11 @@ Public Class ClassDatabase
                         '    Dim conn As New OdbcConnection("dsn=" & DTConnection.Rows(0).Item("SERVER") & ";uid=" & DTConnection.Rows(0).Item("USERNAME") & ";pwd=" + DTConnection.Rows(0).Item("PASSWORD"))
                         '    connectionString = conn.ConnectionString
                     Case Else
-                        LOGGER.Info(" - ConnectionType nicht integriert", False)
+                        LOGGER.Info(" - ConnectionType nicht integriert")
                         MsgBox("ConnectionType nicht integriert", MsgBoxStyle.Critical, "Bitte Konfiguration Connection überprüfen!")
                 End Select
             Else
-                LOGGER.Info(" No entry for Connection-ID: " & id.ToString, True)
+                LOGGER.Info(" No entry for Connection-ID: " & id.ToString)
             End If
 
         Catch ex As Exception
@@ -64,13 +65,13 @@ Public Class ClassDatabase
 
     Public Shared Function Return_Datatable_Combined(SqlCommand As String, ConnectionString As String, Optional userInput As Boolean = False)
         If ConnectionString.Contains("Initial Catalog=") Then
-            Return Return_Datatable(SqlCommand, userInput)
+            Return Return_Datatable_CS(SqlCommand, ConnectionString, userInput)
         Else
             Return Oracle_Return_Datatable(SqlCommand, ConnectionString, userInput)
         End If
     End Function
 
-    Public Shared Function Return_Datatable(sql_command As String, Optional userInput As Boolean = False)
+    Public Shared Function Return_Datatable(sql_command As String, Optional userInput As Boolean = False) As DataTable
         Try
             Dim SQLconnect As New SqlConnection
             Dim SQLcommand As SqlCommand
@@ -94,17 +95,17 @@ Public Class ClassDatabase
                 If userInput = True Then
                     MsgBox("Error in Return_Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
                 End If
-                ClassLogger.Add("Unexpected error in Return_Datatable: " & ex.Message, True)
-                ClassLogger.Add("#SQL: " & sql_command, False)
+                LOGGER.Info("Unexpected error in Return_Datatable: " & ex.Message)
+                LOGGER.Info("#SQL: " & sql_command)
             End If
 
-            Return False
+            Return Nothing
         Catch ex As Exception
             If userInput = True Then
                 MsgBox("Error in Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
             End If
-            ClassLogger.Add("Unexpected error in Return_Datatable: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & sql_command, False)
+            LOGGER.Info("Unexpected error in Return_Datatable: " & ex.Message)
+            LOGGER.Info("#SQL: " & sql_command)
             Return Nothing
         End Try
     End Function
@@ -133,8 +134,8 @@ Public Class ClassDatabase
                 If userInput = True Then
                     MsgBox("Error in Return_Datatable_CS - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
                 End If
-                ClassLogger.Add("Unexpected error in Return_Datatable_CS: " & ex.Message, True)
-                ClassLogger.Add("#SQL: " & sql_command, False)
+                LOGGER.Info("Unexpected error in Return_Datatable_CS: " & ex.Message)
+                LOGGER.Info("#SQL: " & sql_command)
             End If
 
             Return False
@@ -142,12 +143,12 @@ Public Class ClassDatabase
             If userInput = True Then
                 MsgBox("Error in Return_Datatable_CS - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
             End If
-            ClassLogger.Add("Unexpected error in Return_Datatable_CS: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & sql_command, False)
+            LOGGER.Info("Unexpected error in Return_Datatable_CS: " & ex.Message)
+            LOGGER.Info("#SQL: " & sql_command)
             Return Nothing
         End Try
     End Function
-    Public Shared Function Execute_non_Query(sql_command As String, Optional userInput As Boolean = False)
+    Public Shared Function Execute_non_Query(sql_command As String, Optional userInput As Boolean = False) As Boolean
         Try
             Dim SQLconnect As New SqlConnection
             Dim SQLcommand As SqlCommand
@@ -171,8 +172,8 @@ Public Class ClassDatabase
                 If userInput = True Then
                     MsgBox("Error in Execute non query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
                 End If
-                ClassLogger.Add("Unexpected error in Execute_non_Query: " & ex.Message, True)
-                ClassLogger.Add("#SQL: " & sql_command, False)
+                LOGGER.Info("Unexpected error in Execute_non_Query: " & ex.Message)
+                LOGGER.Info("#SQL: " & sql_command)
             End If
 
             Return False
@@ -180,8 +181,8 @@ Public Class ClassDatabase
             If userInput = True Then
                 MsgBox("Error in Execute non query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
             End If
-            ClassLogger.Add("Unexpected error in Execute_non_Query: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & sql_command, False)
+            LOGGER.Info("Unexpected error in Execute_non_Query: " & ex.Message)
+            LOGGER.Info("#SQL: " & sql_command)
 
             Return False
         End Try
@@ -211,8 +212,8 @@ Public Class ClassDatabase
                 If userInput = True Then
                     MsgBox("Error in Execute non query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
                 End If
-                ClassLogger.Add("Unexpected error in Execute_non_Query: " & ex.Message, True)
-                ClassLogger.Add("#SQL: " & sql_command, False)
+                LOGGER.Info("Unexpected error in Execute_non_Query: " & ex.Message)
+                LOGGER.Info("#SQL: " & sql_command)
             End If
 
             Return False
@@ -220,8 +221,8 @@ Public Class ClassDatabase
             If userInput = True Then
                 MsgBox("Error in Execute Scalar - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & sql_command, MsgBoxStyle.Critical)
             End If
-            ClassLogger.Add("Unexpected error in Execute_Scalar: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & sql_command, False)
+            LOGGER.Info("Unexpected error in Execute_Scalar: " & ex.Message)
+            LOGGER.Info("#SQL: " & sql_command)
             Return Nothing
         End Try
     End Function
@@ -240,8 +241,9 @@ Public Class ClassDatabase
             SQLconnect.Close()
             Return result
         Catch ex As Exception
-            ClassLogger.Add("Unexpected error in OracleExecute_Scalar: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & cmdscalar, False)
+            LOGGER.Info("Unexpected error in OracleExecute_Scalar: " & ex.Message)
+            LOGGER.Error(ex.Message)
+            LOGGER.Info("#SQL: " & cmdscalar)
             Return Nothing
         End Try
     End Function
@@ -262,8 +264,8 @@ Public Class ClassDatabase
             If userInput = True Then
                 MsgBox("Error in OracleExecute_non_Query - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & ExecuteCMD, MsgBoxStyle.Critical)
             End If
-            ClassLogger.Add("Unexpected error in OracleExecute_non_Query: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & ExecuteCMD, False)
+            LOGGER.Info("Unexpected error in OracleExecute_non_Query: " & ex.Message)
+            LOGGER.Info("#SQL: " & ExecuteCMD)
 
             Return False
         End Try
@@ -287,8 +289,8 @@ Public Class ClassDatabase
             If userInput = True Then
                 MsgBox("Error in Oracle Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical)
             End If
-            ClassLogger.Add("Unexpected error in Oracle_Return_Datatable: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & Select_anweisung, False)
+            LOGGER.Info("Unexpected error in Oracle_Return_Datatable: " & ex.Message)
+            LOGGER.Info("#SQL: " & Select_anweisung)
             Return Nothing
         End Try
     End Function
@@ -299,8 +301,8 @@ Public Class ClassDatabase
         If FatalErrors.Contains(ex.Number) Then
             DatabaseConnectionTimeout = True
 
-            ClassLogger.Add("Network timeout error in Return_Datatable: " & ex.Message, True)
-            ClassLogger.Add("#SQL: " & sql_command, False)
+            LOGGER.Info("Network timeout error in Return_Datatable: " & ex.Message)
+            LOGGER.Info("#SQL: " & sql_command)
 
             Return True
         Else

Global_Indexer/ClassDatatables.vb

@@ -0,0 +1,139 @@
+Public Class ClassDatatables
+
+#Region "TBDD_GROUP"
+    Public Shared Function AddGroupToProfile(GroupId As Integer, ProfileId As Integer) As Boolean
+        Try
+            Dim oSQL = $"
+                INSERT INTO TBDD_USRGRP_DOKTYPE 
+                (DOCTYPE_ID, GROUP_ID, ADDED_WHO)
+                VALUES ({ProfileId}, {GroupId}, '{Environment.UserName}')
+            "
+            Return ClassDatabase.Execute_non_Query(oSQL, True)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    Public Shared Function RemoveGroupFromProfile(GroupId As Integer, ProfileId As Integer) As Boolean
+        Try
+            Dim oSQL = $"DELETE FROM TBDD_USRGRP_DOKTYPE WHERE DOCTYPE_ID = {ProfileId} AND GROUP_ID = {GroupId}"
+            Return ClassDatabase.Execute_non_Query(oSQL, True)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    Public Shared Function GetAssignedGroups(ProfileId As Integer) As DataTable
+        Try
+            Dim oSQL As String = $"
+                SELECT GUID, NAME FROM TBDD_GROUPS
+                WHERE GUID IN
+	            (
+		            SELECT        GROUP_ID
+		            FROM          TBDD_USRGRP_DOKTYPE
+		            WHERE         DOCTYPE_ID = {ProfileId}
+	            )
+            "
+            Dim oDatatable As DataTable = ClassDatabase.Return_Datatable(oSQL)
+
+            Return oDatatable
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+
+    Public Shared Function GetAvailableGroups(ProfileId As Integer) As DataTable
+        Try
+            Dim oSQL As String = $"
+                SELECT GUID, NAME FROM TBDD_GROUPS
+                WHERE GUID NOT IN
+	            (
+		            SELECT        GROUP_ID
+		            FROM          TBDD_USRGRP_DOKTYPE
+		            WHERE         DOCTYPE_ID = {ProfileId}
+	            )
+            "
+            Dim oDatatable As DataTable = ClassDatabase.Return_Datatable(oSQL)
+
+            Return oDatatable
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+#End Region
+
+#Region "TBDD_USER"
+
+    Public Shared Function AddUserToProfile(UserId As Integer, ProfileId As Integer) As Boolean
+        Try
+            Dim oSQL = $"
+                INSERT INTO TBDD_USER_DOKTYPE 
+                (DOCTYPE_ID, USER_ID, ADDED_WHO)
+                VALUES ({ProfileId}, {UserId}, '{Environment.UserName}')
+            "
+            Return ClassDatabase.Execute_non_Query(oSQL, True)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    Public Shared Function RemoveUserFromProfile(UserId As Integer, ProfileId As Integer) As Boolean
+        Try
+            Dim oSQL = $"DELETE FROM TBDD_USER_DOKTYPE WHERE DOCTYPE_ID = {ProfileId} AND USER_ID = {UserId}"
+            Return ClassDatabase.Execute_non_Query(oSQL, True)
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return False
+        End Try
+    End Function
+
+    Public Shared Function GetAssignedUsers(ProfileId As Integer) As DataTable
+        Try
+            Dim oSQL As String = $"
+                SELECT GUID, EMAIL, NAME + ', ' + PRENAME AS NAME FROM TBDD_USER
+                WHERE GUID IN (
+		                SELECT        USER_ID
+		                FROM          TBDD_USER_DOKTYPE
+		                WHERE         DOCTYPE_ID = {ProfileId}
+                )
+            "
+            Dim oDatatable As DataTable = ClassDatabase.Return_Datatable(oSQL)
+
+            Return oDatatable
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+
+    Public Shared Function GetAvailableUsers(ProfileId As Integer) As DataTable
+        Try
+            Dim oSQL As String = $"
+                SELECT GUID, EMAIL, NAME + ', ' + PRENAME AS NAME FROM TBDD_USER
+                WHERE GUID NOT IN (
+		                SELECT        USER_ID
+		                FROM          TBDD_USER_DOKTYPE
+		                WHERE         DOCTYPE_ID = {ProfileId}
+	                )
+                AND GUID IN (SELECT USER_ID FROM [dbo].[FNDD_GET_USER_FOR_MODULE] ('GLOBIX', 1))
+            "
+            Dim oDatatable As DataTable = ClassDatabase.Return_Datatable(oSQL)
+
+            Return oDatatable
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+#End Region
+
+
+
+
+
+End Class

Global_Indexer/ClassDragDrop.vb

@@ -1,135 +1,93 @@
-Imports System.IO
-Imports Microsoft.Office.Interop
+Imports DevExpress.XtraGrid
+Imports DevExpress.XtraGrid.Views.Grid
+Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
+
 Public Class ClassDragDrop
-    Public Shared files_dropped As String()
-    Public Shared Function Drop_File(e As DragEventArgs)
+    Private downHitInfo As GridHitInfo = Nothing
+
+    Public Sub New()
+    End Sub
+
+    Public Sub AddGridView(view As GridView)
+        AddHandler view.MouseDown, AddressOf view_MouseDown
+        AddHandler view.MouseMove, AddressOf view_MouseMove
+        AddHandler view.GridControl.DragOver, AddressOf grid_DragOver
+    End Sub
+
+    Private Sub view_MouseDown(sender As Object, e As MouseEventArgs)
+        Dim view As GridView = sender
+        downHitInfo = Nothing
+        Dim hitInfo As GridHitInfo = view.CalcHitInfo(New Point(e.X, e.Y))
+
+        If Control.ModifierKeys <> Keys.None Then
+            Return
+        End If
+
+        If e.Button = MouseButtons.Left And hitInfo.RowHandle >= 0 Then
+            downHitInfo = hitInfo
+        End If
+    End Sub
+
+    Private Sub view_MouseMove(sender As Object, e As MouseEventArgs)
         Try
-            ClassLogger.Add(">> Drop_File", False)
-            files_dropped = Nothing
-            If e.Data.GetDataPresent(DataFormats.FileDrop) Then
-                Dim MyFiles() As String
-                Dim i As Integer
-                ' Assign the files to an array. 
-                MyFiles = e.Data.GetData(DataFormats.FileDrop)
-                ' Loop through the array and add the files to the list. 
-                For i = 0 To MyFiles.Length - 1
-                    ClassLogger.Add(">> Simple FileDrop - File: " & MyFiles(i), False)
-                    ReDim Preserve files_dropped(i)
-                    files_dropped(i) = "|DROPFROMFSYSTEM|" & MyFiles(i)
-                    ' ListBox1.Items.Add(MyFiles(i))
-                Next
-                Return True
-            ElseIf (e.Data.GetDataPresent("FileGroupDescriptor")) AndAlso (e.Data.GetDataPresent("FileContents")) Then
-                '// the first step here is to get the stbFileName
-                '// of the attachment and
-                '// build a full-path name so we can store it
-                '// in the temporary folder
-                '//
-                '// set up to obtain the aryFileGroupDescriptor
-                '// and extract the file name                
-                Dim stmInput As IO.Stream = CType(e.Data.GetData("FileGroupDescriptor"), IO.Stream)
-                Dim aryFileGroupDescriptor(512) As Byte ' = new byte[512]
-                stmInput.Read(aryFileGroupDescriptor, 0, 512)
-                '// used to build the stbFileName from the aryFileGroupDescriptor block
-                Dim stbFileName As System.Text.StringBuilder = New System.Text.StringBuilder("")
-                '// this trick gets the stbFileName of the passed attached file
-                Dim intCnt As Integer = 76
-                Do While aryFileGroupDescriptor(intCnt) <> 0
-                    stbFileName.Append(Convert.ToChar(aryFileGroupDescriptor(intCnt), System.Globalization.CultureInfo.CreateSpecificCulture("de-DE")))
-                    intCnt += 1
-                Loop
-                stmInput.Close()
-                'Sonderzeichen entfernen
-                Dim Tempfilename = ClassFilehandle.InvalidCharacters(stbFileName.ToString)
-                Dim anhaenge = e.Data.GetDataPresent("FileContents")
-                'Dim path As String = "C:\VBProjekte\Dateien"
-                '// put the zip file into the temp directory
-                Dim strOutFile As String = Path.GetTempPath() & Tempfilename
-                '// create the full-path name
-                '//
-                '// Second step:  we have the file name. 
-                '// Now we need to get the actual raw
-                '// data for the attached file and copy it to disk so we work on it.
-                '//
-                '// get the actual raw file into memory
-                Dim msInput As IO.MemoryStream = CType(e.Data.GetData("FileContents", True), IO.MemoryStream) 'This returns nothing for an Email
-                If msInput Is Nothing = False Then
-                    '// allocate enough bytes to hold the raw date
-                    Dim aryFileBytes(CType(msInput.Length, Int32)) As Byte
-                    '// set starting position at first byte and read in the raw data
-                    msInput.Position = 0
-                    msInput.Read(aryFileBytes, 0, CType(msInput.Length, Int32))
-                    '// create a file and save the raw zip file to it
-                    Dim fsOutput As IO.FileStream = New IO.FileStream(strOutFile, IO.FileMode.Create) ';
-                    fsOutput.Write(aryFileBytes, 0, aryFileBytes.Length)
-                    fsOutput.Close() ' // close the file
-                    Dim resultVersion = ClassFilehandle.Versionierung_Datei(strOutFile)
-                    If resultVersion <> "" Then
-                        strOutFile = resultVersion
+            Dim view As GridView = sender
+            Dim hitInfo As GridHitInfo = view.CalcHitInfo(New Point(e.X, e.Y))
+
+            If e.Button = MouseButtons.Left And Not IsNothing(downHitInfo) Then
+                Dim dragSize As Size = SystemInformation.DragSize
+                Dim dragRect As New Rectangle(New Point(downHitInfo.HitPoint.X - dragSize.Width / 2, downHitInfo.HitPoint.Y - dragSize.Height / 2), dragSize)
+
+                ' DragRect ist ein kleines Rechteck, dessen Mitte der Punkt ist, wo die Maus geklickt wurde.
+                ' Es soll verhindern, dass durch schnelles Klicken unbeabsichtigt Drag'n'Drop Operationen initiiert werden
+                ' Siehe: https://msdn.microsoft.com/en-us/library/system.windows.forms.systeminformation.dragsize(v=vs.110).aspx
+                If Not dragRect.Contains(New Point(e.X, e.Y)) Then
+                    ' dragDropData enhält eine einzelne Row oder den kompletten View,
+                    ' jenachdem, wie die Drag'n'Drop Operation gestartet wurde.
+                    Dim dragDropData As String
+
+                    ' Wenn keine Zeile markiert ist
+                    If downHitInfo.RowHandle < 0 Then
+                        Exit Sub
                     End If
-                    Dim finTemp As IO.FileInfo = New IO.FileInfo(strOutFile)
-                    '// always good to make sure we actually created the file
-                    If (finTemp.Exists = True) Then
-                        ReDim Preserve files_dropped(0)
-                        files_dropped(0) = "|OUTLOOK_ATTACHMENT|" & strOutFile
-                        If LogErrorsOnly = False Then ClassLogger.Add(">> Drop an Attachment - File: " & strOutFile, False)
-                        Return True
-                    Else
-                        ClassLogger.Add(">> Attachment File from Outlook could not be created", False)
+
+                    ' Wenn zwar eine Zeile markiert ist, aber keine über die Checkbox angehakt wurde,
+                    ' wird die markierte Zeile übergeben.
+                    ' Wenn 1 oder n Zeilen über die Checkbox angehakt wurde, werden diese übergeben
+                    Dim row As DataRow = view.GetDataRow(downHitInfo.RowHandle)
+                    Dim source As String = view.GridControl.Name
+
+                    If Not IsNothing(row) Then
+                        Try
+                            dragDropData = row.Item("GUID") & "|" & source
+
+                            view.GridControl.DoDragDrop(dragDropData, DragDropEffects.Move)
+                            downHitInfo = Nothing
+
+                            DevExpress.Utils.DXMouseEventArgs.GetMouseArgs(e).Handled = True
+                        Catch ex As Exception
+                            LOGGER.Error(ex)
+                        End Try
                     End If
                 End If
             End If
-            If e.Data.GetDataPresent("FileGroupDescriptor") Then
-                Dim oApp
-                Try
-                    oApp = New Outlook.Application()
-                Catch ex As Exception
-                    MsgBox("Unexpected error in Initialisieren von Outlook-API:" & vbNewLine & ex.Message & vbNewLine & vbNewLine & "Evtl ist Outlook nicht in der dafür vorgesehenen For")
-                End Try
-
-                ClassLogger.Add(">> Drop of msg", False)
-                'supports a drop of a Outlook message 
-                Dim myobj As Object
-                For i As Integer = 1 To oApp.ActiveExplorer.Selection.Count
-                    myobj = oApp.ActiveExplorer.Selection.Item(i)
-                    Dim subj As String = myobj.Subject
-                    If subj = "" Then
-                        subj = "NO_SUBJECT"
-                    End If
-                    If subj.Contains("\") Then
-                        subj = subj.Replace("\", "-")
-                    End If
-                    If subj.Contains("/") Then
-                        subj = subj.Replace("/", "-")
-                    End If
-                    'Sonderzeichen entfernen
-                    subj = ClassFilehandle.InvalidCharacters(subj)
-                    'hardcode a destination path for testing
-                    Dim strFile As String = IO.Path.Combine(Path.GetTempPath, subj + ".msg")
-                    strFile = strFile.Replace("?", "")
-                    strFile = strFile.Replace("!", "")
-                    strFile = strFile.Replace("%", "")
-                    strFile = strFile.Replace("$", "")
-                    ClassLogger.Add(">> Drop of msg - File:" & strFile, False)
-                    Try
-                        myobj.SaveAs(strFile)
-                    Catch ex As Exception
-                        MsgBox("Error in Save Email2Tempfile" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-                        Return False
-                    End Try
-
-                    ReDim Preserve files_dropped(i)
-                    files_dropped(i) = "|OUTLOOK_MESSAGE|" & strFile
-                Next
-                Return True
-                'Drop eines Outlook Attachments
-            End If
         Catch ex As Exception
-            MsgBox("Error in Drop-File" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            Return False
+            LOGGER.Error(ex)
+            MsgBox("Error in view_MouseMove: " & ex.Message, MsgBoxStyle.Critical)
         End Try
-        
+    End Sub
 
-    End Function
-   
+    Private Sub grid_DragOver(sender As Object, e As DragEventArgs)
+        If e.Data.GetDataPresent(DataFormats.Text) Then
+            Dim data As String = e.Data.GetData(DataFormats.Text)
+            Dim source = data.Split("|")(1)
+
+            Dim grid As GridControl = sender
+
+            If grid.Name <> source Then
+                e.Effect = DragDropEffects.Move
+            End If
+        Else
+            e.Effect = DragDropEffects.None
+        End If
+    End Sub
 End Class

Global_Indexer/ClassEmail.vb

@@ -14,9 +14,9 @@ Public Class ClassEmail
             'Für jeden Empfänger eine Neue Mail erzeugen
             For Each _mailempfaenger As String In empfaenger
                 ' Neue Nachricht erzeugen: 
-                Dim message As New MailMessage(emailfrom, _mailempfaenger, vBetreff & " - Domain: " & Environment.UserDomainName, _
-                                               "<font face=""Arial"">" & vBody & "<br>>> Version: " & My.Application.Info.Version.ToString & "<br>>> Maschine: " & Environment.MachineName & "<br>" & "<br>>> Domain-Name: " & Environment.UserDomainName & "<br>" & _
-                                               "<br>>> Gesendet am: " & My.Computer.Clock.LocalTime.ToShortDateString & " " & _
+                Dim message As New MailMessage(emailfrom, _mailempfaenger, vBetreff & " - Domain: " & Environment.UserDomainName,
+                                               "<font face=""Arial"">" & vBody & "<br>>> Version: " & My.Application.Info.Version.ToString & "<br>>> Maschine: " & Environment.MachineName & "<br>" & "<br>>> Domain-Name: " & Environment.UserDomainName & "<br>" &
+                                               "<br>>> Gesendet am: " & My.Computer.Clock.LocalTime.ToShortDateString & " " &
                                                My.Computer.Clock.LocalTime.ToLongTimeString & "</font>")
                 If test = False Then
                     If Log = True Then
@@ -39,7 +39,7 @@ Public Class ClassEmail
                 'Einen SMTP Client erzeugen und Anmeldungsinformationen hinterlegen
                 Dim emailClient As New SmtpClient(emailsmtp)
                 'Email mit Authentifizierung
-                Dim SMTPUserInfo As New System.Net.NetworkCredential(emailuser, emailpw) ', My.Settings.vDomain)
+                Dim SMTPUserInfo As New System.Net.NetworkCredential(emailuser, emailpw)
                 emailClient.UseDefaultCredentials = False
                 emailClient.Credentials = SMTPUserInfo
                 emailClient.Port = 25
@@ -61,11 +61,12 @@ Public Class ClassEmail
                         MsgBox("Support-Email sucessfully sent!", MsgBoxStyle.Information, "Success:")
                     End If
                 End If
-                'ClassLogger.Add(">> Support/Log Email erfolgreich an " & _mailempfaenger & " versendet!", False)
+                'LOGGER.Info(">> Support/Log Email erfolgreich an " & _mailempfaenger & " versendet!")
             Next
             Return True
         Catch ex As Exception
-            ClassLogger.Add("### Fehler im Mailversand: " & ex.Message)
+            LOGGER.Info("### Fehler im Mailversand: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return False
         End Try
     End Function

Global_Indexer/ClassFileDrop.vb

@@ -0,0 +1,284 @@
+Imports System.IO
+Imports Microsoft.Office.Interop
+
+
+
+Public Class ClassFileDrop
+    Public Shared files_dropped As String()
+
+    ' Tobit David Drag Drop: https://www.david-forum.de/thread/12671-drag-and-drop-von-faxen-und-mails-in-net-anwendung/
+    'Private Declare Function DVEmlFromMailItem Lib "DvApi32" (ByVal oMailItem As MailItem, ByVal strFileName As String) As Long
+
+    Public Shared Function Drop_File(e As DragEventArgs)
+        Try
+            LOGGER.Info("Available Drop Formats:")
+
+            For Each oFormat As String In e.Data.GetFormats()
+                LOGGER.Info(oFormat)
+            Next
+
+            LOGGER.Info(">> Drop_File")
+            files_dropped = Nothing
+            If e.Data.GetDataPresent(DataFormats.FileDrop) Then
+                Dim MyFiles() As String
+                Dim i As Integer
+                ' Assign the files to an array. 
+                MyFiles = e.Data.GetData(DataFormats.FileDrop)
+                ' Loop through the array and add the files to the list. 
+                For i = 0 To MyFiles.Length - 1
+                    LOGGER.Info(">> Simple FileDrop - File: " & MyFiles(i))
+                    ReDim Preserve files_dropped(i)
+                    files_dropped(i) = "|DROPFROMFSYSTEM|" & MyFiles(i)
+                    ' ListBox1.Items.Add(MyFiles(i))
+                Next
+                Return True
+            ElseIf (e.Data.GetDataPresent("FileGroupDescriptor")) AndAlso (e.Data.GetDataPresent("FileContents")) Then
+                '// the first step here is to get the stbFileName
+                '// of the attachment and
+                '// build a full-path name so we can store it
+                '// in the temporary folder
+                '//
+                '// set up to obtain the aryFileGroupDescriptor
+                '// and extract the file name                
+                Dim stmInput As IO.Stream = CType(e.Data.GetData("FileGroupDescriptor"), IO.Stream)
+                Dim aryFileGroupDescriptor(512) As Byte ' = new byte[512]
+                stmInput.Read(aryFileGroupDescriptor, 0, 512)
+                '// used to build the stbFileName from the aryFileGroupDescriptor block
+                Dim stbFileName As System.Text.StringBuilder = New System.Text.StringBuilder("")
+                '// this trick gets the stbFileName of the passed attached file
+                Dim intCnt As Integer = 76
+                Do While aryFileGroupDescriptor(intCnt) <> 0
+                    stbFileName.Append(Convert.ToChar(aryFileGroupDescriptor(intCnt), System.Globalization.CultureInfo.CreateSpecificCulture("de-DE")))
+                    intCnt += 1
+                Loop
+                stmInput.Close()
+                'Sonderzeichen entfernen
+                Dim Tempfilename = ClassFilehandle.InvalidCharacters(stbFileName.ToString)
+                Dim anhaenge = e.Data.GetDataPresent("FileContents")
+                'Dim path As String = "C:\VBProjekte\Dateien"
+                '// put the zip file into the temp directory
+                Dim strOutFile As String = Path.GetTempPath() & Tempfilename
+                '// create the full-path name
+                '//
+                '// Second step:  we have the file name. 
+                '// Now we need to get the actual raw
+                '// data for the attached file and copy it to disk so we work on it.
+                '//
+                '// get the actual raw file into memory
+                Dim msInput As IO.MemoryStream = CType(e.Data.GetData("FileContents", True), IO.MemoryStream) 'This returns nothing for an Email
+                If msInput Is Nothing = False Then
+                    '// allocate enough bytes to hold the raw date
+                    Dim aryFileBytes(CType(msInput.Length, Int32)) As Byte
+                    '// set starting position at first byte and read in the raw data
+                    msInput.Position = 0
+                    msInput.Read(aryFileBytes, 0, CType(msInput.Length, Int32))
+                    '// create a file and save the raw zip file to it
+                    Dim fsOutput As IO.FileStream = New IO.FileStream(strOutFile, IO.FileMode.Create) ';
+                    fsOutput.Write(aryFileBytes, 0, aryFileBytes.Length)
+                    fsOutput.Close() ' // close the file
+                    Dim resultVersion = ClassFilehandle.Versionierung_Datei(strOutFile)
+                    If resultVersion <> "" Then
+                        strOutFile = resultVersion
+                    End If
+                    Dim finTemp As IO.FileInfo = New IO.FileInfo(strOutFile)
+                    '// always good to make sure we actually created the file
+                    If (finTemp.Exists = True) Then
+                        ReDim Preserve files_dropped(0)
+                        files_dropped(0) = "|OUTLOOK_ATTACHMENT|" & strOutFile
+                        LOGGER.Info(">> Drop an Attachment - File: " & strOutFile)
+                        Return True
+                    Else
+                        LOGGER.Info(">> Attachment File from Outlook could not be created")
+                    End If
+                End If
+            End If
+            If e.Data.GetDataPresent("FileGroupDescriptor") Then
+                Dim oApp
+                Try
+                    oApp = New Outlook.Application()
+                Catch ex As Exception
+                    MsgBox("Unexpected error in Initialisieren von Outlook-API:" & vbNewLine & ex.Message & vbNewLine & vbNewLine & "Evtl ist Outlook nicht in der dafür vorgesehenen For")
+                End Try
+
+                LOGGER.Info(">> Drop of msg")
+                'supports a drop of a Outlook message 
+                Dim myobj As Object
+                For i As Integer = 1 To oApp.ActiveExplorer.Selection.Count
+                    myobj = oApp.ActiveExplorer.Selection.Item(i)
+                    Dim subj As String = myobj.Subject
+                    If subj = "" Then
+                        subj = "NO_SUBJECT"
+                    End If
+                    If subj.Contains("\") Then
+                        subj = subj.Replace("\", "-")
+                    End If
+                    If subj.Contains("/") Then
+                        subj = subj.Replace("/", "-")
+                    End If
+                    'Sonderzeichen entfernen
+                    subj = ClassFilehandle.InvalidCharacters(subj)
+                    'hardcode a destination path for testing
+                    Dim strFile As String = IO.Path.Combine(Path.GetTempPath, subj + ".msg")
+                    strFile = strFile.Replace("?", "")
+                    strFile = strFile.Replace("!", "")
+                    strFile = strFile.Replace("%", "")
+                    strFile = strFile.Replace("$", "")
+                    LOGGER.Info(">> Drop of msg - File:" & strFile)
+                    Try
+                        myobj.SaveAs(strFile)
+                    Catch ex As Exception
+                        MsgBox("Error in Save Email2Tempfile" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+                        Return False
+                    End Try
+
+                    ReDim Preserve files_dropped(i)
+                    files_dropped(i) = "|OUTLOOK_MESSAGE|" & strFile
+                Next
+                Return True
+                'Drop eines Outlook Attachments
+            End If
+        Catch ex As Exception
+            MsgBox("Error in Drop-File" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            Return False
+        End Try
+
+
+    End Function
+
+    'Private Sub DragDrop_HandleTobit(e As DragEventArgs)
+    '    If e.Data.GetDataPresent("#TobitMsgData") Then
+    '        Dim Quellpfad As String = ""
+    '        Dim Dateinamen As String()
+    '        'Quellpfad zu den David Dateien auslesen            
+    '        Using ms As MemoryStream = e.Data.GetData("#TobitMsgData")
+    '            Dim bytes As Byte() = ms.ToArray()
+    '            Dim n As Integer = 0
+    '            Dim c As Char
+    '            Do While True
+    '                c = Convert.ToChar(bytes(n))
+    '                If bytes(n) <> 0 Then
+    '                    Quellpfad &= c
+    '                    n += 1
+    '                Else
+    '                    Exit Do
+    '                End If
+    '            Loop
+    '        End Using
+    '        'Dateinamen der gedroppten Emails auslesen  
+    '        Using ms As MemoryStream = e.Data.GetData("FileGroupDescriptor")
+    '            'Header sind 4B           
+    '            'Jeder Datensatz ist 332B          
+    '            'Bei Index 72 des Datensatzes beginnt das "Dateiname.eml"     
+    '            Dim bytes As Byte() = ms.ToArray()
+    '            ReDim Dateinamen(Int(bytes.Count / 332) - 1)
+    '            ' Array mit so vielen Elementen wie Datensätze im FileGroupDescriptor sind     
+    '            Dim AnzahlMails As Integer = bytes(0)
+    '            Dim Dateiname As String
+    '            Dim n As Integer
+    '            For i = 0 To AnzahlMails - 1
+    '                Dateiname = ""
+    '                n = 0
+    '                Do While True
+    '                    'Solange die Bytes auslesen, bis man einen vbNullChar liest        
+    '                    If bytes(i * 332 + 4 + 72 + n) <> 0 Then
+    '                        Dateiname = Dateiname & Convert.ToChar(bytes(i * 332 + 4 + 72 + n))
+
+    '                        n += 1
+    '                    Else
+    '                        Exit Do
+    '                    End If
+    '                Loop
+    '                Dateinamen(i) = Dateiname
+    '            Next
+    '        End Using
+    '        Using EntryDataEx As MemoryStream = e.Data.GetData("#TobitEntryDataEx")
+    '            Dim bytes As Byte() = EntryDataEx.ToArray()
+    '            'Die Größe des Headers steht im ersten Byte      
+    '            Dim HeadExSize As Integer = bytes(0)
+    '            'Die Anzahl der Datensätze steht im 8. - 11. Byte      
+    '            Dim nCountEntries As Integer = BitConverter.ToInt32(bytes, 8)
+    '            Dim nPositions(nCountEntries - 1) As Integer
+    '            For i = 0 To nCountEntries - 1
+    '                'Datensätze in der #TobitEntryDataEx sind 269 Byte groß.        
+    '                'In den ersten 4 Bytes steht die QID aus der archive.dat            
+    '                nPositions(i) = BitConverter.ToInt32(bytes, HeadExSize + i * 269)
+    '            Next
+
+    '            Using fs As New FileStream(Quellpfad & "\archive.dat", FileMode.Open, FileAccess.Read)
+
+    '                'archive.dat als MemoryStream kopieren           
+    '                Using ms As New MemoryStream
+    '                    fs.CopyTo(ms)
+    '                    'MemoryStream in ein Byte-Array konvertieren     
+    '                    Dim archiveBytes As Byte() = ms.ToArray()
+    '                    'Datensätze in der archive.dat sind 430 Byte groß         
+    '                    For i = 16 To archiveBytes.Length - 1 Step 430
+
+    '                        'Das 17.-20. Byte ist die QID die wir suchen            
+    '                        Dim QID As Integer = BitConverter.ToInt32(archiveBytes, i)
+    '                        'Wenn die QID übereinstimmt mit einer der David-Mails, dann lies den Dateinamen im Archiv aus      
+    '                        If nPositions.Contains(QID) Then
+
+    '                            'Der Index der QID (0, ..., nCountEntries - 1)          
+    '                            Dim nPosIndex As Integer = -1
+    '                            For j = 0 To nPositions.Length - 1
+    '                                If QID = nPositions(j) Then
+    '                                    nPosIndex = j
+    '                                    Exit For
+    '                                End If
+    '                            Next
+    '                            'Alle Bytes ab dem 17. bis zum Ende des Datensatzes aus der archive.bat auslesen und als String konvertieren                      
+    '                            Dim byteString As String = ""
+    '                            For j = 0 To 429 - 17
+    '                                byteString &= Convert.ToChar(archiveBytes(i + j))
+    '                            Next
+    '                            'Index der Id herausfinden (Index des Quellpfads im byteString + Länge des Quellpfads + 1 "\")         
+    '                            Dim IdIndex As Integer = byteString.IndexOf(Quellpfad, StringComparison.OrdinalIgnoreCase) + Quellpfad.Length + 1
+    '                            'Die Id sind dann die 8 Zeichen ab dem IdIndex              
+    '                            Dim Id As String = byteString.Substring(IdIndex, 8)
+    '                            'EML speichern                  
+    '                            DavidEmlSpeichern(Quellpfad, Dateinamen(nPosIndex), QID, Id)
+    '                        End If
+    '                    Next
+    '                End Using
+    '            End Using
+    '        End Using
+    '    End If
+    'End Sub
+
+    'Private Sub DavidEmlSpeichern(ArchivePfad As String, Dateiname As String, ID As String, FaxID As String)
+    '    Dim oApp As DavidAPIClass
+    '    Dim oAcc As Account
+    '    Dim oArchive As Archive
+    '    Dim oMessageItems As MessageItems
+    '    Dim oMailItem As MailItem
+    '    oApp = New DavidAPIClass()
+    '    oApp.LoginOptions = DvLoginOptions.DvLoginForceAsyncDuplicate
+    '    oAcc = oApp.Logon("DavidServer", "", "", "", "", "NOAUTH")
+    '    oArchive = oAcc.ArchiveFromID(ArchivePfad)
+    '    If FaxID.First() = "M" Then
+    '        'Faxe beginnen mit M
+    '        'Bei Faxen kann man einfach die .001 Datei kopieren und als TIF speichern
+    '        File.Copy(ArchivePfad & "\" & FaxID & ".001", "C:\Temp\" & Dateiname, True)
+    '        ListeAktualisieren()
+    '    ElseIf FaxID.First() = "I" Then
+    '        'Emails beginnen mit I
+    '        'Bei Emails muss man die DVEmlFromMailItem mit dem richtigen oMailItem aufrufen
+    '        oMessageItems = oArchive.MailItems
+    '        For Each oMailItem In oMessageItems
+    '            If oMailItem._ID = ID Then
+    '                Dim fileName As String = Space(260)
+    '                If DVEmlFromMailItem(oMailItem, fileName) <> 0 Then
+    '                    fileName = Trim(fileName)
+    '                    fileName = fileName.Substring(0, fileName.Length - 1)
+    '                    File.Copy(fileName, "C:\Temp\" & Dateiname, True)
+    '                    ListeAktualisieren()
+    '                End If
+    '                Exit For
+    '            End If
+    '        Next
+    '    End If
+    'End Sub
+
+
+End Class

Global_Indexer/ClassFilehandle.vb

@@ -1,6 +1,6 @@
 Imports System.IO
-Imports Independentsoft
 Imports System.Text.RegularExpressions
+Imports Independentsoft
 
 Public Class ClassFilehandle
     ''' <summary>
@@ -59,7 +59,7 @@ Public Class ClassFilehandle
             If Not msg.InternetMessageId Is Nothing Then
                 CURRENT_MESSAGEID = msg.InternetMessageId
             Else
-                If LogErrorsOnly = False Then ClassLogger.Add(">> Email_Decay: Es konnte keine Message-ID gelesen werden. Eine GUID wird erzeugt!", False)
+                LOGGER.Info(">> Email_Decay: Es konnte keine Message-ID gelesen werden. Eine GUID wird erzeugt!")
                 Dim sGUID As String
                 sGUID = System.Guid.NewGuid.ToString()
                 CURRENT_MESSAGEID = sGUID
@@ -67,7 +67,7 @@ Public Class ClassFilehandle
 
             'Nur die MSGDatei ablegen
             Dim tempfile As String = Path.Combine(Path.GetTempPath, Path.GetFileNameWithoutExtension(msgname) & "_excl_att.msg")
-        
+
             If File.Exists(tempfile) Then
                 File.Delete(tempfile)
             End If
@@ -83,7 +83,7 @@ Public Class ClassFilehandle
                 Dim _msg As New Msg.Message(msgname)
                 Dim i1 As Integer = 1
 
-                If LogErrorsOnly = False Then ClassLogger.Add(">> Anzahl der Attachments: " & _msg.Attachments.Count, False)
+                LOGGER.Info(">> Anzahl der Attachments: " & _msg.Attachments.Count)
                 For Each attachment As Independentsoft.Msg.Attachment In _msg.Attachments
                     If erfolgreich = False Then
                         Exit For
@@ -103,7 +103,7 @@ Public Class ClassFilehandle
                             attachment.Save(tempfile)
                             'Datei in Array zum Templöschen speichern
                             TEMP_FILES.Add(tempfile)
-                            If LogErrorsOnly = False Then ClassLogger.Add(">> Attachment (" & i1 & "):" & tempfile, False)
+                            LOGGER.Info(">> Attachment (" & i1 & "):" & tempfile)
                             'nun der Insert des Anhanges
                             erfolgreich = Insert_GI_File(tempfile, ATT_EXTR)
                             i1 += 1
@@ -143,7 +143,7 @@ Public Class ClassFilehandle
                 ' Ist ein Fehler aufgetreten, so wird nach außen hin generell
                 ' davon ausgegangen, dass die Datei in Benutzung ist (obwohl
                 ' auch andere Ursachen, etwa Rechteprobleme, möglich sind).
-                If LogErrorsOnly = False Then ClassLogger.Add(">> FileInUse Message: " & ex.Message, False)
+                LOGGER.Info(">> FileInUse Message: " & ex.Message)
                 IsFileInUse = True
             Finally
                 ' Die eventuell geöffnete Datei schließen
@@ -176,7 +176,8 @@ Public Class ClassFilehandle
             End If
             Return _NewFileString & extension
         Catch ex As Exception
-            ClassLogger.Add(" - Error in versioning file - error: " & vbNewLine & ex.Message)
+            LOGGER.Info(" - Error in versioning file - error: " & vbNewLine & ex.Message)
+            LOGGER.Error(ex.Message)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in versioning file:")
             Return ""
         End Try
@@ -189,7 +190,7 @@ Public Class ClassFilehandle
     ''' <param name="sChar">Ersatzzeichen für alle unzulässigen Zeichen 
     ''' im Dateinamen</param>
     Public Shared Function CleanFilename(ByVal sFilename As String, Optional ByVal REPLACEChar As String = "") As String
-        If LogErrorsOnly = False Then ClassLogger.Add(" >> Filename before CleanFilename: '" & sFilename & "'", False)
+        LOGGER.Info(" >> Filename before CleanFilename: '" & sFilename & "'")
         If sFilename.Contains(".\") Then
             sFilename = sFilename.Replace(".\", "\")
         End If
@@ -204,7 +205,7 @@ Public Class ClassFilehandle
         sFilename = System.Text.RegularExpressions.Regex.Replace(sFilename, "[\\/:*?""<>|\r\n]", "", System.Text.RegularExpressions.RegexOptions.Singleline)
         'Dim oCleanFileName As String = String.Join(REPLACEChar, sFilename.Split(Path.GetInvalidFileNameChars()))
         Dim oCleanFileName As New System.IO.FileInfo(System.Text.RegularExpressions.Regex.Replace(sFilename, String.Format("[{0}]", String.Join(String.Empty, Path.GetInvalidFileNameChars)), REPLACEChar))
-        If LogErrorsOnly = False Then ClassLogger.Add(" >> Filename after CleanFilename: '" & sFilename & "'", False)
+        LOGGER.Info(" >> Filename after CleanFilename: '" & sFilename & "'")
         Return sFilename
     End Function
 End Class

Global_Indexer/ClassFolderWatcher.vb

@@ -13,7 +13,7 @@ Public Class ClassFolderWatcher
                 FW_started = False
                 'FolderWatch neu instanzieren
                 FolderWatcher = New System.IO.FileSystemWatcher(CURRENT_FOLDERWATCH, "*.*")
-                ClassLogger.Add(" >> FolderWatch neu instanziert", False)
+                LOGGER.Info(" >> FolderWatch neu instanziert")
                 FolderWatcher.IncludeSubdirectories = False
                 FolderWatcher.EnableRaisingEvents = True
                 AddHandler FolderWatcher.Created, AddressOf OnCreated
@@ -23,7 +23,8 @@ Public Class ClassFolderWatcher
                 CONFIG.Save()
             End If
         Catch ex As Exception
-            ClassLogger.Add($"Error in Restart_FolderWatch: {ex.Message}", False)
+            LOGGER.Info($"Error in Restart_FolderWatch: {ex.Message}")
+            LOGGER.Error(ex.Message)
         End Try
     End Function
     Public Shared Function Restart_FolderWatchSCAN()
@@ -33,7 +34,7 @@ Public Class ClassFolderWatcher
                 FolderWatcher_SCAN.EnableRaisingEvents = False
                 'FolderWatch neu instanzieren
                 FolderWatcher_SCAN = New System.IO.FileSystemWatcher(CURRENT_SCAN_FOLDERWATCH, "*.*")
-                ClassLogger.Add(" >> FolderWatchScan neu instanziert", False)
+                LOGGER.Info(" >> FolderWatchScan neu instanziert")
                 FolderWatcher_SCAN.IncludeSubdirectories = False
                 FolderWatcher_SCAN.EnableRaisingEvents = True
                 AddHandler FolderWatcher_SCAN.Created, AddressOf OnCreated
@@ -42,7 +43,8 @@ Public Class ClassFolderWatcher
                 CONFIG.Save()
             End If
         Catch ex As Exception
-            ClassLogger.Add($"Error in Restart_FolderWatchSCAN: {ex.Message}", False)
+            LOGGER.Info($"Error in Restart_FolderWatchSCAN: {ex.Message}")
+            LOGGER.Error(ex.Message)
         End Try
     End Function
     Public Shared Function StartStop_FolderWatch()
@@ -53,7 +55,7 @@ Public Class ClassFolderWatcher
             End If
             If FolderWatcher Is Nothing Then
                 FolderWatcher = New System.IO.FileSystemWatcher(CURRENT_FOLDERWATCH, "*.*")
-                ClassLogger.Add(" >> FolderWatch Gestartet", False)
+                LOGGER.Info(" >> FolderWatch Gestartet")
                 FolderWatcher.IncludeSubdirectories = False
                 FolderWatcher.EnableRaisingEvents = True
                 AddHandler FolderWatcher.Created, AddressOf OnCreated
@@ -67,7 +69,7 @@ Public Class ClassFolderWatcher
                 ' Dim watcher As New FileSystemWatcher()
                 ' watcher.Path = CURRENT_FOLDERWATCH
                 FolderWatcher = New System.IO.FileSystemWatcher(CURRENT_FOLDERWATCH, "*.*")
-                ClassLogger.Add(" >> FolderWatch Gestartet", False)
+                LOGGER.Info(" >> FolderWatch Gestartet")
                 FolderWatcher.IncludeSubdirectories = False
                 FolderWatcher.EnableRaisingEvents = True
                 AddHandler FolderWatcher.Created, AddressOf OnCreated
@@ -80,7 +82,7 @@ Public Class ClassFolderWatcher
                 'Gestartet also Stoppen
                 FolderWatcher.EnableRaisingEvents = False
                 FW_started = False
-                ClassLogger.Add(" >> FolderWatch gestoppt", False)
+                LOGGER.Info(" >> FolderWatch gestoppt")
                 'SaveConfigValue("FW_started", "False")
                 CONFIG.Config.FolderWatchStarted = False
                 CONFIG.Save()
@@ -88,7 +90,7 @@ Public Class ClassFolderWatcher
             End If
             'If watcher.EnableRaisingEvents = False Then
             '    watcher = New System.IO.FileSystemWatcher(CURRENT_FOLDERWATCH, "*.*")
-            '    ClassLogger.Add(" - vFolderWatch.Gestartet", False)
+            '    LOGGER.Info(" - vFolderWatch.Gestartet")
             '    watcher.IncludeSubdirectories = False
             '    watcher.EnableRaisingEvents = True
             '    AddHandler watcher.Created, AddressOf OnCreated
@@ -121,7 +123,7 @@ Public Class ClassFolderWatcher
             End If
             If FolderWatcher_SCAN Is Nothing Then
                 FolderWatcher_SCAN = New System.IO.FileSystemWatcher(CURRENT_SCAN_FOLDERWATCH, "*.*")
-                ClassLogger.Add(" >> FolderWatch Scan Gestartet", False)
+                LOGGER.Info(" >> FolderWatch Scan Gestartet")
                 FolderWatcher_SCAN.IncludeSubdirectories = False
                 FolderWatcher_SCAN.EnableRaisingEvents = True
                 AddHandler FolderWatcher_SCAN.Created, AddressOf OnCreated
@@ -133,7 +135,7 @@ Public Class ClassFolderWatcher
                 ' Dim watcher As New FileSystemWatcher()
                 ' watcher.Path = CURRENT_FOLDERWATCH
                 FolderWatcher_SCAN = New System.IO.FileSystemWatcher(CURRENT_SCAN_FOLDERWATCH, "*.*")
-                ClassLogger.Add(" >> FolderWatch Scan Gestartet", False)
+                LOGGER.Info(" >> FolderWatch Scan Gestartet")
                 FolderWatcher_SCAN.IncludeSubdirectories = False
                 FolderWatcher_SCAN.EnableRaisingEvents = True
                 AddHandler FolderWatcher_SCAN.Created, AddressOf OnCreated
@@ -143,13 +145,13 @@ Public Class ClassFolderWatcher
             Else
                 'Gestartet also Stoppen
                 FolderWatcher_SCAN.EnableRaisingEvents = False
-                ClassLogger.Add(" >> FolderWatch Scan gestoppt", False)
+                LOGGER.Info(" >> FolderWatch Scan gestoppt")
                 'SaveConfigValue("FWSCAN_started", "False")
                 CONFIG.Config.FolderWatchScanStarted = False
                 CONFIG.Save()
                 Return 0
             End If
-           
+
         Catch ex As Exception
             MsgBox("Error in StartStop_FolderWatchSCAN:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
             Return 99
@@ -160,7 +162,7 @@ Public Class ClassFolderWatcher
             'Gestartet also Stoppen
             FolderWatcher.EnableRaisingEvents = False
             FW_started = False
-            ClassLogger.Add(" >> FolderWatch gestoppt", False)
+            LOGGER.Info(" >> FolderWatch gestoppt")
             'SaveConfigValue("FW_started", "False")
             CONFIG.Config.FolderWatchStarted = True
             CONFIG.Save()
@@ -171,7 +173,7 @@ Public Class ClassFolderWatcher
     End Function
     Private Shared Sub OnCreated(source As Object, e As FileSystemEventArgs)
         If ClassDatabase.DatabaseConnectionTimeout = True Then
-            ClassLogger.Add(">> File handling aborted because of database timeout error!", False)
+            LOGGER.Info(">> File handling aborted because of database timeout error!")
             Exit Sub
         End If
 
@@ -190,11 +192,11 @@ Public Class ClassFolderWatcher
                 handleType = "|FW_SIMPLEINDEXER|"
             End If
             'Die Datei übergeben
-            If LogErrorsOnly = False Then ClassLogger.Add(">> OnCreated-File:" & e.FullPath, False)
+            LOGGER.Info(">> OnCreated-File:" & e.FullPath)
             If ClassIndexFunctions.FileExistsinDropTable(e.FullPath) = False Then
                 ClassFilehandle.Decide_FileHandle(e.FullPath, handleType)
             Else
-                ClassLogger.Add(">> Folderwatcher: File already exists:" & e.FullPath, False)
+                LOGGER.Info(">> Folderwatcher: File already exists:" & e.FullPath)
             End If
 
         Catch ex As Exception

Global_Indexer/ClassFormFunctions.vb

@@ -47,13 +47,14 @@ Public Class ClassFormFunctions
                         'Data Source=MyOracleDB;User Id=myUsername;Password=myPassword;Integrated Security=no;
 
                     Case Else
-                        ClassLogger.Add(" - ConnectionType not integrated", False)
+                        LOGGER.Info(" - ConnectionType not integrated")
                         MsgBox("ConnectionType not integrated", MsgBoxStyle.Critical, "Please check connection:")
                 End Select
             End If
 
         Catch ex As Exception
-            ClassLogger.Add(" - Unexpected Error in GetConnectionString:" & vbNewLine & ex.Message)
+            LOGGER.Info(" - Unexpected Error in GetConnectionString:" & vbNewLine & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in GetConnectionString:")
 
         End Try

Global_Indexer/ClassHelper.vb

@@ -10,10 +10,11 @@ Public Class ClassHelper
             Dim utf8Encoding As New System.Text.UTF8Encoding(True)
             Dim encodedString() As Byte
             encodedString = utf8Encoding.GetBytes(str)
-            If LogErrorsOnly = False Then ClassLogger.Add(String.Format(" >> String {0} was encoded via utf8 to {1}", str, utf8Encoding.GetString(encodedString)), False)
+            LOGGER.Info(String.Format(" >> String {0} was encoded via utf8 to {1}", str, utf8Encoding.GetString(encodedString)))
             Return utf8Encoding.GetString(encodedString)
         Catch ex As Exception
-            ClassLogger.Add("Unexpected error in encode_utf8: " & ex.Message)
+            LOGGER.Info("Unexpected error in encode_utf8: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return Nothing
         End Try
 
@@ -26,7 +27,8 @@ Public Class ClassHelper
             ' return byte data
             Return bytes
         Catch ex As Exception
-            ClassLogger.Add("Unexpected error in StringAsUtf8Bytes: " & ex.Message)
+            LOGGER.Info("Unexpected error in StringAsUtf8Bytes: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return Nothing
         End Try
 
@@ -37,7 +39,8 @@ Public Class ClassHelper
             Dim matches As MatchCollection = Regex.Matches(str, pattern)
             Return matches.Count
         Catch ex As Exception
-            ClassLogger.Add("Unexpected error in CheckSpecialSigns: " & ex.Message)
+            LOGGER.Info("Unexpected error in CheckSpecialSigns: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return 0
         End Try
     End Function

Global_Indexer/ClassHotkey.vb

@@ -1,50 +0,0 @@
-Public Class ClassHotkey
-
-#Region "Declarations - WinAPI, Hotkey constant and Modifier Enum"
-    ''' <summary>
-    ''' Declaration of winAPI function wrappers. The winAPI functions are used to register / unregister a hotkey
-    ''' </summary>
-    Public Declare Function RegisterHotKey Lib "user32" _
-    (ByVal hwnd As IntPtr, ByVal id As Integer, ByVal fsModifiers As Integer, ByVal vk As Integer) As Integer
-
-    Public Declare Function UnregisterHotKey Lib "user32" (ByVal hwnd As IntPtr, ByVal id As Integer) As Integer
-
-    Public Const WM_HOTKEY As Integer = &H312
-
-    Enum KeyModifier
-        Alt = &H1
-        Control = &H2
-        Shift = &H4
-        Winkey = &H8
-
-    End Enum 'This enum is just to make it easier to call the registerHotKey function: The modifier integer codes are replaced by a friendly "Alt","Shift" etc.
-#End Region
-
-
-#Region "Hotkey registration, unregistration and handling"
-    Public Shared Sub registerHotkey(ByRef sourceForm As Form, ByVal hotkeyID As Integer, ByVal triggerKey As String, ByVal modifier As KeyModifier)
-        RegisterHotKey(sourceForm.Handle, hotkeyID, modifier, Asc(triggerKey.ToUpper))
-    End Sub
-    Public Shared Sub unregisterHotkeys(ByRef sourceForm As Form)
-        'Try
-        UnregisterHotKey(sourceForm.Handle, 1)  'Remember to call unregisterHotkeys() when closing your application.
-        UnregisterHotKey(sourceForm.Handle, 2)
-        UnregisterHotKey(sourceForm.Handle, 3)
-        'Catch ex As Exception
-        '    ClassLogger.Add("Unerwarteter Fehler in Unregister Hotkeys´: " & ex.Message, True)
-        'End Try
-
-    End Sub
-    'Public Shared Sub handleHotKeyEvent(ByVal hotkeyID As IntPtr)
-    '    Select Case hotkeyID
-    '        Case 1
-    '            MsgBox("The hotkey ALT+W (ID: 1) was pressed")
-    '        Case 2
-    '            MsgBox("The hotkey ALT+E (ID: 2) was pressed")
-    '        Case 3
-    '            MsgBox("The hotkey ALT+R (ID: 3) was pressed")
-    '    End Select
-    'End Sub
-#End Region
-
-End Class

Global_Indexer/ClassHotkey_Windream.vb

@@ -23,7 +23,7 @@ Public Class ClassHotkey_Windream
             Dim enumerator1 As New ClassWindowAPI
             'Jedes Formularwindow durchlaufen
             For Each top As ClassWindowAPI.ApiWindow In enumerator1.GetTopLevelWindows()
-                If LogErrorsOnly = False Then ClassLogger.Add(" ... top-window Name: " & top.MainWindowTitle, False)
+                LOGGER.Info(" ... top-window Name: " & top.MainWindowTitle)
                 If top.MainWindowTitle.Contains(windowname) Or top.MainWindowTitle.ToLower = windowname.ToLower Then
                     Control_Sequence = 0
                     For Each vControl As ClassWindowAPI.ApiWindow In enumerator1.GetChildWindows(top.hWnd)
@@ -33,7 +33,7 @@ Public Class ClassHotkey_Windream
                                 If Value.ToUpper = vControl.MainWindowTitle.ToUpper Then
                                     Return True
                                 Else
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ... Control-Sequence: " & myControlNo.ToString & " entspricht nicht dem Matchvalue.", False)
+                                    LOGGER.Info(" ... Control-Sequence: " & myControlNo.ToString & " entspricht nicht dem Matchvalue.")
                                     Return False
                                 End If
                             End If
@@ -45,7 +45,7 @@ Public Class ClassHotkey_Windream
             Next top
         Catch ex As Exception
             MsgBox("Error in IsRelevantWindowt:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            ClassLogger.Add(">> Error in IsRelevantWindow:" & ex.Message, False)
+            LOGGER.Info(">> Error in IsRelevantWindow:" & ex.Message)
             Return False
         End Try
     End Function
@@ -60,7 +60,7 @@ Public Class ClassHotkey_Windream
                     For Each vControl As ClassWindowAPI.ApiWindow In enumerator1.GetChildWindows(top.hWnd)
                         If vControl.MainWindowTitle <> "" Then
                             If Control_Sequence = myControlID Then
-                                If LogErrorsOnly = False Then ClassLogger.Add(" ... Control-Sequence: " & myControlID.ToString & " - Gelesener Wert: " & vControl.MainWindowTitle, False)
+                                LOGGER.Info(" ... Control-Sequence: " & myControlID.ToString & " - Gelesener Wert: " & vControl.MainWindowTitle)
                                 Return vControl.MainWindowTitle.ToString
                             End If
                         End If
@@ -71,7 +71,7 @@ Public Class ClassHotkey_Windream
             Next top
         Catch ex As Exception
             MsgBox("Error in Get_windowContent:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            ClassLogger.Add(">> Error in Get_windowContent:" & ex.Message, False)
+            LOGGER.Info(">> Error in Get_windowContent:" & ex.Message)
             Return Nothing
         End Try
     End Function
@@ -92,7 +92,7 @@ Public Class ClassHotkey_Windream
     End Sub
     Public Shared Function RUN_WD_SEARCH(HK_USR_PROFILE_ID As Integer)
         Try
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...RUN_WD_SEARCH with HK_USR_PROFILE_ID '" & HK_USR_PROFILE_ID & "'", False)
+            LOGGER.Info(" ...RUN_WD_SEARCH with HK_USR_PROFILE_ID '" & HK_USR_PROFILE_ID & "'")
             Dim DTWD As DataTable
             Dim Objecttype As String
             Dim windowname As String
@@ -103,15 +103,15 @@ Public Class ClassHotkey_Windream
             Dim _sql = "SELECT WD_SEARCH,HKPROFILE_ID FROM TBHOTKEY_USER_PROFILE WHERE GUID = " & HK_USR_PROFILE_ID
             DTWD = ClassDatabase.Return_Datatable(_sql)
             If DTWD.Rows.Count = 0 Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...KEINE USER_PROFILES hinterlegt", False)
+                LOGGER.Info(" ...KEINE USER_PROFILES hinterlegt")
                 Return "Uncexpected Error in Hotkey - Check Log for Hotkey"
             End If
             If DTWD.Rows.Count > 1 Then
-                ClassLogger.Add("Das Ergebnis von '" & _sql & "' liefert mehr als eine Zeile zurück!", True)
+                LOGGER.Info("Das Ergebnis von '" & _sql & "' liefert mehr als eine Zeile zurück!")
                 Return "Uncexpected Error in Hotkey - Check Log for Hotkey"
             End If
             If DTWD.Rows(0).Item(0) = "" Then
-                If LogErrorsOnly = False Then ClassLogger.Add(">> KEINE Windream-Suche hinterlegt!", False)
+                LOGGER.Info(">> KEINE Windream-Suche hinterlegt!")
                 Return "Error in Hotkey - KEINE Windream-Suche hinterlegt - Check Logkey"
             End If
             Dim BaseSearch = DTWD.Rows(0).Item(0)
@@ -119,7 +119,7 @@ Public Class ClassHotkey_Windream
             HKPROFILE_ID = DTWD.Rows(0).Item("HKPROFILE_ID")
             Dim windream_temp_search As String = ""
             If IO.File.Exists(BaseSearch) = False Then
-                ClassLogger.Add("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!", True)
+                LOGGER.Info("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!")
 
                 If USER_LANGUAGE = "de-DE" Then
                     MsgBox("Die Windream-Suche existiert nicht oder ist nicht zugreifbar!", MsgBoxStyle.Critical)
@@ -148,9 +148,9 @@ Public Class ClassHotkey_Windream
             Dim WDUnicode = ClassDatabase.Execute_Scalar("SELECT WD_UNICODE FROM TBGI_CONFIGURATION WHERE GUID = 1", MyConnectionString, True)
             If WDUnicode = True Then
                 EncodingFormat = Encoding.GetEncoding(1252) '1252
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Unicode is used (Encoding.GetEncoding(1252))", False)
+                LOGGER.Info(" ...Unicode is used (Encoding.GetEncoding(1252))")
             Else
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...UTF8 (Encoding.GetEncoding(65001))", False)
+                LOGGER.Info(" ...UTF8 (Encoding.GetEncoding(65001))")
                 EncodingFormat = Encoding.GetEncoding(65001)
             End If
 
@@ -160,16 +160,16 @@ Public Class ClassHotkey_Windream
                 For Each row As DataRow In DT_HOOKS.Rows
                     RelevantWindow = IsRelevantWindow(windowname, row.Item("SEQUENCE_NUMBER"), row.Item("CONTROL_VALUE"))
                     If RelevantWindow = False Then
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Not the relevant window", False)
+                        LOGGER.Info(" ...Not the relevant window")
                         Return "Not the Relevant window......"
                     End If
                 Next
             End If
 
 
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...ReadAlltext: " & BaseSearch, False)
+            LOGGER.Info(" ...ReadAlltext: " & BaseSearch)
             fileContents = My.Computer.FileSystem.ReadAllText(BaseSearch, EncodingFormat) ', System.Text.Encoding.Unicode
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...fileContents geladen", False)
+            LOGGER.Info(" ...fileContents geladen")
             fileContents = fileContents.Replace("Í", "Ö")
             'Das Array für die PAtterns anpassen
             _sql = "select * from TBHOTKEY_PATTERNS WHERE HKPROFILE_ID = " & HKPROFILE_ID
@@ -212,7 +212,7 @@ Public Class ClassHotkey_Windream
                         End If
 
                     Else
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Get Value for Control# '" & row.Item("SEQUENCE_NUMBER").ToString & "'", False)
+                        LOGGER.Info(" ...Get Value for Control# '" & row.Item("SEQUENCE_NUMBER").ToString & "'")
                         Dim foundresult = Get_windowContent(windowname, row.Item("SEQUENCE_NUMBER").ToString)
                         If Not IsNothing(foundresult) Then
                             'Die Nachbearbeitungsschritte laden
@@ -225,15 +225,15 @@ Public Class ClassHotkey_Windream
                         End If
                         If Not IsNothing(foundresult) Then
                             If foundresult.ToString = "<" Or foundresult.ToString = ">" Then
-                                ClassLogger.Add(">> Hot Key received an irregular value.", False)
+                                LOGGER.Info(">> Hot Key received an irregular value.")
                                 Return "Hotkey konnte nur einen irregulären Wert auswerten."
                             End If
-                            If LogErrorsOnly = False Then ClassLogger.Add(" ...fileContents.length: " & fileContents.Length, False)
-                            If LogErrorsOnly = False Then ClassLogger.Add(" ...Replace pattern '" & row.Item(2).ToString & "' with '" & foundresult & "'", False)
+                            LOGGER.Info(" ...fileContents.length: " & fileContents.Length)
+                            LOGGER.Info(" ...Replace pattern '" & row.Item(2).ToString & "' with '" & foundresult & "'")
                             fileContents = fileContents.Replace(row.Item(2).ToString, foundresult)
-                            If LogErrorsOnly = False Then ClassLogger.Add(" ...fileContents.length: " & fileContents.Length, False)
+                            LOGGER.Info(" ...fileContents.length: " & fileContents.Length)
                         Else
-                            ClassLogger.Add(">> Hot Key could not read any value.", False)
+                            LOGGER.Info(">> Hot Key could not read any value.")
                             Return "Hotkey konnte keinen Wert auswerten - Evtl. ist das konfigurierte Fenster nicht geöffnet?"
                         End If
                     End If
@@ -246,7 +246,7 @@ Public Class ClassHotkey_Windream
                 Try
                     'Die File schreiben
                     My.Computer.FileSystem.WriteAllText(windream_temp_search, fileContents, False, EncodingFormat)
-                    If LogErrorsOnly = False Then ClassLogger.Add(" ...wrote Text to windream_temp_search: " & windream_temp_search, False)
+                    LOGGER.Info(" ...wrote Text to windream_temp_search: " & windream_temp_search)
                     ' XML-Datei öffnen und laden
                     Dim Stream As New IO.StreamReader(CStr(windream_temp_search), EncodingFormat)
                     Dim Reader As New System.Xml.XmlTextReader(Stream)
@@ -257,9 +257,10 @@ Public Class ClassHotkey_Windream
                     xml.Load(Reader)
                     Reader.Close()
                     xml.Save(windream_temp_search)
-                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Xml Generiert: " & windream_temp_search, False)
+                    LOGGER.Info(" ...Xml Generiert: " & windream_temp_search)
                 Catch ex As Exception
-                    ClassLogger.Add("TempFile could not be created: " & ex.Message, True)
+                    LOGGER.Info("TempFile could not be created: " & ex.Message)
+                    LOGGER.Error(ex.Message)
                     MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected Error in Write XmlSearch:")
                 End Try
 
@@ -269,7 +270,8 @@ Public Class ClassHotkey_Windream
                     Dim myhWnd As IntPtr
                     Dim p As New Process()
                     p.StartInfo.FileName = windream_temp_search
-                    If My.Settings.WDSearch_maximized = True Then
+
+                    If CONFIG.Config.WindreamSearchMaximized Then
                         p.StartInfo.WindowStyle = ProcessWindowStyle.Maximized
                     Else
                         p.StartInfo.WindowStyle = ProcessWindowStyle.Normal
@@ -281,14 +283,14 @@ Public Class ClassHotkey_Windream
                     Dim rctMain As RECT
                     GetWindowRect(p.MainWindowHandle, rctMain)
                     If LogErrorsOnly = False Then
-                        ClassLogger.Add(" ...Top-Position: " & rctMain.Top.ToString, False)
-                        ClassLogger.Add(" ...Left-Position: " & rctMain.Left.ToString, False)
-                        ClassLogger.Add(" ...Right-Position: " & rctMain.Right.ToString, False)
-                        ClassLogger.Add(" ...Bottom-Position: " & rctMain.Bottom.ToString, False)
+                        LOGGER.Info(" ...Top-Position: " & rctMain.Top.ToString)
+                        LOGGER.Info(" ...Left-Position: " & rctMain.Left.ToString)
+                        LOGGER.Info(" ...Right-Position: " & rctMain.Right.ToString)
+                        LOGGER.Info(" ...Bottom-Position: " & rctMain.Bottom.ToString)
                     End If
                 Catch ex As Exception
                     MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error while executing windream-Search:")
-                    ClassLogger.Add("Unexpected error while executing search: " & ex.Message, True)
+                    LOGGER.Info("Unexpected error while executing search: " & ex.Message)
                     Return "Unexpected error while executing search"
                 End Try
                 Dim psList() As Process
@@ -299,7 +301,7 @@ Public Class ClassHotkey_Windream
                         Console.WriteLine(p.Id.ToString() + " " + p.ProcessName)
                         If p.ProcessName.Contains("indream.Find") Then
                             AppActivate(p.Id)
-                            If My.Settings.WDSearch_maximized = False Then
+                            If CONFIG.Config.WindreamSearchMaximized = False Then
                                 Dim rctMain As RECT
                                 GetWindowRect(p.MainWindowHandle, rctMain)
                                 If rctMain.Left = 0 Or rctMain.Right = 0 Then
@@ -312,17 +314,20 @@ Public Class ClassHotkey_Windream
                     Next p
 
                 Catch ex As Exception
-                    ClassLogger.Add("Unexpected error while Setting foreground: " & ex.Message, True)
+                    LOGGER.Info("Unexpected error while Setting foreground: " & ex.Message)
+                    LOGGER.Error(ex.Message)
                 End Try
                 Return ""
             Catch ex As Exception
-                ClassLogger.Add("Unexpected error in Create Search: " & ex.Message, True)
+                LOGGER.Info("Unexpected error in Create Search: " & ex.Message)
+                LOGGER.Error(ex.Message)
                 MsgBox("Error in Create Search:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
                 Return "Unexpected error in Create Search"
             End Try
 
         Catch ex As Exception
-            ClassLogger.Add("Unexpected error in RUN_WD_SEARCH: " & ex.Message, True)
+            LOGGER.Info("Unexpected error in RUN_WD_SEARCH: " & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox("Error in RUN_WD_SEARCH:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
             Return "Unerwarteter Unexpected error in RUN_WD_SEARCH"
         End Try

Global_Indexer/ClassInit.vb

@@ -10,18 +10,20 @@ Public Class ClassInit
 
     Public Sub InitLogger()
         ClassLogger.Init("", Environment.UserName)
-        ClassLogger.Add(">> Programmstart: " & Now, False)
-        ClassLogger.Add(">> Username: " & Environment.UserName, False)
         LOGCONFIG = New LogConfig(LogConfig.PathType.AppData)
         LOGGER = LOGCONFIG.GetLogger("Globix")
+        LOGGER.Info("Programmstart: " & Now)
         LOGGER.Info("Username: {0}", Environment.UserName)
     End Sub
 
     Public Sub InitConfig()
         CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath)
+        LOGCONFIG.Debug = Not CONFIG.Config.LogErrorsOnly
+        LOGGER.Info("Debug log set to: [{0}]", LOGCONFIG.Debug)
 
         MyConnectionString = DecryptConnectionString(CONFIG.Config.ConnectionString)
         LogErrorsOnly = CONFIG.Config.LogErrorsOnly
+
         'myPreviewActive = CONFIG.Config.FilePreview
         FW_started = CONFIG.Config.FolderWatchStarted
         CURR_DELETE_ORIGIN = CONFIG.Config.DeleteOriginalFile
@@ -100,21 +102,21 @@ Public Class ClassInit
             folderwatchPath = IIf(IsDBNull(folderwatchPath), "", folderwatchPath)
 
             If folderwatchPath = String.Empty Then
-                ClassLogger.Add("Init_Folderwatch: folderwatchPath is empty", True)
+                LOGGER.Info("Init_Folderwatch: folderwatchPath is empty")
                 FW_started = False
                 'SaveConfigValue("FW_started", "False")
                 CONFIG.Config.FolderWatchStarted = False
                 CONFIG.Save()
-     
+
             End If
 
             If Not IO.Directory.Exists(folderwatchPath) Then
-                ClassLogger.Add("Init_Folderwatch: folderwatchPath does not exists or is invalid path", True)
+                LOGGER.Info("Init_Folderwatch: folderwatchPath does not exists or is invalid path")
                 FW_started = False
                 'SaveConfigValue("FW_started", "False")
                 CONFIG.Config.FolderWatchStarted = False
                 CONFIG.Save()
-               
+
             End If
 
             CURRENT_FOLDERWATCH = folderwatchPath
@@ -124,7 +126,7 @@ Public Class ClassInit
             ClassFolderWatcher.StartStop_FolderWatch()
         Catch ex As Exception
             MsgBox($"Init_Folderwatch: Unexpected error while starting FolderWatch: {ex.Message}", MsgBoxStyle.Critical)
-            ClassLogger.Add($"Init_Folderwatch: Unexpected error: {ex.Message}", True)
+            LOGGER.Info($"Init_Folderwatch: Unexpected error: {ex.Message}")
             START_INCOMPLETE = True
         End Try
 
@@ -135,14 +137,14 @@ Public Class ClassInit
             folderwatchScanPath = IIf(IsDBNull(folderwatchScanPath), "", folderwatchScanPath)
 
             If folderwatchScanPath = String.Empty Then
-                ClassLogger.Add("Init_Folderwatch: folderwatchScanPath is empty", True)
+                LOGGER.Info("Init_Folderwatch: folderwatchScanPath is empty")
                 CONFIG.Config.FolderWatchStarted = False
                 CONFIG.Save()
                 Exit Sub
             End If
 
             If Not IO.Directory.Exists(folderwatchScanPath) Then
-                ClassLogger.Add("Init_Folderwatch: folderwatchScanPath does not exists or is invalid path", True)
+                LOGGER.Info("Init_Folderwatch: folderwatchScanPath does not exists or is invalid path")
                 CONFIG.Config.FolderWatchStarted = False
                 CONFIG.Save()
                 Exit Sub
@@ -155,7 +157,7 @@ Public Class ClassInit
             ClassFolderWatcher.StartStop_FolderWatchSCAN()
         Catch ex As Exception
             MsgBox($"Init_Folderwatch: Unexpected error while starting FolderWatchScan: {ex.Message}", MsgBoxStyle.Critical)
-            ClassLogger.Add($"Init_Folderwatch: Unexpected error: {ex.Message}", True)
+            LOGGER.Info($"Init_Folderwatch: Unexpected error: {ex.Message}")
             START_INCOMPLETE = True
         End Try
 
@@ -180,7 +182,7 @@ Public Class ClassInit
 
         '        End If
         '    Else
-        '        ClassLogger.Add("Init_Folderwatch: folderwatch path is nothing!", True)
+        '        LOGGER.Info("Init_Folderwatch: folderwatch path is nothing!")
         '    End If
         '    If Not folderwatch_SCAN Is Nothing Then
         '        CURRENT_SCAN_FOLDERWATCH = folderwatch_SCAN
@@ -189,10 +191,10 @@ Public Class ClassInit
         '            ClassFolderWatcher.StartStop_FolderWatchSCAN()
         '        End If
         '    Else
-        '        ClassLogger.Add("Init_Folderwatch: folderwatch_SCAN path is nothing!", True)
+        '        LOGGER.Info("Init_Folderwatch: folderwatch_SCAN path is nothing!")
         '    End If
         'Catch ex As Exception
-        '    ClassLogger.Add("Unexpected Error in Init_Folderwatch: " & ex.Message, True)
+        '    LOGGER.Info("Unexpected Error in Init_Folderwatch: " & ex.Message)
         '    START_INCOMPLETE = True
         'End Try
     End Sub
@@ -200,13 +202,14 @@ Public Class ClassInit
         Try
             Dim sql = "SELECT MAX(GUID) FROM TBDD_USER WHERE (LOWER(USERNAME) = LOWER('@user'))"
             sql = sql.Replace("@user", Environment.UserName)
-            ' ClassLogger.Add(">> Username: " & Environment.UserName, False)
+            ' LOGGER.Info(">> Username: " & Environment.UserName)
 
             USER_ID = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
             Try
                 Dim USERID = CInt(USER_ID)
             Catch ex As Exception
-                ClassLogger.Add("User '" & Environment.UserName & "' not configured in Useradministration! (DBNull)", True)
+                LOGGER.Info("User '" & Environment.UserName & "' not configured in Useradministration! (DBNull)")
+                LOGGER.Error(ex.Message)
                 'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
                 'Me.Close()
                 START_INCOMPLETE = True
@@ -228,7 +231,7 @@ Public Class ClassInit
             sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','GLOBIX',{1})", Environment.UserName, 1)
             Dim DT_CHECKUSER_MODULE As DataTable = ClassDatabase.Return_Datatable(sql)
             If DT_CHECKUSER_MODULE.Rows.Count = 0 Then
-                ClassLogger.Add("DT_CHECKUSER_MODULE.Rows.Count = 0", True)
+                LOGGER.Info("DT_CHECKUSER_MODULE.Rows.Count = 0")
                 START_INCOMPLETE = True
                 ERROR_STATE = "NO USER"
                 MsgBox("Sorry - Something went wrong in getting Your rights." & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
@@ -237,7 +240,7 @@ Public Class ClassInit
             If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
                 USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
                 If USER_IN_MODULE = False Then
-                    ClassLogger.Add(" - User: " & Environment.UserName & " nicht für Modul freigegben!", False)
+                    LOGGER.Info(" - User: " & Environment.UserName & " nicht für Modul freigegben!")
                     START_INCOMPLETE = True
 
                     Throw New Exception("Your user is not allowed to use this module." & vbNewLine & "Please contact the system administrator!")
@@ -265,17 +268,17 @@ Public Class ClassInit
                 ClassDatabase.Execute_non_Query(sql)
                 sql = "SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE Upper(MODULE) = UPPER('Global-Indexer')"
                 Dim anzahl = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
-                If LogErrorsOnly = False Then ClassLogger.Add(" >> Anzahl Angemeldete User: " & anzahl.ToString, False)
+                LOGGER.Info(" >> Anzahl Angemeldete User: " & anzahl.ToString)
                 UserLoggedin = CInt(anzahl)
                 UserLoggedin += 1
                 If LICENSE_COUNT < UserLoggedin And LICENSE_EXPIRED = False Then
                     MsgBox("Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der aktuellen Lizenzen!" & vbNewLine & "Anzahl der Lizenzen: " & LICENSE_COUNT.ToString & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
-                    ClassLogger.Add(" >> Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Global Indexer!", False)
+                    LOGGER.Info(" >> Die Anzahl der aktuell angemeldeten User (" & UserLoggedin.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Global Indexer!")
                     If USER_IS_ADMIN = False Then
                         'Anmeldung wieder herausnehmen
                         sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND MODULE= 'Global-Indexer'"
                         ClassDatabase.Execute_non_Query(sql, True)
-                        ClassLogger.Add(" - Wieder abgemeldet", False)
+                        LOGGER.Info(" - Wieder abgemeldet")
                         START_INCOMPLETE = True
                     End If
                 End If
@@ -286,7 +289,8 @@ Public Class ClassInit
 
 
         Catch ex As Exception
-            ClassLogger.Add("Unexpected Error in InitUserLogin: " & ex.Message, True)
+            LOGGER.Info("Unexpected Error in InitUserLogin: " & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox(ex.Message, MsgBoxStyle.Critical)
             START_INCOMPLETE = True
         End Try

Global_Indexer/ClassLayout.vb

@@ -76,11 +76,12 @@ Public Class ClassWindowLocation
                 End If
             Next
             If result = False Then
-                ClassLogger.Add(">> Saved layout is not fitting to Resolution. Default is loaded.", True)
+                LOGGER.Info(">> Saved layout is not fitting to Resolution. Default is loaded.")
             End If
             Return result
         Catch ex As Exception
-            ClassLogger.Add("Error in IsVisibleOnAnyScreen: " & ex.Message, True)
+            LOGGER.Info("Error in IsVisibleOnAnyScreen: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return False
         End Try
     End Function

Global_Indexer/ClassPatterns.vb

@@ -39,7 +39,7 @@ Public Class ClassPatterns
 
     Public Const MAX_TRY_COUNT = 500
 
-    Private Shared regex As Regex = New Regex("{#(\w+)#([\w\s_-]+)}+")
+    Private Shared regex As Regex = New Regex("{#(\w+)#([\w\d\s_-]+)}+")
     Private Shared allPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_IDBA, PATTERN_USER, PATTERN_INT}
     Private Shared complexPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_IDBA}
     Private Shared simplePatterns As New List(Of String) From {PATTERN_USER, PATTERN_INT}
@@ -146,12 +146,28 @@ Public Class ClassPatterns
             Dim result = input
             Dim oTryCounter = 0
 
+            LOGGER.Debug("Input String: [{0}]", input)
+
             While ContainsPattern(result, PATTERN_CTRL)
+                LOGGER.Debug("ReplaceControlValues Try no. [{0}]", oTryCounter)
+
                 If oTryCounter > MAX_TRY_COUNT Then
                     Throw New Exception($"Max tries in ReplaceControlValues exceeded - Result so far [{result}].")
                 End If
 
-                Dim controlName As String = GetNextPattern(result, PATTERN_CTRL).Value
+                LOGGER.Debug("Getting next pattern..")
+
+                Dim oNextPattern = GetNextPattern(result, PATTERN_CTRL)
+
+                If oNextPattern Is Nothing Then
+                    LOGGER.Debug("No Next Pattern found. Exiting!")
+                    Exit While
+                End If
+
+                LOGGER.Debug("Next Pattern Value: [{0}]", oNextPattern.Value)
+                LOGGER.Debug("Next Pattern Type: [{0}]", oNextPattern.Type)
+
+                Dim controlName As String = oNextPattern.Value
                 Dim oFoundControl As Control = Nothing
                 Dim oFoundType As String = Nothing
 
@@ -160,9 +176,27 @@ Public Class ClassPatterns
                         Continue For
                     End If
 
-                    Dim oMeta = DirectCast(oControl.Tag, ClassControls.ControlMeta)
+                    LOGGER.Debug("Getting control metadata from object: [{0}]", oControl?.Tag?.ToString())
+
+                    If oControl.Tag Is Nothing Then
+                        LOGGER.Warn("No Metadata object found for control [{0}]. Skipping.", oControl.Name)
+                        Continue For
+                    End If
+
+                    Dim oMeta = TryCast(oControl.Tag, ClassControls.ControlMeta)
+
+                    LOGGER.Debug("Metadata IndexName: [{0}]", oMeta.IndexName)
+                    LOGGER.Debug("Metadata IndexType: [{0}]", oMeta.IndexType)
+                    LOGGER.Debug("Checking Control Name matches..")
+
+                    If oMeta Is Nothing Then
+                        LOGGER.Warn("No Metadata found for control [{0}]. Skipping.", oControl.Name)
+                        Continue For
+                    End If
 
                     If oMeta.IndexName = controlName Then
+                        LOGGER.Debug("Control Name matches! Matching Control: [{0}]", controlName)
+
                         oFoundControl = oControl
                         oFoundType = oMeta.IndexType
                         Exit For
@@ -172,29 +206,53 @@ Public Class ClassPatterns
                 If oFoundControl IsNot Nothing Then
                     Dim oValue As String = String.Empty
 
-                    If TypeOf oFoundControl Is TextBox Then
-                        oValue = DirectCast(oFoundControl, TextBox).Text
-                    ElseIf TypeOf oFoundControl Is CheckBox Then
-                        oValue = IIf(DirectCast(oFoundControl, CheckBox).Checked, 1, 0)
-                    ElseIf TypeOf oFoundControl Is LookupControl2 Then
-                        Dim oLookupControl = DirectCast(oFoundControl, LookupControl2)
+                    LOGGER.Debug("Found Control [{0}], continuing with setting value..", oFoundControl.Name)
 
-                        If oLookupControl.MultiSelect Then
-                            Select Case oFoundType
-                                Case "INTEGER"
-                                    oValue = String.Join(",", oLookupControl.SelectedValues)
-                                Case "VARCHAR"
-                                    Dim oWrapped = oLookupControl.SelectedValues.Select(Function(v) $"'{v}'")
-                                    oValue = String.Join(",", oWrapped)
-                            End Select
-                        Else
-                            oValue = NotNull(oLookupControl.SelectedValues.Item(0), "")
-                        End If
+                    If TypeOf oFoundControl Is TextBox Then
+                        Try
+                            oValue = DirectCast(oFoundControl, TextBox).Text
+                        Catch ex As Exception
+                            LOGGER.Error(ex)
+                            LOGGER.Warn("Control Value for TextBox [{0}] could not be retrieved!", oFoundControl.Name)
+                        End Try
+                    ElseIf TypeOf oFoundControl Is CheckBox Then
+                        Try
+                            oValue = IIf(DirectCast(oFoundControl, CheckBox).Checked, 1, 0)
+                        Catch ex As Exception
+                            LOGGER.Error(ex)
+                            LOGGER.Warn("Control Value for CheckBox [{0}] could not be retrieved!", oFoundControl.Name)
+                        End Try
+                    ElseIf TypeOf oFoundControl Is LookupControl2 Then
+                        Try
+                            Dim oLookupControl = DirectCast(oFoundControl, LookupControl2)
+
+                            If oLookupControl.MultiSelect Then
+                                Select Case oFoundType
+                                    Case "INTEGER"
+                                        oValue = String.Join(",", oLookupControl.SelectedValues)
+                                    Case "VARCHAR"
+                                        Dim oWrapped = oLookupControl.SelectedValues.Select(Function(v) $"'{v}'")
+                                        oValue = String.Join(",", oWrapped)
+                                    Case Else
+                                        LOGGER.Warn("Lookup Control with [{0}] is not supported!", oFoundType)
+                                End Select
+                            Else
+                                oValue = NotNull(oLookupControl.SelectedValues.Item(0), "")
+                            End If
+                        Catch ex As Exception
+                            LOGGER.Error(ex)
+                            LOGGER.Warn("Control Value for LookupControl2 [{0}] could not be retrieved!", oFoundControl.Name)
+                        End Try
                     Else
+                        LOGGER.Debug("Unknown Control type for type [{0}], setting value to empty string.", oFoundControl.Name)
                         oValue = ""
                     End If
 
+                    LOGGER.Debug("Retrieved Value from Control [{0}] is: [{1}]", controlName, oValue)
+
                     result = ReplacePattern(result, PATTERN_CTRL, oValue)
+                Else
+                    LOGGER.Warn("Control [{0}] not found!", controlName)
                 End If
 
                 oTryCounter += 1
@@ -204,6 +262,7 @@ Public Class ClassPatterns
         Catch ex As Exception
             LOGGER.Error(ex)
             LOGGER.Info("Error in ReplaceControlValues:" & ex.Message)
+            Return input
         End Try
     End Function
 

Global_Indexer/ClassPostprocessing.vb

@@ -16,7 +16,7 @@ Public Class ClassPostprocessing
 
                 Select Case oType
                     Case VBSPLIT
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Nachbearbeitung mit VBSPLIT", False)
+                        LOGGER.Info(" ...Nachbearbeitung mit VBSPLIT")
 
                         Dim oSeparator As String = oDataRow.Item("TEXT1")
                         Dim oSplitIndex As Integer = 0
@@ -31,15 +31,15 @@ Public Class ClassPostprocessing
                         Dim oFindString = oDataRow.Item("TEXT1")
                         Dim oReplaceString = oDataRow.Item("TEXT2")
 
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Nachbearbeitung mit VBREPLACE", False)
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Ersetze '" & oFindString & "' mit '" & oReplaceString & "'", False)
+                        LOGGER.Info(" ...Nachbearbeitung mit VBREPLACE")
+                        LOGGER.Info(" ...Ersetze '" & oFindString & "' mit '" & oReplaceString & "'")
 
                         For Each oIndexValue In oIndexValues
                             Dim oReplaceResult = oIndexValue.Replace(oFindString, oReplaceString)
                             oResult.Add(oReplaceResult)
                         Next
                     Case REGEXPRESSION
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Nachbearbeitung mit RegEx", False)
+                        LOGGER.Info(" ...Nachbearbeitung mit RegEx")
 
                         Dim oRegexList As New List(Of Regex)
                         Dim oRegex As New Regex(oDataRow.Item("TEXT1"), RegexOptions.IgnoreCase)
@@ -50,7 +50,7 @@ Public Class ClassPostprocessing
                             Dim oProcessedString = extractFromStringviaRE(oIndexValue, oRegexList)
                             oResult.Add(oProcessedString)
 
-                            If LogErrorsOnly = False Then ClassLogger.Add(" ...Ergebnis des RegEx: " & oProcessedString, False)
+                            LOGGER.Info(" ...Ergebnis des RegEx: " & oProcessedString)
                         Next
                 End Select
 
@@ -58,7 +58,7 @@ Public Class ClassPostprocessing
             Next
         Catch ex As Exception
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Get_Nachbearbeitung_Wert:")
-            ClassLogger.Add(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & idxvalue & " - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Info(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & idxvalue & " - Fehler: " & vbNewLine & ex.Message)
         End Try
 
         Return String.Join(ClassConstants.VECTORSEPARATOR, oIndexValues.ToArray)
@@ -68,41 +68,41 @@ Public Class ClassPostprocessing
         '    For Each row As DataRow In Datatable.Rows
         '        Select Case row.Item("TYPE").ToString.ToUpper
         '            Case "VBSPLIT"
-        '                If LogErrorsOnly = False Then ClassLogger.Add(" ...Nachbearbeitung mit VBSPLIT", False)
+        '                LOGGER.Info(" ...Nachbearbeitung mit VBSPLIT")
         '                Dim strSplit() As String
         '                strSplit = result.Split(row.Item("TEXT1"))
         '                For i As Integer = 0 To strSplit.Length - 1
         '                    If i = CInt(row.Item("TEXT2")) Then
-        '                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Split-Ergebnis für Index (" & i.ToString & "): " & strSplit(i), False)
+        '                        LOGGER.Info(" ...Split-Ergebnis für Index (" & i.ToString & "): " & strSplit(i))
         '                        result = strSplit(i).ToString
         '                    End If
         '                Next
         '            Case "VBREPLACE"
         '                If LogErrorsOnly = False Then
-        '                    ClassLogger.Add(" ...Nachbearbeitung mit VBREPLACE", False)
-        '                    ClassLogger.Add(" ...Ersetze '" & row.Item("TEXT1") & "' mit '" & row.Item("TEXT2") & "'", False)
+        '                    LOGGER.Info(" ...Nachbearbeitung mit VBREPLACE")
+        '                    LOGGER.Info(" ...Ersetze '" & row.Item("TEXT1") & "' mit '" & row.Item("TEXT2") & "'")
         '                    result = result.Replace(row.Item("TEXT1"), row.Item("TEXT2"))
         '                End If
 
         '                result = result.Replace(row.Item("TEXT1"), row.Item("TEXT2"))
         '            Case "REG. EXPRESSION"
-        '                If LogErrorsOnly = False Then ClassLogger.Add(" ...Nachbearbeitung mit RegEx", False)
+        '                LOGGER.Info(" ...Nachbearbeitung mit RegEx")
         '                Dim RegexList As New List(Of System.Text.RegularExpressions.Regex)
         '                Dim Regex As New System.Text.RegularExpressions.Regex(row.Item("TEXT1"), System.Text.RegularExpressions.RegexOptions.IgnoreCase)
         '                RegexList.Add(Regex)
         '                '
         '                Dim resultRegex = ClassPostprocessing.extractFromStringviaRE(result, RegexList)
         '                If Not IsNothing(resultRegex) Then
-        '                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Ergebnis des RegEx: " & resultRegex.ToString, False)
+        '                    LOGGER.Info(" ...Ergebnis des RegEx: " & resultRegex.ToString)
         '                    result = resultRegex.ToString
         '                Else
-        '                    ClassLogger.Add("Postprocessing RegEx konnte kein Ergebnis auswerten!", True)
+        '                    LOGGER.Info("Postprocessing RegEx konnte kein Ergebnis auswerten!")
         '                End If
         '        End Select
         '    Next
         '    Return result
         'Catch ex As Exception
-        '    ClassLogger.Add(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & result & " - Fehler: " & vbNewLine & ex.Message)
+        '    LOGGER.Info(" - Unvorhergesehener Unexpected error in Get_Nachbearbeitung_Wert - result: " & result & " - Fehler: " & vbNewLine & ex.Message)
         '    MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Get_Nachbearbeitung_Wert:")
         '    Return result
         'End Try

Global_Indexer/ClassWindream.vb

@@ -196,12 +196,13 @@ Public Class ClassWindream
             Try
                 ' Session-Objekt instanziieren und mit dem im Client ausgewählten Server belegen
                 oSession = CreateObject("Windream.WMSession", GetCurrentServer)
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...windream-Server: '" & GetCurrentServer() & "'", False)
+                LOGGER.Info(" ...windream-Server: '" & GetCurrentServer() & "'")
                 ' Connection-Objekt instanziieren
                 oConnect = CreateObject("Windream.WMConnect")
                 'MsgBox("windrem init 'ed")
             Catch ex As Exception
-                ClassLogger.Add("Windream konnte nicht initiiert werden: " & ex.Message, True)
+                LOGGER.Info("Windream konnte nicht initiiert werden: " & ex.Message)
+                LOGGER.Error(ex.Message)
                 Return False
             End Try
 
@@ -230,7 +231,7 @@ Public Class ClassWindream
                 End If
 
                 'If My.Settings.vDetailLog Then
-                '    ClassLogger.Add(" >> windream-Version: '" & oSession.GetSystemInfo("WindreamVersion") & "'", False)
+                '    LOGGER.Info(" >> windream-Version: '" & oSession.GetSystemInfo("WindreamVersion") & "'")
                 'End If
 
                 ' AUSGABE VON SYSTEMINFORMATIONEN
@@ -264,7 +265,7 @@ Public Class ClassWindream
 
         Catch ex As Exception
             If Err.Number = -2147220985 Then
-                MsgBox("Die installierte windream-Version ist nicht ausreichend für den Betrieb der Tool Collection für windream." & vbNewLine & _
+                MsgBox("Die installierte windream-Version ist nicht ausreichend für den Betrieb der Tool Collection für windream." & vbNewLine &
                        "Bitte kontaktieren Sie Digital Data." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & Err.Description, MsgBoxStyle.Exclamation, "Unzureichende windream-Version")
             Else
                 MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Login an windream")
@@ -563,17 +564,17 @@ Public Class ClassWindream
         Dim Zielverzeichnis As String = Path.GetDirectoryName(newfilename)
         If My.Computer.FileSystem.DirectoryExists(Zielverzeichnis) = False Then
             My.Computer.FileSystem.CreateDirectory(Zielverzeichnis)
-            ClassLogger.Add(" - Zielverzeichnis neu erzeugt!", False)
+            LOGGER.Info(" - Zielverzeichnis neu erzeugt!")
         End If
 
         Const STREAM_BinaryObject = "BinaryObject"
 
-        If LogErrorsOnly = False Then ClassLogger.Add(" ...Stream_File wurde gestartet", False)
+        LOGGER.Info(" ...Stream_File wurde gestartet")
         Dim windreamFilename As String = ""
         ' Objekt für Datei und Zielverzeichnis anlegen
         Dim Quelldatei_Name As String = Path.GetFileName(filenameQuelle)
 
-        If LogErrorsOnly = False Then ClassLogger.Add(" ...Quelldatei gelesen", False)
+        LOGGER.Info(" ...Quelldatei gelesen")
         '"Version-KZ entfernen
         newfilename = newfilename.Replace("\\", "\")
         windreamFilename = newfilename.Substring(2)
@@ -583,7 +584,7 @@ Public Class ClassWindream
         End If
 
         If My.Computer.FileSystem.DirectoryExists(Zielverzeichnis) Then
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...targetPath existiert", False)
+            LOGGER.Info(" ...targetPath existiert")
             ' Überprüfen ob der zu Kopieren notwendige Speicherplatz auf Ziellaufwerk vorhanden ist
             Dim dvr As New DriveInfo(vWLaufwerk & ":")
             Dim freeSpace = dvr.TotalFreeSpace
@@ -601,7 +602,7 @@ Public Class ClassWindream
                 Return -10
             End If
 
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...Datei kopieren von '" & filenameQuelle & "' nach '" & newfilename & "'.", False)
+            LOGGER.Info(" ...Datei kopieren von '" & filenameQuelle & "' nach '" & newfilename & "'.")
             Dim Connect
             Dim Session
             Dim WMObject
@@ -609,15 +610,15 @@ Public Class ClassWindream
             Dim aWMStream
             Dim wmbrwsr
             Dim dmsServer As String
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...Connect definieren:  CreateObject('Windream.WMConnect')", False)
+            LOGGER.Info(" ...Connect definieren:  CreateObject('Windream.WMConnect')")
             Connect = CreateObject("Windream.WMConnect")
             aFileIO = New WMOTOOLLib.WMFileIO
             'If My.Settings.DLL_WMOTOOL = "" Then
             '    aFileIO = New WMOTOOLLib.WMFileIO
-            '    If LogErrorsOnly = False Then ClassLogger.Add(" ...Direkter Verweis auf New WMOTOOLLib.WMFileIO", False)
+            '    LOGGER.Info(" ...Direkter Verweis auf New WMOTOOLLib.WMFileIO")
             'Else
             '    aFileIO = CreateObject(My.Settings.DLL_WMOTOOL) 'WMOTool.WMFileIO oder WMOTOOLLib.WMFileIO
-            '    If LogErrorsOnly = False Then ClassLogger.Add(" ...Verwendeter Verweis aus Anwendungsstring: '" & My.Settings.DLL_WMOTOOL & "'", False)
+            '    LOGGER.Info(" ...Verwendeter Verweis aus Anwendungsstring: '" & My.Settings.DLL_WMOTOOL & "'")
             'End If
 
             wmbrwsr = CreateObject("WMOBrws.ServerBrowser")
@@ -635,10 +636,10 @@ Public Class ClassWindream
             Connect.LoginSession(Session)
             Dim LoggedIn = Session.aLoggedin
             If LoggedIn Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Login ok. You are logged in as '" & Connect.UserName & "' on Server '" & dmsServer, False)
+                LOGGER.Info(" ...Login ok. You are logged in as '" & Connect.UserName & "' on Server '" & dmsServer)
                 'MsgBox("Login ok. You are logged in as '" + Connect.UserName + "' on Server '" + dmsServer + "'")
             Else
-                ClassLogger.Add(" >> Login on dms-Server failed", False)
+                LOGGER.Info(" >> Login on dms-Server failed")
                 ' MsgBox("Login failed. ")
             End If
             oSession = Session
@@ -649,26 +650,26 @@ Public Class ClassWindream
             '==================================================================
             ' check if files exist
             '==================================================================
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...ÜBERPRÜFTER DATEINAME => " & windreamFilename, False)
+            LOGGER.Info(" ...ÜBERPRÜFTER DATEINAME => " & windreamFilename)
             Dim wdFilexists As Boolean
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...Versuch auf die Datei in W: zuzugreifen und zu sperren...", False)
+            LOGGER.Info(" ...Versuch auf die Datei in W: zuzugreifen und zu sperren...")
             wdFilexists = Session.WMObjectExists(WMEntityDocument, windreamFilename, 0, 0)
             Err.Clear()
             If wdFilexists = False Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Datei ist NICHT vorhanden, kann also einfach neu angelegt werden", False)
+                LOGGER.Info(" ...Datei ist NICHT vorhanden, kann also einfach neu angelegt werden")
 
                 '==================================================================
                 ' create an object
                 '==================================================================
                 WMObject = Session.GetNewWMObjectFS(WMEntityDocument, windreamFilename, WMObjectEditModeObject) 'WMEntityDocument, windreamFilename, WMObjectEditModeObject
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" FEHLER: WMObject konnte nicht erzeugt werden - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" FEHLER: WMObject konnte nicht erzeugt werden - Error: '" & Err.Description & "'")
                     'MsgBox(Err.Description)
                 End If
                 '  MsgBox("Created file: " + windreamFilename)
             Else
                 ' wenn auf die Datei zugeriffen werden konnte ist sie bereits vorhanden -> Datum anhängen
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Es konnte zugegriffen werden -> DATEI IST BEREITS VORHANDEN", False)
+                LOGGER.Info(" ...Es konnte zugegriffen werden -> DATEI IST BEREITS VORHANDEN")
                 If CURRENT_DOKART_DUPLICATE_HANDLING = "Default" Or CURRENT_DOKART_DUPLICATE_HANDLING = "Question" Then
                     ''##########
                     Dim msg = String.Format("Eine Datei mit identischem Namen " & vbNewLine & "'{0}'" & vbNewLine & "existiert bereits!" & vbNewLine & "Wollen Sie die bestehende Datei ersetzen?", newfilename)
@@ -689,12 +690,12 @@ Public Class ClassWindream
                 End If
                 WMObject = Session.GetNewWMObjectFS(1, windreamFilename, 31) 'WMEntityDocument, windreamFilename, WMObjectEditModeObject
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" FEHLER: Neues WMObject (Kopie) konnte nicht erzeugt werden - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" FEHLER: Neues WMObject (Kopie) konnte nicht erzeugt werden - Error: '" & Err.Description & "'")
                     'MsgBox(Err.Description)
                 End If
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...WMObject zugewiesen", False)
+                LOGGER.Info(" ...WMObject zugewiesen")
             End If
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...ENDGÜLTIGER DATEINAME => " & windreamFilename, False)
+            LOGGER.Info(" ...ENDGÜLTIGER DATEINAME => " & windreamFilename)
             If WMObject IsNot Nothing Then
                 newfilename = vWLaufwerk & ":" & windreamFilename
                 ' lock object for file system access (to change the file itself)
@@ -702,8 +703,8 @@ Public Class ClassWindream
                 ' set fileIO the local source file
                 aFileIO.bstrOriginalFileName = filenameQuelle
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" FEHLER: fileIO konnte nicht gesetzt werden - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
-                    ClassLogger.Add(" HINWEIS: Überprüfen Sie den Verweis auf die Bibliotheken 'WMOTool.WMFileIO' UND 'WMOTOOLLib.WMFileIO' und ändern diese in den Anwendungseinstellungen (DLL_WMOTOOL)'", False)
+                    LOGGER.Info(" FEHLER: fileIO konnte nicht gesetzt werden - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" HINWEIS: Überprüfen Sie den Verweis auf die Bibliotheken 'WMOTool.WMFileIO' UND 'WMOTOOLLib.WMFileIO' und ändern diese in den Anwendungseinstellungen (DLL_WMOTOOL)'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
 
@@ -713,17 +714,17 @@ Public Class ClassWindream
                 ' open the windream object's file stream for writing
                 aWMStream = WMObject.OpenStream(STREAM_BinaryObject, WMObjectStreamOpenModeReadWrite)
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" Unexpected error in OpenStream - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" Unexpected error in OpenStream - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
                     Return False
                     'MsgBox(Err.Description)
                 End If
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...oWMStream erzeugt", False)
+                LOGGER.Info(" ...oWMStream erzeugt")
                 ' give fileIO helper object the windream stream
                 aFileIO.aWMStream = aWMStream
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" Unexpected error in Zuweisen aWMStream zu aFileIO - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" Unexpected error in Zuweisen aWMStream zu aFileIO - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
                     Return False
@@ -732,17 +733,17 @@ Public Class ClassWindream
                 ' let fileIO object import the original file into windream
                 aFileIO.ImportOriginal(True)
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" Unexpected error in FileIO.ImportOriginal(True) - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" Unexpected error in FileIO.ImportOriginal(True) - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
                     Return False
                     ' MsgBox(Err.Description)
                 End If
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Inhalt der Datei konnte übertragen werden", False)
+                LOGGER.Info(" ...Inhalt der Datei konnte übertragen werden")
                 ' close the windream file stream
                 aWMStream.Close()
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" Unexpected error in aWMStream.Close() - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" Unexpected error in aWMStream.Close() - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
                     Return False
@@ -751,17 +752,17 @@ Public Class ClassWindream
                 ' save new windream object
                 WMObject.save()
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" Unexpected error in WMObject.save - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" Unexpected error in WMObject.save - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
                     Return False
                     'MsgBox(Err.Description)
                 End If
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Datei konnte gespeichert werden", False)
+                LOGGER.Info(" ...Datei konnte gespeichert werden")
                 ' unlock the windream object
                 WMObject.unlock()
                 If Err.Number > 0 Then
-                    ClassLogger.Add(" Unexpected error in WMObject.unlock - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
+                    LOGGER.Info(" Unexpected error in WMObject.unlock - Datei wird wieder gelöscht - Error: '" & Err.Description & "'")
                     WMObject.Unlock()
                     Delete_WDFile(windreamFilename)
                     Return False
@@ -770,7 +771,7 @@ Public Class ClassWindream
                 'DATEI GRÖSSE ERMITTELN - MANCHMAL KOMMT ES VOR DAS DATEIGRÖße 0 ist
                 Dim info2 As New FileInfo(newfilename)
                 Dim length1 As Long = info2.Length
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Length der Zieldatei: " & length1.ToString, False)
+                LOGGER.Info(" ...Length der Zieldatei: " & length1.ToString)
                 If length > 0 And Err.Number = 0 Then
                     Dim p As String
                     If windreamFilename.StartsWith("\") Then
@@ -783,26 +784,26 @@ Public Class ClassWindream
                         p = "\" & windreamFilename
                     End If
                     CURRENT_NEWFILENAME = vWLaufwerk & ":" & p
-                    ClassLogger.Add(" >> Datei '" & CURRENT_NEWFILENAME & "' wurde erfolgreich importiert!", False)
+                    LOGGER.Info(" >> Datei '" & CURRENT_NEWFILENAME & "' wurde erfolgreich importiert!")
                     aktWMObject = WMObject
                     Return True
                 Else
                     Delete_WDFile(windreamFilename)
                     Console.WriteLine(Err.Number.ToString)
-                    ClassLogger.Add(" Unexpected error in Datei-Übertragen - FileLength ist 0, Übertragene Datei wurde gelöscht")
+                    LOGGER.Info(" Unexpected error in Datei-Übertragen - FileLength ist 0, Übertragene Datei wurde gelöscht")
                     Return False
                 End If
             Else
-                ClassLogger.Add(" Could not create a WMObject for file:'" & windreamFilename)
+                LOGGER.Info(" Could not create a WMObject for file:'" & windreamFilename)
                 If Not Err() Is Nothing Then
                     If Not Err.Description Is Nothing Then
-                        ClassLogger.Add(Err.Description)
+                        LOGGER.Info(Err.Description)
                     End If
                 End If
                 Return False
             End If
         Else
-            If LogErrorsOnly = False Then ClassLogger.Add("...targetPath existiert NICHT", False)
+            LOGGER.Info("...targetPath existiert NICHT")
             Return False
         End If
 
@@ -816,16 +817,17 @@ Public Class ClassWindream
             Try
                 WMObject = oSession.GetWMObjectByPath(WINDREAMLib.WMEntity.WMEntityDocument, WD_File) 'WINDREAMLib.WMEntity.WMEntityDocument
             Catch ex As Exception
-                ClassLogger.Add(">> Could not create WMObject for file '" & WD_File & "' - so it is not existing", False)
+                LOGGER.Info(">> Could not create WMObject for file '" & WD_File & "' - so it is not existing")
+                LOGGER.Error(ex.Message)
                 Return False
             End Try
 
-            If LogErrorsOnly = False Then ClassLogger.Add(" >> Deleting started - Object created", False)
+            LOGGER.Info(" >> Deleting started - Object created")
             WMObject.Delete()
             Return True
         Catch ex As Exception
             MsgBox("Unexpected Error in Delete_WDFile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            ClassLogger.Add("Unexpected Error in Delete_WDFile: " & ex.Message, False)
+            LOGGER.Info("Unexpected Error in Delete_WDFile: " & ex.Message)
             Return False
         End Try
     End Function
@@ -839,43 +841,43 @@ Public Class ClassWindream
     Public Shared Function DateiIndexieren(ByVal WD_File As String, ByVal _Indexname As String, ByVal _Value As String)
         Try
 
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...DateiIndexieren wurde aufgerufen", False)
+            LOGGER.Info(" ...DateiIndexieren wurde aufgerufen")
             WD_File = WD_File.Substring(2)
             Dim WMObject As WINDREAMLib.WMObject '= CreateObject("WINDREAMLib.WMObject")  'New WINDREAMLib.WMObject
             'MsgBox("DateiIndexieren:" & vbNewLine & ClassDateiimportWindream.GetWindreamDriveLetter & filenameZiel & vbNewLine & Me.selectedProfile.DokumenttypString)
             ' den Dokumenttyp schreiben
-            If LogErrorsOnly = False Then ClassLogger.Add(" ## Indexieren wird gestartet ##", False)
+            LOGGER.Info(" ## Indexieren wird gestartet ##")
             ' ein windream-Objekt der Datei anlegen
             WMObject = aktWMObject 'oSession.GetWMObjectByPath(WINDREAMLib.WMEntity.WMEntityDocument, WD_File)
             Try
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Datei wird gesperrt", False)
+                LOGGER.Info(" ...Datei wird gesperrt")
                 ' die Datei sperren
                 WMObject.lock()
             Catch ex As Exception
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Datei ist bereits gesperrt", False)
+                LOGGER.Info(" ...Datei ist bereits gesperrt")
                 ' nichts tun (Datei ist bereits gesperrt)
             End Try
 
             If IsNothing(WMObject) Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Windream Object ist nothing, Indexierung wird abgebrochen", False)
+                LOGGER.Info(" ...Windream Object ist nothing, Indexierung wird abgebrochen")
                 Return False
             End If
 
             If IsNothing(WMObject.aObjectType) Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Kein Objekttyp gesetzt, Indexierung wird abgebrochen", False)
+                LOGGER.Info(" ...Kein Objekttyp gesetzt, Indexierung wird abgebrochen")
                 Return False
             End If
 
-            If LogErrorsOnly = False Then ClassLogger.Add($" ...Objekttyp wird gesetzt: " & _WDObjekttyp, False)
+            LOGGER.Info($" ...Objekttyp wird gesetzt: " & _WDObjekttyp)
             ' wenn der Datei noch kein Dokumenttyp zugewiesen wurde
             If WMObject.aObjectType.aName = "Standard" Then
 
                 ' ihr den entsprechenden Dokumenttyp zuweisen
                 WMObject.aObjectType = oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityObjectType, _WDObjekttyp)
                 ' WMObject.aObjectType = Me.selectedProfile.Dokumenttyp
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Objekttyp wurde gesetzt", False)
+                LOGGER.Info(" ...Objekttyp wurde gesetzt")
             Else
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Objekttyp war bereits gesetzt", False)
+                LOGGER.Info(" ...Objekttyp war bereits gesetzt")
             End If
 
             Try
@@ -891,42 +893,42 @@ Public Class ClassWindream
             Catch ex As Exception
                 ' wenn das entsperren nicht geklappt hat, dann war die Datei auch nicht gesperrt
             End Try
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...Datei wurde gespeichert / Unlock wurde durchgeführt", False)
+            LOGGER.Info(" ...Datei wurde gespeichert / Unlock wurde durchgeführt")
             ' wenn bis hierher alles geklappt hat wurde ein Dokumenttyp übergeben
 
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...Objekttyp: " & _WDObjekttyp, False)
+            LOGGER.Info(" ...Objekttyp: " & _WDObjekttyp)
 
 
             ' wenn keine Werte vorhanden sind, soll wenigstens der Dokumenttyp eingetragen werden
 
             Dim indexe As String = ""
 
-            If LogErrorsOnly = False Then ClassLogger.Add(" ...Indexname: '" & _Indexname & "'", False)
+            LOGGER.Info(" ...Indexname: '" & _Indexname & "'")
             Dim werte = New ArrayList
             If (GetTypeOfIndexAsIntByName(_Indexname) = WMObjectVariableValueTypeVector) Or GetTypeOfIndexAsIntByName(_Indexname) = 4097 Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Es handelt sich um ein Vektor-Feld", False)
+                LOGGER.Info(" ...Es handelt sich um ein Vektor-Feld")
 
 
                 'Am 04.08.2014 aktualisiert: um zu verhindern das die vorangegangene Versionierung "Tilde-Werte" schreibt
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Wert vor Überprüfung: " & _Value, False)
+                LOGGER.Info(" ...Wert vor Überprüfung: " & _Value)
                 _Value = CheckIndexValue(_Value)
                 'Ausstieg da Fehler in der Überprüfung
                 If _Value Is Nothing Then
                     Return False
                 End If
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Value für Indexierung: " & _Value, False)
+                LOGGER.Info(" ...Value für Indexierung: " & _Value)
                 werte.Add(_Value)
 
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Werte zu Array hinzugefügt!", False)
+                LOGGER.Info(" ...Werte zu Array hinzugefügt!")
             Else
                 'Am 04.08.2014 aktualisiert: um zu verhindern das die vorangegangene Versionierung "Tilde-Werte" schreibt
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Value vor Überprüfung: " & _Value, False)
+                LOGGER.Info(" ...Value vor Überprüfung: " & _Value)
                 _Value = CheckIndexValue(_Value)
                 'Ausstieg da Fehler in der Überprüfung
                 If _Value Is Nothing Then
                     Return False
                 End If
-                If LogErrorsOnly = False Then ClassLogger.Add(" ...Value für Indexierung: " & _Value, False)
+                LOGGER.Info(" ...Value für Indexierung: " & _Value)
                 werte.Add(_Value)
 
             End If
@@ -940,8 +942,9 @@ Public Class ClassWindream
             Return RunIndexing(WMObject, arrIndex, arrValue)
 
         Catch ex As Exception
-            ClassLogger.Add("Hinweis: Die Datei " & WD_File & " konnte nicht indexiert werden.")
-            ClassLogger.Add("Fehler: " & ex.Message)
+            LOGGER.Info("Hinweis: Die Datei " & WD_File & " konnte nicht indexiert werden.")
+            LOGGER.Error(ex.Message)
+            LOGGER.Info("Fehler: " & ex.Message)
             ' Me.TreeNodeInfos.Add(temp)
             Return False
         End Try
@@ -955,16 +958,16 @@ Public Class ClassWindream
                     Dim i As Integer = 0
                     Dim indexname As String
                     If aValues.Length = 1 And aValues(0) = "" Then
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Indexwert ist leer/Nothing - Keine Nachindexierung", False)
+                        LOGGER.Info(" ...Indexwert ist leer/Nothing - Keine Nachindexierung")
                     End If
                     ' wenn der Datei noch kein Dokumenttyp zugewiesen wurde
                     If oDocument.aObjectType.aName <> _WDObjekttyp Then
                         ' ihr den entsprechenden Dokumenttyp zuweisen
                         oDocument.aObjectType = oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityObjectType, _WDObjekttyp)
                         ' WMObject.aObjectType = Me.selectedProfile.Dokumenttyp
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Objekttyp '" & oDocument.aObjectType.aName & "' wurde in '" & _WDObjekttyp & "' geändert.", False)
+                        LOGGER.Info(" ...Objekttyp '" & oDocument.aObjectType.aName & "' wurde in '" & _WDObjekttyp & "' geändert.")
                     Else
-                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Objekttyp war bereits gesetzt", False)
+                        LOGGER.Info(" ...Objekttyp war bereits gesetzt")
                     End If
 
                     Try
@@ -979,8 +982,8 @@ Public Class ClassWindream
                     For Each aName As String In Indizes
                         indexname = aName
                         If LogErrorsOnly = False Then
-                            ClassLogger.Add(" ", False)
-                            ClassLogger.Add(" >> Indexierung von Index '" & indexname & "'", False)
+                            LOGGER.Info(" ")
+                            LOGGER.Info(" >> Indexierung von Index '" & indexname & "'")
                         End If
                         ' das entsprechende Attribut aus windream auslesen
                         Dim oAttribute = oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, Indizes(i))
@@ -1006,45 +1009,45 @@ Public Class ClassWindream
                             Select Case (vType)
                                 'Case WMObjectVariableValueTypeUndefined
                                 Case WMObjectVariableValueTypeString
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeString", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeString")
                                     convertValue = CStr(value)
                                 Case WMObjectVariableValueTypeInteger
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeInteger", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
                                     value = value.ToString.Replace(" ", "")
                                     If IsNumeric(value) = False Then
-                                        If LogErrorsOnly = False Then ClassLogger.Add(" ...Achtung: Value '" & value & "' kann nicht in Zahl konvertiert werden!", False)
+                                        LOGGER.Info(" ...Achtung: Value '" & value & "' kann nicht in Zahl konvertiert werden!")
                                     End If
                                     value = value.ToString.Replace(" ", "")
                                     convertValue = CInt(value)
                                     _int = True
                                 Case WMObjectVariableValueTypeFloat
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFloat", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFloat")
                                     value = value.ToString.Replace(" ", "")
                                     convertValue = CDbl(value)
                                 Case WMObjectVariableValueTypeFixedPoint
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFixedPoint", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFixedPoint")
                                     value = value.ToString.Replace(" ", "")
                                     convertValue = CDbl(value)
                                     _dbl = True
                                 Case WMObjectVariableValueTypeBoolean
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeBoolean", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeBoolean")
                                     convertValue = CBool(value)
                                     _bool = True
                                 Case WMObjectVariableValueTypeDate
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeDate", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeDate")
                                     _date = True
                                     'Dim _date As Date = value
                                     convertValue = value
                                 Case WMObjectVariableValueTypeTimeStamp
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeTimeStamp", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeTimeStamp")
                                     convertValue = value
                                 Case WMObjectVariableValueTypeCurrency
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" - Typ des windream-Indexes: WMObjectVariableValueTypeCurrency", False)
+                                    LOGGER.Info(" - Typ des windream-Indexes: WMObjectVariableValueTypeCurrency")
                                     'Wegen currency muß ein eigenes Objekt vom typ Variant erzeugt werden
                                     Dim aValueWrapper As System.Runtime.InteropServices.CurrencyWrapper = New System.Runtime.InteropServices.CurrencyWrapper(CDec(value))
                                     convertValue = aValueWrapper
                                 Case WMObjectVariableValueTypeTime
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeTime", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeTime")
                                     'If ((value)) Then
                                     '    convertValue = CDate(value)
                                     'Else
@@ -1053,57 +1056,57 @@ Public Class ClassWindream
                                     'Dim _date As Date = value
                                     convertValue = convertValue '*_date.ToShortTimeString
                                 Case WMObjectVariableValueTypeFloat
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFloat", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFloat")
                                     convertValue = CStr(value)
                                 Case WMObjectVariableValueTypeVariant
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeVariant", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeVariant")
                                     convertValue = CStr(value)
                                 Case WMObjectVariableValueTypeFulltext
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFulltext", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: WMObjectVariableValueTypeFulltext")
                                     convertValue = CStr(value)
                                 Case 4097
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 4097 Vektor alphanumerisch", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 4097 Vektor alphanumerisch")
                                     'Vektor alphanumerisch
                                     convertValue = CStr(value)
                                 Case 4098
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 4098 Vektor Numerisch", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 4098 Vektor Numerisch")
                                     'Vektor Numerisch
                                     convertValue = CStr(value)
                                 Case 4099
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 4099 Vektor Kommazahl", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 4099 Vektor Kommazahl")
                                     'Vektor Kommazahl
                                     convertValue = CStr(value)
                                 Case 4101
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 4101 Vektor Date", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 4101 Vektor Date")
                                     'Vektor Kommazahl
                                     convertValue = CStr(value)
                                 Case 4103
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 4103 Vektor DateTime", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 4103 Vektor DateTime")
                                     'Vektor DateTime
                                     convertValue = CStr(value)
                                 Case 4107
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 4107 Integer 64bit", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 4107 Integer 64bit")
                                     convertValue = CStr(value)
                                 Case 36865
                                     vektor = True
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes: 36865 Vektor alphanumerisch", False)
+                                    LOGGER.Info(" ...Typ des windream-Indexes: 36865 Vektor alphanumerisch")
                                     'Vektor Kommazahl
                                     convertValue = CStr(value)
                                 Case Else
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Typ des windream-Indexes konnte nicht bestimmt werden!", False)
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Versuch des Auslesens (vType): " & vType)
+                                    LOGGER.Info(" ...Typ des windream-Indexes konnte nicht bestimmt werden!")
+                                    LOGGER.Info(" ...Versuch des Auslesens (vType): " & vType)
                                     'MsgBox(vType & vbNewLine & CStr(value), MsgBoxStyle.Exclamation, "Marlon-Case Else")
                                     convertValue = ""
                             End Select
                             If vektor = False Then
                                 If convertValue.ToString Is Nothing = False Then
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Konvertierter Wert: '" & convertValue.ToString & "'", False)
+                                    LOGGER.Info(" ...Konvertierter Wert: '" & convertValue.ToString & "'")
                                 End If
                             End If
                             '############################################################################################
@@ -1111,7 +1114,7 @@ Public Class ClassWindream
                             '############################################################################################
                             If vektor = False Then
                                 If convertValue.ToString Is Nothing = False Then
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" ...Versuch dem Dok einen Index zuzuweisen: oDocument.SetVariableValue(" & aName & ", " & convertValue & ")", False)
+                                    LOGGER.Info(" ...Versuch dem Dok einen Index zuzuweisen: oDocument.SetVariableValue(" & aName & ", " & convertValue & ")")
                                     If _int = True Then
                                         convertValue = convertValue.ToString.Replace(" ", "")
                                         oDocument.SetVariableValue(aName, CInt(convertValue))
@@ -1129,15 +1132,15 @@ Public Class ClassWindream
                                     oDocument.Save()
 
                                     If LogErrorsOnly = False Then
-                                        ClassLogger.Add(" ...Index '" & aName & "' wurde geschrieben", False)
-                                        ClassLogger.Add("", False)
+                                        LOGGER.Info(" ...Index '" & aName & "' wurde geschrieben")
+                                        LOGGER.Info("")
                                     End If
                                 Else
-                                    ClassLogger.Add(" >> Kein Indexwert vorhanden", False)
+                                    LOGGER.Info(" >> Kein Indexwert vorhanden")
                                 End If
                             Else
                                 'VEKTORFELDER, ALSO ÜBERPRÜFEN OB ERGEBNIS-ARRAY GEFÜLLT IST
-                                If LogErrorsOnly = False Then ClassLogger.Add(" >> VEKTORFELD: Vorbereiten des Arrays", False)
+                                LOGGER.Info(" >> VEKTORFELD: Vorbereiten des Arrays")
 
                                 Dim myArray()
 
@@ -1149,7 +1152,7 @@ Public Class ClassWindream
                                 Dim Anzahl As Integer = aValues.Length
                                 'Vektorfeld wird mit EINEM Wert gefüllt
                                 If Anzahl = 1 Then
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" >> Vektorfeld wird mit EINEM Wert gefüllt ", False)
+                                    LOGGER.Info(" >> Vektorfeld wird mit EINEM Wert gefüllt ")
                                     ReDim myArray(0)
                                     Select Case vType
                                         Case 36865
@@ -1181,12 +1184,12 @@ Public Class ClassWindream
                                     End Select
 
                                     'Jetzt überprüfen ob Werte in Vektorfeld angefügt oder überschrieben werden sollen
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" >> Konvertierter Wert: " & myArray(0).ToString, False)
+                                    LOGGER.Info(" >> Konvertierter Wert: " & myArray(0).ToString)
 
                                     Dim VektorArray()
 
                                     'Immer anfügen
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" >> Check Existing Vektorvalues", False)
+                                    LOGGER.Info(" >> Check Existing Vektorvalues")
 
                                     Dim indicies As New List(Of Object)
 
@@ -1212,14 +1215,14 @@ Public Class ClassWindream
                                         'Jetzt die Nachindexierung für Vektor-Felder
                                         oDocument.SetVariableValue(aName, myArray)
                                         'myArray)
-                                        If LogErrorsOnly = False Then ClassLogger.Add(" >> 'SetVariableValue' für VEKTOR mit einem Wert erfolgreich", False)
+                                        LOGGER.Info(" >> 'SetVariableValue' für VEKTOR mit einem Wert erfolgreich")
 
                                         'Die Änderungen festsschreiben/speichern
                                         oDocument.Save()
 
                                     End If
                                 Else
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" >> Vektorfeld wird mit MEHREREN Werten gefüllt ", False)
+                                    LOGGER.Info(" >> Vektorfeld wird mit MEHREREN Werten gefüllt ")
                                     ' das ausgewählte Profil in _selectedProfile laden
 
 
@@ -1229,10 +1232,10 @@ Public Class ClassWindream
                                     'Die Datatable durchlaufen und Werte für den Index in Array schreiben
                                     For Each obj In myArray
                                         myArray(i1) = CStr(obj)
-                                        If LogErrorsOnly = False Then ClassLogger.Add(" >> Wert (" & i1 & ") aus Datatable: '" & myArray(i1).ToString & "'", False)
+                                        LOGGER.Info(" >> Wert (" & i1 & ") aus Datatable: '" & myArray(i1).ToString & "'")
                                         i1 = i1 + 1
                                     Next
-                                    If LogErrorsOnly = False Then ClassLogger.Add(" >> Array wurde erfolgreich erzeugt", False)
+                                    LOGGER.Info(" >> Array wurde erfolgreich erzeugt")
 
 
                                     Dim VektorArray()
@@ -1269,28 +1272,29 @@ Public Class ClassWindream
                                                     'Die Größe des Arrays festlegen
                                                     myArray(i1) = CStr(myArray(0))
                                             End Select
-                                            If LogErrorsOnly = False Then ClassLogger.Add(" >> Konvertierter Wert (" & i1 & ") : '" & myArray(i1).ToString & "'", False)
+                                            LOGGER.Info(" >> Konvertierter Wert (" & i1 & ") : '" & myArray(i1).ToString & "'")
                                             i1 += 1
                                         Next
                                         'Jetzt die Nachindexierung für Vektor-Felder
                                         Try
                                             oDocument.SetVariableValue(aName, myArray)
                                         Catch ex As Exception
-                                            ClassLogger.Add("RunIndexing -Unexpected error in indexing Vectorfield: " & ex.Message, True)
+                                            LOGGER.Info("RunIndexing -Unexpected error in indexing Vectorfield: " & ex.Message)
+                                            LOGGER.Error(ex.Message)
                                             oDocument.Save()
                                             oDocument.unlock()
                                             Return False
                                         End Try
 
-                                        If LogErrorsOnly = False Then ClassLogger.Add(" >> 'SetVariableValue' für VEKTOR erfolgreich", False)
+                                        LOGGER.Info(" >> 'SetVariableValue' für VEKTOR erfolgreich")
 
                                         ' oDocument.LockRights()
 
                                         'Die Änderungen festsschreiben/speichern
                                         oDocument.Save()
-                                        If LogErrorsOnly = False Then ClassLogger.Add(">> Indexierung erfolgreich beendet (Save ...", False)
+                                        LOGGER.Info(">> Indexierung erfolgreich beendet (Save ...")
                                     Else
-                                        ClassLogger.Add(" - Achtung: VektorArray Is NOTHING", False)
+                                        LOGGER.Info(" - Achtung: VektorArray Is NOTHING")
                                         oDocument.Save()
                                         Return True
                                     End If
@@ -1303,18 +1307,19 @@ Public Class ClassWindream
                     Next
                     oDocument.unlock()
                     If LogErrorsOnly = False Then
-                        ClassLogger.Add(">> ...und Unlock durchgeführt)", False)
-                        ClassLogger.Add("", False)
+                        LOGGER.Info(">> ...und Unlock durchgeführt)")
+                        LOGGER.Info("")
                     End If
                     Return True
                 Else
-                    ClassLogger.Add(" >> Dokument ist gesperrt, Indexierung erst im nächsten Durchlauf!", False)
+                    LOGGER.Info(" >> Dokument ist gesperrt, Indexierung erst im nächsten Durchlauf!")
                     'oDocument.unlock()
                     Return False
                 End If
             End If
         Catch ex As Exception
-            ClassLogger.Add("ClassNiWindream.RunIndexing: " & ex.Message)
+            LOGGER.Info("ClassNiWindream.RunIndexing: " & ex.Message)
+            LOGGER.Error(ex.Message)
             oDocument.Save()
             oDocument.unlock()
             Return False
@@ -1331,7 +1336,7 @@ Public Class ClassWindream
                 'Nochmals prüfen ob wirklich Array
                 If wertWD.GetType.ToString.Contains("System.Object") Then
                     'Keine Duplikatprüfung also einfach neues Array füllen
-                    If LogErrorsOnly = False Then ClassLogger.Add(" >> Duplikatprüfung soll durchgeführt werden.", False)
+                    LOGGER.Info(" >> Duplikatprüfung soll durchgeführt werden.")
                     'Duplikat Prüfung an, also nur anhängen wenn Wert <>
                     For Each WDValue As Object In wertWD
                         If WDValue Is Nothing = False Then
@@ -1352,14 +1357,14 @@ Public Class ClassWindream
                                 ValueArray(Anzahl) = NewValue.ToString
                                 Anzahl += 1
                             Else
-                                ClassLogger.Add(" >> Value '" & NewValue.ToString & "' bereits in Vektorfeld enthalten", False)
+                                LOGGER.Info(" >> Value '" & NewValue.ToString & "' bereits in Vektorfeld enthalten")
                             End If
                         End If
                     Next
 
                 End If
             Else
-                If LogErrorsOnly = False Then ClassLogger.Add(" >> Vektorfeld ist noch leer....", False)
+                LOGGER.Info(" >> Vektorfeld ist noch leer....")
                 'Den/die Neuen Wert(e) anfügen
                 For Each NewValue As Object In NIIndexe
                     If NewValue Is Nothing = False Then
@@ -1372,7 +1377,7 @@ Public Class ClassWindream
                                 ValueArray(Anzahl) = NewValue.ToString
                                 Anzahl += 1
                             Else
-                                ClassLogger.Add(" >> Value '" & NewValue.ToString & "' bereits in Array enthalten", False)
+                                LOGGER.Info(" >> Value '" & NewValue.ToString & "' bereits in Array enthalten")
                             End If
                         Else 'Dererste Wert, also hinzufügen
                             'Das Array anpassen
@@ -1389,7 +1394,8 @@ Public Class ClassWindream
 
             Return ValueArray
         Catch ex As Exception
-            ClassLogger.Add("Unexpected Error in ClassWindream.Return_VektorArray: " & ex.Message, True)
+            LOGGER.Info("Unexpected Error in ClassWindream.Return_VektorArray: " & ex.Message)
+            LOGGER.Error(ex.Message)
         End Try
 
 
@@ -1423,7 +1429,7 @@ Public Class ClassWindream
     ''' <returns>Liefert True wenn das Indexieren erfolgreich war, sonst False</returns>
     ''' <remarks></remarks>
     Public Shared Function Indexiere(ByVal filenameZiel As String, ByVal index As String, ByVal werte As Object) As Boolean
-        If LogErrorsOnly = False Then ClassLogger.Add(" - In Indexierungsvorgang für: " & filenameZiel, False)
+        LOGGER.Info(" - In Indexierungsvorgang für: " & filenameZiel)
         Try
             Dim WMObject As WINDREAMLib.WMObject = Nothing '= CreateObject("WINDREAMLib.WMObject") '= New WINDREAMLib.WMObject 'CreateObject("WINDREAMLib.WMObject")
             'MsgBox("Indexiere: " & vbNewLine & filenameZiel)
@@ -1434,7 +1440,7 @@ Public Class ClassWindream
                index Is Nothing Or
                index = "" Or
                Not ExistIndexInObjekttyp(_WDObjekttyp, index) Then
-                If LogErrorsOnly = False Then ClassLogger.Add("=> Hinweis: Die Datei wurde auf Grund eines Problems in der Initialisierung nicht vollständig indexiert.", False)
+                LOGGER.Info("=> Hinweis: Die Datei wurde auf Grund eines Problems in der Initialisierung nicht vollständig indexiert.")
                 Return False
             End If
 
@@ -1449,7 +1455,7 @@ Public Class ClassWindream
                     fileExists = False
                     Exit Do
                 Else
-                    If LogErrorsOnly = False Then ClassLogger.Add(" Achtung: Datei exisitiert noch nicht: " & My.Computer.Clock.LocalTime, True)
+                    LOGGER.Info(" Achtung: Datei exisitiert noch nicht: " & My.Computer.Clock.LocalTime)
                 End If
                 an = an + 1
             Loop
@@ -1468,8 +1474,8 @@ Public Class ClassWindream
                     ' ein windream-Objekt der Datei anlegen
                     WMObject = oSession.GetWMObjectByPath(WINDREAMLib.WMEntity.WMEntityDocument, filenameZiel)
                     If LogErrorsOnly = False Then
-                        ClassLogger.Add(" - windream-Objekt der Datei erzeugt", False)
-                        ClassLogger.Add(" - Ziel: W:\" & filenameZiel, False)
+                        LOGGER.Info(" - windream-Objekt der Datei erzeugt")
+                        LOGGER.Info(" - Ziel: W:\" & filenameZiel)
                     End If
 
                     'Me.singleInfoNode.Add("Ziel: " & ClassDateiimportWindream.GetWindreamDriveLetter & filenameZiel)
@@ -1509,9 +1515,9 @@ Public Class ClassWindream
 
                     ' wenn es sich bei dem Index NICHT um ein Vektorfeld handelt
                     If TypDesIndexes < WMObjectVariableValueTypeVector Then
-                        If LogErrorsOnly = False Then ClassLogger.Add(" - Bei dem Zielindex handelt es sich um einen Einzelindex.", False)
+                        LOGGER.Info(" - Bei dem Zielindex handelt es sich um einen Einzelindex.")
                     Else
-                        If LogErrorsOnly = False Then ClassLogger.Add(" Bei dem Zielindex handelt es sich um ein Vektorfeld.", False)
+                        LOGGER.Info(" Bei dem Zielindex handelt es sich um ein Vektorfeld.")
                         ' ein Backup der Indexwerte anlegen 
                         Dim temp As Object = werte
                         ' und die eigendliche Variable zurücksetzen
@@ -1519,17 +1525,18 @@ Public Class ClassWindream
                         ' dann soll nur der letzte Wert des Arrays übernommen werden, damit nicht versucht wird ein
                         ' Array in einen Einzelindex zu speichern
                         werte = temp
-                        If LogErrorsOnly = False Then ClassLogger.Add(" - Array geleert und erneuert!", False)
+                        LOGGER.Info(" - Array geleert und erneuert!")
                     End If
                 Catch ex As Exception
-                    ClassLogger.Add("Hinweis: Beim Initialisieren der Datei auf dem windream-Laufwerk ist ein Fehler aufgetreten.", False)
+                    LOGGER.Info("Hinweis: Beim Initialisieren der Datei auf dem windream-Laufwerk ist ein Fehler aufgetreten.")
+                    LOGGER.Error(ex.Message)
                     Return False
                 End Try
 
 
                 'Try
                 ' den Typ des Zielindexes 
-                If LogErrorsOnly = False Then ClassLogger.Add(" - Typ des Indexes: " & TypDesIndexes.ToString, False)
+                LOGGER.Info(" - Typ des Indexes: " & TypDesIndexes.ToString)
                 Select Case (TypDesIndexes)
                     Case WMObjectVariableValueTypeUndefined  ' zu klären !!!!
                         'convertValue = vbEmpty
@@ -1538,7 +1545,7 @@ Public Class ClassWindream
                         'If werte.ToString.StartsWith("0") Then
                         '    Dim wert As String = CStr(CInt(werte.ToString))
                         '    convertValue = wert
-                        '    ClassLogger.Add(" - Führende Nullen wurden entfernt", False)
+                        '    LOGGER.Info(" - Führende Nullen wurden entfernt")
                         'Else
                         '    Dim wert As String = CStr(CInt(werte.ToString))
                         '    convertValue = wert
@@ -1618,7 +1625,7 @@ Public Class ClassWindream
                     Case Else
                         ' wenn es sich um einen TypVektorIndex handelt
                         If TypDesIndexes >= 4096 And TypDesIndexes < 8192 Then
-                            If LogErrorsOnly = False Then ClassLogger.Add("- Es handelt sich um einen Vektorindex", False)
+                            LOGGER.Info("- Es handelt sich um einen Vektorindex")
                             'Dim temp_arr As New ArrayList
 
                             Dim arrayIndex = 0
@@ -1633,7 +1640,7 @@ Public Class ClassWindream
                             Select Case (TypDesIndexes - WMObjectVariableValueTypeVector)
                                 'VektorIndex vom Typ String 64'
                                 Case 1
-                                    If LogErrorsOnly = False Then ClassLogger.Add("- VektorIndex vom Typ String 1", False)
+                                    LOGGER.Info("- VektorIndex vom Typ String 1")
 
                                     For Each wert As Object In werte
                                         'Führende Nullen Entfernen
@@ -1641,7 +1648,7 @@ Public Class ClassWindream
                                             Dim werteString As String = CStr(CInt(wert.ToString))
                                             wert = werteString
                                             temp_arr(arrayIndex) = CStr(wert)
-                                            ClassLogger.Add("- Führende Nullen wurden entfernt", False)
+                                            LOGGER.Info("- Führende Nullen wurden entfernt")
                                         Else
                                             temp_arr(arrayIndex) = CStr(wert)
 
@@ -1649,30 +1656,30 @@ Public Class ClassWindream
 
                                         arrayIndex = arrayIndex + 1
 
-                                        If LogErrorsOnly = False Then ClassLogger.Add("- Wert " & CStr(wert) & " konvertiert", False)
+                                        LOGGER.Info("- Wert " & CStr(wert) & " konvertiert")
                                     Next
                                 Case WMObjectVariableValueTypeUndefined
                                     ' convertValue = ""
 
                                 Case WMObjectVariableValueTypeString
-                                    If LogErrorsOnly = False Then ClassLogger.Add("- VektorIndex vom Typ String 2", False)
+                                    LOGGER.Info("- VektorIndex vom Typ String 2")
                                     For Each wert As Object In werte
                                         'Führende Nullen Entfernen
                                         If werte.ToString.StartsWith("0") Then
                                             wert = CInt(wert)
                                             temp_arr(arrayIndex) = CStr(wert)
-                                            ClassLogger.Add("- Führende Nullen wurden entfernt", False)
+                                            LOGGER.Info("- Führende Nullen wurden entfernt")
                                         Else
                                             temp_arr(arrayIndex) = CStr(wert)
                                         End If
 
                                         arrayIndex = arrayIndex + 1
 
-                                        If LogErrorsOnly = False Then ClassLogger.Add("- Wert " & CStr(wert) & " konvertiert", False)
+                                        LOGGER.Info("- Wert " & CStr(wert) & " konvertiert")
                                     Next
 
                                 Case WMObjectVariableValueTypeInteger
-                                    If LogErrorsOnly = False Then ClassLogger.Add("- VektorIndex vom Typ Integer", False)
+                                    LOGGER.Info("- VektorIndex vom Typ Integer")
                                     For Each wert As Object In werte
                                         temp_arr(arrayIndex) = CInt(wert)
                                         arrayIndex = arrayIndex + 1
@@ -1735,7 +1742,7 @@ Public Class ClassWindream
 
                             werte = temp_arr
 
-                            If LogErrorsOnly = False Then ClassLogger.Add("- Werte erfolgreich konvertiert", False)
+                            LOGGER.Info("- Werte erfolgreich konvertiert")
                         Else
                             '  convertValue = vbEmpty
                         End If
@@ -1744,7 +1751,7 @@ Public Class ClassWindream
 
                 'Catch ex As Exception
                 '    ' einen Hinweis über einen aufgetretenen Fehler an das Array für den TreeView-Log anhängen
-                '    ClassLogger.Add("Unexpected error in Auswerten/Konvertieren des Typs!", ex.Message)
+                '    LOGGER.Info("Unexpected error in Auswerten/Konvertieren des Typs!", ex.Message)
                 '    ' die Indexierungsinformationen für den TreeView-Log zurückgeben
                 '    Return False
                 'End Try
@@ -1758,21 +1765,21 @@ Public Class ClassWindream
                 ' den konvertierten Indexwert dem entsprechenden Index zuweisen
                 WMObject.SetVariableValue(index, werte)
                 If LogErrorsOnly = False Then
-                    ClassLogger.Add(" - den konvertierten Indexwert dem entsprechenden Index zuweisen", False)
-                    ClassLogger.Add(" - Indexname: " & index.ToString, False)
-                    ClassLogger.Add(" - Indexwert: " & werte.ToString, False)
+                    LOGGER.Info(" - den konvertierten Indexwert dem entsprechenden Index zuweisen")
+                    LOGGER.Info(" - Indexname: " & index.ToString)
+                    LOGGER.Info(" - Indexwert: " & werte.ToString)
                 End If
                 'End If
 
                 ' die Indexinformationen des Dokuments speichern
                 WMObject.Save()
-                If LogErrorsOnly = False Then ClassLogger.Add(" - die Indexinformationen des Dokuments speichern", False)
+                LOGGER.Info(" - die Indexinformationen des Dokuments speichern")
                 ' Unlock in einem unbehandelten Try-Block um Fehler abzufangen, 
                 ' wenn eine Datei nicht gesperrt ist
                 Try
                     ' die Sperrung des Dokuments aufheben
                     WMObject.unlock()
-                    If LogErrorsOnly = False Then ClassLogger.Add(" - die Sperrung des Dokuments aufheben", False)
+                    LOGGER.Info(" - die Sperrung des Dokuments aufheben")
                 Catch ex As Exception
 
                     ' nichts tun (Datei war nicht gesperrt)
@@ -1782,12 +1789,13 @@ Public Class ClassWindream
                 Return True
             Else
                 ' die Indexierungsinformationen für den TreeView-Log zurückgeben
-                ClassLogger.Add(" Hinweis: Die Datei hat zum Zeitpunkt der Indexierung noch nicht auf dem windream-Laufwerk existiert.", False)
+                LOGGER.Info(" Hinweis: Die Datei hat zum Zeitpunkt der Indexierung noch nicht auf dem windream-Laufwerk existiert.")
             End If
 
         Catch ex As Exception
-            ClassLogger.Add(" Hinweis: Unbekannter Unexpected error inm Indexieren der Datei.")
-            ClassLogger.Add(ex.Message)
+            LOGGER.Info(" Hinweis: Unbekannter Unexpected error inm Indexieren der Datei.")
+            LOGGER.Error(ex.Message)
+            LOGGER.Info(ex.Message)
         End Try
 
         Return True
@@ -1886,7 +1894,8 @@ Public Class ClassWindream
 
             Return input
         Catch ex As Exception
-            ClassLogger.Add("Fehler in CheckIndexValue: " & ex.Message)
+            LOGGER.Info("Fehler in CheckIndexValue: " & ex.Message)
+            LOGGER.Error(ex.message)
             Return Nothing
         End Try
 

Global_Indexer/Global_Indexer.vbproj

@@ -170,8 +170,9 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\DLLLicenseManager.dll</HintPath>
     </Reference>
-    <Reference Include="Independentsoft.Msg">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\14_11_19_MIME_UTF_ENCODING\Independentsoft.Msg.dll</HintPath>
+    <Reference Include="Independentsoft.Msg.2.0.570.21482, Version=2.0.570.21482, Culture=neutral, PublicKeyToken=76be97fe952f1ec7, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\Independentsoft.Msg.2.0.570.21482.dll</HintPath>
     </Reference>
     <Reference Include="Interop.WINDREAMLib">
       <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath>
@@ -230,7 +231,9 @@
     <Compile Include="ClassConstants.vb" />
     <Compile Include="ClassControls.vb" />
     <Compile Include="ClassDatabase.vb" />
+    <Compile Include="ClassDatatables.vb" />
     <Compile Include="ClassDragDrop.vb" />
+    <Compile Include="ClassFileDrop.vb" />
     <Compile Include="ClassEmail.vb" />
     <Compile Include="ClassEncryption.vb" />
     <Compile Include="ClassFilehandle.vb" />
@@ -369,12 +372,6 @@
     <Compile Include="frmTestvb.vb">
       <SubType>Form</SubType>
     </Compile>
-    <Compile Include="frmUserKonfig_AddUsers.designer.vb">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmUserKonfig_AddUsers.vb">
-      <SubType>Form</SubType>
-    </Compile>
     <Compile Include="ModuleCURRENT.vb" />
     <Compile Include="ModuleHelpers.vb" />
     <Compile Include="ModuleMySettings.vb" />
@@ -536,12 +533,6 @@
     <EmbeddedResource Include="frmStart.resx">
       <DependentUpon>frmStart.vb</DependentUpon>
     </EmbeddedResource>
-    <EmbeddedResource Include="frmUserKonfig_AddUsers.en-US.resx">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmUserKonfig_AddUsers.resx">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </EmbeddedResource>
     <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="My Project\Resources.resx">
       <Generator>VbMyResourcesResXFileCodeGenerator</Generator>

Global_Indexer/Global_Indexer.vbproj.bak

@@ -1,779 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
-  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
-  <PropertyGroup>
-    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
-    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
-    <ProjectGuid>{7474B1D2-49A4-4D12-B544-C8674D3F7231}</ProjectGuid>
-    <OutputType>WinExe</OutputType>
-    <StartupObject>Global_Indexer.My.MyApplication</StartupObject>
-    <RootNamespace>Global_Indexer</RootNamespace>
-    <AssemblyName>Global_Indexer</AssemblyName>
-    <FileAlignment>512</FileAlignment>
-    <MyType>WindowsForms</MyType>
-    <TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
-    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
-    <PublishUrl>publish\</PublishUrl>
-    <Install>true</Install>
-    <InstallFrom>Disk</InstallFrom>
-    <UpdateEnabled>false</UpdateEnabled>
-    <UpdateMode>Foreground</UpdateMode>
-    <UpdateInterval>7</UpdateInterval>
-    <UpdateIntervalUnits>Days</UpdateIntervalUnits>
-    <UpdatePeriodically>false</UpdatePeriodically>
-    <UpdateRequired>false</UpdateRequired>
-    <MapFileExtensions>true</MapFileExtensions>
-    <ApplicationRevision>0</ApplicationRevision>
-    <ApplicationVersion>1.0.0.%2a</ApplicationVersion>
-    <IsWebBootstrapper>false</IsWebBootstrapper>
-    <UseApplicationTrust>false</UseApplicationTrust>
-    <BootstrapperEnabled>true</BootstrapperEnabled>
-    <TargetFrameworkProfile />
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
-    <DebugSymbols>true</DebugSymbols>
-    <DebugType>full</DebugType>
-    <DefineDebug>true</DefineDebug>
-    <DefineTrace>true</DefineTrace>
-    <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>Global_Indexer.xml</DocumentationFile>
-    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
-    <DebugType>pdbonly</DebugType>
-    <DefineDebug>false</DefineDebug>
-    <DefineTrace>true</DefineTrace>
-    <Optimize>true</Optimize>
-    <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>Global_Indexer.xml</DocumentationFile>
-    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionExplicit>On</OptionExplicit>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionCompare>Text</OptionCompare>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionStrict>Off</OptionStrict>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionInfer>On</OptionInfer>
-  </PropertyGroup>
-  <PropertyGroup>
-    <ApplicationIcon>DD_Icons_ICO_GLOBIX_128.ico</ApplicationIcon>
-  </PropertyGroup>
-  <PropertyGroup>
-    <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
-  </PropertyGroup>
-  <ItemGroup>
-    <Reference Include="DevExpress.Charts.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Data.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.DataAccess.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.DataAccess.v15.2.UI, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Office.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Pdf.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Pdf.v15.2.Drawing, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Printing.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.RichEdit.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Sparkline.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Spreadsheet.v15.2.Core, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Utils.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.Utils.v15.2.UI, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraCharts.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraCharts.v15.2.Wizard, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraLayout.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraNavBar.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraPdfViewer.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraPrinting.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraRichEdit.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraSpreadsheet.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DevExpress.XtraTreeList.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-    </Reference>
-    <Reference Include="DigitalData.Controls.DocumentViewer">
-      <HintPath>..\..\DDMonorepo\Controls.DocumentViewer\bin\Debug\DigitalData.Controls.DocumentViewer.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Config">
-      <HintPath>..\..\DDMonorepo\Modules.Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Filesystem">
-      <HintPath>..\..\DDMonorepo\Modules.Config\bin\Debug\DigitalData.Modules.Filesystem.dll</HintPath>
-    </Reference>
-    <Reference Include="DigitalData.Modules.Logging">
-      <HintPath>..\..\DDMonorepo\Modules.Config\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
-    </Reference>
-    <Reference Include="DLLLicenseManager, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\DLLLicenseManager.dll</HintPath>
-    </Reference>
-    <Reference Include="Independentsoft.Msg, Version=2.0.350.20602, Culture=neutral, PublicKeyToken=76be97fe952f1ec7, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\Independentsoft.Msg.dll</HintPath>
-    </Reference>
-    <Reference Include="Interop.WINDREAMLib">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath>
-      <EmbedInteropTypes>False</EmbedInteropTypes>
-    </Reference>
-    <Reference Include="Interop.WMOTOOLLib">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOTOOLLib.dll</HintPath>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </Reference>
-    <Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
-      <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\packages\NLog.4.5.11\lib\net45\NLog.dll</HintPath>
-    </Reference>
-    <Reference Include="Oracle.ManagedDataAccess">
-      <HintPath>P:\Visual Studio Projekte\Bibliotheken\Oracle.ManagedDataAccess.dll</HintPath>
-    </Reference>
-    <Reference Include="PresentationCore" />
-    <Reference Include="System" />
-    <Reference Include="System.ComponentModel.DataAnnotations" />
-    <Reference Include="System.Data" />
-    <Reference Include="System.Data.Linq" />
-    <Reference Include="System.Deployment" />
-    <Reference Include="System.DirectoryServices" />
-    <Reference Include="System.DirectoryServices.AccountManagement" />
-    <Reference Include="System.Drawing" />
-    <Reference Include="System.Runtime.Remoting" />
-    <Reference Include="System.Web.Services" />
-    <Reference Include="System.Windows.Forms" />
-    <Reference Include="System.Xml" />
-    <Reference Include="System.Core" />
-    <Reference Include="System.Xml.Linq" />
-    <Reference Include="System.Data.DataSetExtensions" />
-    <Reference Include="UIAutomationClient" />
-  </ItemGroup>
-  <ItemGroup>
-    <Import Include="Microsoft.VisualBasic" />
-    <Import Include="System" />
-    <Import Include="System.Collections" />
-    <Import Include="System.Collections.Generic" />
-    <Import Include="System.Data" />
-    <Import Include="System.Drawing" />
-    <Import Include="System.Diagnostics" />
-    <Import Include="System.Windows.Forms" />
-    <Import Include="System.Linq" />
-    <Import Include="System.Xml.Linq" />
-    <Import Include="System.Threading.Tasks" />
-  </ItemGroup>
-  <ItemGroup>
-    <Compile Include="AboutBox1.Designer.vb">
-      <DependentUpon>AboutBox1.vb</DependentUpon>
-    </Compile>
-    <Compile Include="AboutBox1.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="ClassConfig.vb" />
-    <Compile Include="ClassConstants.vb" />
-    <Compile Include="ClassControls.vb" />
-    <Compile Include="ClassDatabase.vb" />
-    <Compile Include="ClassDragDrop.vb" />
-    <Compile Include="ClassEmail.vb" />
-    <Compile Include="ClassEncryption.vb" />
-    <Compile Include="ClassFilehandle.vb" />
-    <Compile Include="ClassFolderWatcher.vb" />
-    <Compile Include="ClassFormFunctions.vb" />
-    <Compile Include="ClassHelper.vb" />
-    <Compile Include="ClassHotkey_Windream.vb" />
-    <Compile Include="ClassIndexFunctions.vb" />
-    <Compile Include="ClassInit.vb" />
-    <Compile Include="ClassLayout.vb" />
-    <Compile Include="ClassLicence.vb" />
-    <Compile Include="ClassLogger.vb" />
-    <Compile Include="ClassPostprocessing.vb" />
-    <Compile Include="ClassWindowAPI.vb" />
-    <Compile Include="ClassWindream.vb" />
-    <Compile Include="ClassEmailHeaderExtractor.vb" />
-    <Compile Include="clsHotkey.vb" />
-    <Compile Include="frmAdministration.Designer.vb">
-      <DependentUpon>frmAdministration.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmAdministration.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmConfig_Basic.designer.vb">
-      <DependentUpon>frmConfig_Basic.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmConfig_Basic.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmConnections.Designer.vb">
-      <DependentUpon>frmConnections.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmConnections.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmHistory.Designer.vb">
-      <DependentUpon>frmHistory.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmHistory.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmHotKey_Add.Designer.vb">
-      <DependentUpon>frmHotKey_Add.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmHotKey_Add.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmHotkey_User.Designer.vb">
-      <DependentUpon>frmHotkey_User.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmHotkey_User.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmIndex.designer.vb">
-      <DependentUpon>frmIndex.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmIndex.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmIndexFileList.Designer.vb">
-      <DependentUpon>frmIndexFileList.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmIndexFileList.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmLicense.designer.vb">
-      <DependentUpon>frmLicense.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmLicense.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmLookupGrid.Designer.vb">
-      <DependentUpon>frmLookupGrid.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmLookupGrid.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmMissingInput.Designer.vb">
-      <DependentUpon>frmMissingInput.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmMissingInput.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmNamenkonvention.designer.vb">
-      <DependentUpon>frmNamenkonvention.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmNamenkonvention.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmSplash.designer.vb">
-      <DependentUpon>frmSplash.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmSplash.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmSQL-Result.Designer.vb">
-      <DependentUpon>frmSQL-Result.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmSQL-Result.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmSQLConfigAutoIndex.Designer.vb">
-      <DependentUpon>frmSQLConfigAutoIndex.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmSQLConfigAutoIndex.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmSQLSuggestion.Designer.vb">
-      <DependentUpon>frmSQLSuggestion.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmSQLSuggestion.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmSQL_Admin.designer.vb">
-      <DependentUpon>frmSQL_Admin.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmSQL_Admin.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmStart.Designer.vb">
-      <DependentUpon>frmStart.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmStart.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmTestvb.Designer.vb">
-      <DependentUpon>frmTestvb.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmTestvb.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="frmUserKonfig_AddUsers.designer.vb">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </Compile>
-    <Compile Include="frmUserKonfig_AddUsers.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="ModuleCURRENT.vb" />
-    <Compile Include="ModuleMySettings.vb" />
-    <Compile Include="ModuleUserSavings.vb" />
-    <Compile Include="ModuleWindowHandles.vb" />
-    <Compile Include="My Project\AssemblyInfo.vb" />
-    <Compile Include="My Project\Application.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DependentUpon>Application.myapp</DependentUpon>
-    </Compile>
-    <Compile Include="My Project\Resources.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DesignTime>True</DesignTime>
-      <DependentUpon>Resources.resx</DependentUpon>
-    </Compile>
-    <Compile Include="My Project\Settings.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DependentUpon>Settings.settings</DependentUpon>
-      <DesignTimeSharedInput>True</DesignTimeSharedInput>
-    </Compile>
-    <Compile Include="MyDataset.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DesignTime>True</DesignTime>
-      <DependentUpon>MyDataset.xsd</DependentUpon>
-    </Compile>
-    <Compile Include="MyDataset.vb">
-      <DependentUpon>MyDataset.xsd</DependentUpon>
-    </Compile>
-    <Compile Include="Strings\_frmLicense.en-US.Designer.vb">
-      <DependentUpon>_frmLicense.en-US.resx</DependentUpon>
-      <AutoGen>True</AutoGen>
-      <DesignTime>True</DesignTime>
-    </Compile>
-    <Compile Include="Strings\_frmLicense.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DesignTime>True</DesignTime>
-      <DependentUpon>_frmLicense.resx</DependentUpon>
-    </Compile>
-  </ItemGroup>
-  <ItemGroup>
-    <EmbeddedResource Include="AboutBox1.resx">
-      <DependentUpon>AboutBox1.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmAdministration.en-US.resx">
-      <DependentUpon>frmAdministration.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmAdministration.resx">
-      <DependentUpon>frmAdministration.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmConfig_Basic.de.resx">
-      <DependentUpon>frmConfig_Basic.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmConfig_Basic.en-US.resx">
-      <DependentUpon>frmConfig_Basic.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmConfig_Basic.en.resx">
-      <DependentUpon>frmConfig_Basic.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmConfig_Basic.resx">
-      <DependentUpon>frmConfig_Basic.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmConnections.en-US.resx">
-      <DependentUpon>frmConnections.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmConnections.resx">
-      <DependentUpon>frmConnections.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmHistory.en-US.resx">
-      <DependentUpon>frmHistory.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmHistory.resx">
-      <DependentUpon>frmHistory.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmHotKey_Add.resx">
-      <DependentUpon>frmHotKey_Add.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmHotkey_User.en-US.resx">
-      <DependentUpon>frmHotkey_User.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmHotkey_User.resx">
-      <DependentUpon>frmHotkey_User.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmIndex.en-US.resx">
-      <DependentUpon>frmIndex.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmIndex.resx">
-      <DependentUpon>frmIndex.vb</DependentUpon>
-      <SubType>Designer</SubType>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmIndexFileList.en-US.resx">
-      <DependentUpon>frmIndexFileList.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmIndexFileList.resx">
-      <DependentUpon>frmIndexFileList.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmLicense.en-US.resx">
-      <DependentUpon>frmLicense.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmLicense.resx">
-      <DependentUpon>frmLicense.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmLookupGrid.resx">
-      <DependentUpon>frmLookupGrid.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmMissingInput.en-US.resx">
-      <DependentUpon>frmMissingInput.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmMissingInput.resx">
-      <DependentUpon>frmMissingInput.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmNamenkonvention.en-US.resx">
-      <DependentUpon>frmNamenkonvention.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmNamenkonvention.resx">
-      <DependentUpon>frmNamenkonvention.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSplash.resx">
-      <DependentUpon>frmSplash.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQL-Result.en-US.resx">
-      <DependentUpon>frmSQL-Result.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQL-Result.resx">
-      <DependentUpon>frmSQL-Result.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQLConfigAutoIndex.en-US.resx">
-      <DependentUpon>frmSQLConfigAutoIndex.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQLConfigAutoIndex.resx">
-      <DependentUpon>frmSQLConfigAutoIndex.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQLSuggestion.en-US.resx">
-      <DependentUpon>frmSQLSuggestion.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQLSuggestion.resx">
-      <DependentUpon>frmSQLSuggestion.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQL_Admin.en-US.resx">
-      <DependentUpon>frmSQL_Admin.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmSQL_Admin.resx">
-      <DependentUpon>frmSQL_Admin.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmStart.de-DE.resx">
-      <DependentUpon>frmStart.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmStart.de.resx">
-      <DependentUpon>frmStart.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmStart.en-US.resx">
-      <DependentUpon>frmStart.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmStart.en.resx">
-      <DependentUpon>frmStart.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmStart.resx">
-      <DependentUpon>frmStart.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmUserKonfig_AddUsers.en-US.resx">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="frmUserKonfig_AddUsers.resx">
-      <DependentUpon>frmUserKonfig_AddUsers.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="My Project\licenses.licx" />
-    <EmbeddedResource Include="My Project\Resources.resx">
-      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
-      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
-      <CustomToolNamespace>My.Resources</CustomToolNamespace>
-      <SubType>Designer</SubType>
-    </EmbeddedResource>
-    <EmbeddedResource Include="Strings\_frmLicense.en-US.resx">
-      <Generator>ResXFileCodeGenerator</Generator>
-      <LastGenOutput>_frmLicense.en-US.Designer.vb</LastGenOutput>
-      <CustomToolNamespace>My.Resources</CustomToolNamespace>
-    </EmbeddedResource>
-    <EmbeddedResource Include="Strings\_frmLicense.resx">
-      <CustomToolNamespace>My.Resources</CustomToolNamespace>
-      <Generator>ResXFileCodeGenerator</Generator>
-      <LastGenOutput>_frmLicense.Designer.vb</LastGenOutput>
-    </EmbeddedResource>
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="My Project\app.manifest" />
-    <None Include="My Project\Application.myapp">
-      <Generator>MyApplicationCodeGenerator</Generator>
-      <LastGenOutput>Application.Designer.vb</LastGenOutput>
-    </None>
-    <None Include="My Project\Settings.settings">
-      <Generator>SettingsSingleFileGenerator</Generator>
-      <CustomToolNamespace>My</CustomToolNamespace>
-      <LastGenOutput>Settings.Designer.vb</LastGenOutput>
-    </None>
-    <None Include="App.config" />
-    <None Include="MyDataset.xsc">
-      <DependentUpon>MyDataset.xsd</DependentUpon>
-    </None>
-    <None Include="MyDataset.xsd">
-      <SubType>Designer</SubType>
-      <Generator>MSDataSetGenerator</Generator>
-      <LastGenOutput>MyDataset.Designer.vb</LastGenOutput>
-    </None>
-    <None Include="MyDataset.xss">
-      <DependentUpon>MyDataset.xsd</DependentUpon>
-    </None>
-  </ItemGroup>
-  <ItemGroup>
-    <COMReference Include="Microsoft.Office.Core">
-      <Guid>{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}</Guid>
-      <VersionMajor>2</VersionMajor>
-      <VersionMinor>7</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>primary</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="Microsoft.Office.Interop.Outlook">
-      <Guid>{00062FFF-0000-0000-C000-000000000046}</Guid>
-      <VersionMajor>9</VersionMajor>
-      <VersionMinor>5</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>primary</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="stdole">
-      <Guid>{00020430-0000-0000-C000-000000000046}</Guid>
-      <VersionMajor>2</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>primary</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="WMOBRWSLib">
-      <Guid>{25B51999-6DCA-11D4-B815-00104BB52DEA}</Guid>
-      <VersionMajor>1</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-    <COMReference Include="WMOSRCHLib">
-      <Guid>{BE4F1D13-88A8-11D4-B3FA-0001021F035F}</Guid>
-      <VersionMajor>1</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="packages.config" />
-    <None Include="Resources\database_refresh.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\database_save.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\database_go.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Einstellungen5.ico" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\delete2.ico" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\add.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\database_save1.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\delete_12x12.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\gear_32xSM.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\gear_32xLG.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\arrow_refresh.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\database_save2.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\save_16xLG.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\save_16xMD.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Save_6530.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Go.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\database_connect.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Selectallrowsfrom_tableA__294.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\CheckOutforEdit_13187_32x.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Benutzer.ico" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\bell_delete.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\bell_go.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\folder_Open_32xSM.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Einstellungen6.ico" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\key_go.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\key.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\folder_link.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\page_red.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\folder_go.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\arrow_right.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\arrow_left.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\handdrawn_arrow_left_green.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\handdrawn_arrow_right_green.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\arrow_back_16xMD.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\arrow_Forward_16xMD.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Shortcut_8169_16x.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\refresh_16xMD.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\Copy_6524.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\bullet_arrow_top.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\WindowsForm_817_12x.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\KeyDown_8461_12x.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\action_add_16xLG.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="Resources\arrow_Up_16xLG.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Content Include="DD_Icons_ICO_GLOBIX_1.ico" />
-    <Content Include="DD_Icons_ICO_GLOBIX_128.ico">
-      <CopyToOutputDirectory>Always</CopyToOutputDirectory>
-    </Content>
-    <Content Include="globe_handdrawn.ico" />
-    <None Include="Resources\Close_16xMD.png" />
-    <None Include="Resources\Close_16xLG.png" />
-    <None Include="Resources\DD_Icons_ICO_GLOBIX_128.ico" />
-    <None Include="Resources\Globix_ico.bmp" />
-    <None Include="Resources\email.png" />
-    <None Include="Resources\DD_Icons-GLOBIX.png" />
-    <None Include="Resources\action_add_16xMD.png" />
-    <None Include="Resources\action_add_16xLG1.png" />
-    <None Include="Resources\globe_handdrawn.png" />
-    <None Include="Resources\arrow_previous_16xLG.png" />
-    <None Include="Resources\Excel_25ixel.jpg" />
-    <None Include="Resources\cancel.png" />
-    <None Include="Resources\refresh_16xLG.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
-      <Visible>False</Visible>
-      <ProductName>.NET Framework 3.5 SP1</ProductName>
-      <Install>false</Install>
-    </BootstrapperPackage>
-  </ItemGroup>
-  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
-  <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
-       Other similar extension points exist, see Microsoft.Common.targets.
-  <Target Name="BeforeBuild">
-  </Target>
-  <Target Name="AfterBuild">
-  </Target>
-  -->
-</Project>

Global_Indexer/My Project/AssemblyInfo.vb

@@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.0.0.1")>
+<Assembly: AssemblyVersion("2.0.0.8")>
 <Assembly: AssemblyFileVersion("1.0.0.0")> 
 
 <Assembly: NeutralResourcesLanguageAttribute("")> 

Global_Indexer/My Project/Settings.Designer.vb

@@ -15,7 +15,7 @@ Option Explicit On
 Namespace My
     
     <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.7.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "16.4.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -57,123 +57,13 @@ Namespace My
         <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
          Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
          Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=172.24.12.41\TESTS;Initial Catalog=DD_ECM_TEST;Persist Security Info="& _ 
-            "True;User ID=sa;Password=dd")>  _
+         Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Secu"& _ 
+            "rity Info=True;User ID=sa;Password=dd")>  _
         Public ReadOnly Property DD_ECMConnectionString() As String
             Get
                 Return CType(Me("DD_ECMConnectionString"),String)
             End Get
         End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("526"),  _
-         Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)>  _
-        Public Property SplitterDistance_Viewer() As Integer
-            Get
-                Return CType(Me("SplitterDistance_Viewer"),Integer)
-            End Get
-            Set
-                Me("SplitterDistance_Viewer") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("True"),  _
-         Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)>  _
-        Public Property WDSearch_maximized() As Boolean
-            Get
-                Return CType(Me("WDSearch_maximized"),Boolean)
-            End Get
-            Set
-                Me("WDSearch_maximized") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("True"),  _
-         Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)>  _
-        Public Property Show_IndexResult() As Boolean
-            Get
-                Return CType(Me("Show_IndexResult"),Boolean)
-            End Get
-            Set
-                Me("Show_IndexResult") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("False"),  _
-         Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)>  _
-        Public Property DoNot_Show_Documents() As Boolean
-            Get
-                Return CType(Me("DoNot_Show_Documents"),Boolean)
-            End Get
-            Set
-                Me("DoNot_Show_Documents") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.ApplicationScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("DigitalData\windream_CLIENT_WMCC_Neustart")>  _
-        Public ReadOnly Property Test() As String
-            Get
-                Return CType(Me("Test"),String)
-            End Get
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("False"),  _
-         Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)>  _
-        Public Property AppTerminate() As Boolean
-            Get
-                Return CType(Me("AppTerminate"),Boolean)
-            End Get
-            Set
-                Me("AppTerminate") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("False")>  _
-        Public Property DA_Vorauswahlaktiv() As Boolean
-            Get
-                Return CType(Me("DA_Vorauswahlaktiv"),Boolean)
-            End Get
-            Set
-                Me("DA_Vorauswahlaktiv") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
-        Public Property REGEX_Replace() As String
-            Get
-                Return CType(Me("REGEX_Replace"),String)
-            End Get
-            Set
-                Me("REGEX_Replace") = value
-            End Set
-        End Property
-        
-        <Global.System.Configuration.UserScopedSettingAttribute(),  _
-         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.Configuration.DefaultSettingValueAttribute("myFilename.pdf")>  _
-        Public Property FilenameTest() As String
-            Get
-                Return CType(Me("FilenameTest"),String)
-            End Get
-            Set
-                Me("FilenameTest") = value
-            End Set
-        End Property
     End Class
 End Namespace
 

Global_Indexer/My Project/Settings.settings

@@ -5,37 +5,10 @@
     <Setting Name="DD_ECMConnectionString" Type="(Connection string)" Scope="Application">
       <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
 &lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
-  &lt;ConnectionString&gt;Data Source=172.24.12.41\TESTS;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt;
+  &lt;ConnectionString&gt;Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt;
   &lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
 &lt;/SerializableConnectionString&gt;</DesignTimeValue>
-      <Value Profile="(Default)">Data Source=172.24.12.41\TESTS;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
-    </Setting>
-    <Setting Name="SplitterDistance_Viewer" Roaming="true" Type="System.Int32" Scope="User">
-      <Value Profile="(Default)">526</Value>
-    </Setting>
-    <Setting Name="WDSearch_maximized" Roaming="true" Type="System.Boolean" Scope="User">
-      <Value Profile="(Default)">True</Value>
-    </Setting>
-    <Setting Name="Show_IndexResult" Roaming="true" Type="System.Boolean" Scope="User">
-      <Value Profile="(Default)">True</Value>
-    </Setting>
-    <Setting Name="DoNot_Show_Documents" Roaming="true" Type="System.Boolean" Scope="User">
-      <Value Profile="(Default)">False</Value>
-    </Setting>
-    <Setting Name="Test" Type="System.String" Scope="Application">
-      <Value Profile="(Default)">DigitalData\windream_CLIENT_WMCC_Neustart</Value>
-    </Setting>
-    <Setting Name="AppTerminate" Roaming="true" Type="System.Boolean" Scope="User">
-      <Value Profile="(Default)">False</Value>
-    </Setting>
-    <Setting Name="DA_Vorauswahlaktiv" Type="System.Boolean" Scope="User">
-      <Value Profile="(Default)">False</Value>
-    </Setting>
-    <Setting Name="REGEX_Replace" Type="System.String" Scope="User">
-      <Value Profile="(Default)" />
-    </Setting>
-    <Setting Name="FilenameTest" Type="System.String" Scope="User">
-      <Value Profile="(Default)">myFilename.pdf</Value>
+      <Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
     </Setting>
   </Settings>
 </SettingsFile>

Global_Indexer/My Project/licenses.licx

@@ -1,3 +1,9 @@
-DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraPdfViewer.PdfViewer, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

Global_Indexer/MyDataset.vb

@@ -1,4 +1,13 @@
 
 
 Partial Public Class MyDataset
+    Partial Public Class TBDD_INDEX_MAN_POSTPROCESSINGDataTable
+        Private Sub TBDD_INDEX_MAN_POSTPROCESSINGDataTable_ColumnChanging(sender As Object, e As DataColumnChangeEventArgs) Handles Me.ColumnChanging
+            If (e.Column.ColumnName = Me.COMMENTColumn.ColumnName) Then
+                'Benutzercode hier einfügen
+            End If
+
+        End Sub
+
+    End Class
 End Class

Global_Indexer/MyDataset.xsc

@@ -233,20 +233,6 @@
         </ColumnUISetting>
       </ColumnUISettings>
     </TableUISetting>
-    <TableUISetting Name="TBDD_GROUPS">
-      <ColumnUISettings>
-        <ColumnUISetting Name="ADDED_WHEN">
-          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
-              <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-            </ControlSetting></ControlSettings>
-        </ColumnUISetting>
-        <ColumnUISetting Name="CHANGED_WHEN">
-          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
-              <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-            </ControlSetting></ControlSettings>
-        </ColumnUISetting>
-      </ColumnUISettings>
-    </TableUISetting>
     <TableUISetting Name="VWGI_USER_GROUPS_RELATION">
       <ColumnUISettings>
         <ColumnUISetting Name="ADDED_WHEN">
@@ -339,25 +325,19 @@
     <TableUISetting Name="TBGI_REGEX_DOCTYPE">
       <ColumnUISettings>
         <ColumnUISetting Name="DOCTYPE_ID">
-          <ControlSettings>
-            <ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
+          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
               <BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-            </ControlSetting>
-          </ControlSettings>
+            </ControlSetting></ControlSettings>
         </ColumnUISetting>
         <ColumnUISetting Name="ADDED_WHEN">
-          <ControlSettings>
-            <ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
+          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
               <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-            </ControlSetting>
-          </ControlSettings>
+            </ControlSetting></ControlSettings>
         </ColumnUISetting>
         <ColumnUISetting Name="CHANGED_WHEN">
-          <ControlSettings>
-            <ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
+          <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
               <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-            </ControlSetting>
-          </ControlSettings>
+            </ControlSetting></ControlSettings>
         </ColumnUISetting>
       </ColumnUISettings>
     </TableUISetting>

Global_Indexer/MyDataset.xsd

@@ -943,82 +943,6 @@ ORDER BY NAME</CommandText>
             </Mappings>
             <Sources />
           </TableAdapter>
-          <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBDD_GROUPSTableAdapter" GeneratorDataComponentClassName="TBDD_GROUPSTableAdapter" Name="TBDD_GROUPS" UserDataComponentName="TBDD_GROUPSTableAdapter">
-            <MainSource>
-              <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBDD_GROUPS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="FillNew" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="FillNew" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="FillNew">
-                <DeleteCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="false">
-                    <CommandText>DELETE FROM [TBDD_USER_GROUPS] WHERE (([GUID] = @Original_GUID) AND ((@IsNull_NAME = 1 AND [NAME] IS NULL) OR ([NAME] = @Original_NAME)) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)))</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_NAME" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
-                    </Parameters>
-                  </DbCommand>
-                </DeleteCommand>
-                <InsertCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="false">
-                    <CommandText>INSERT INTO TBDD_USER_GROUPS
-                         (NAME, ADDED_WHO)
-VALUES        (@NAME,@ADDED_WHO);  
-SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_IDENTITY())</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@NAME" Precision="0" Scale="0" Size="1024" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" Scale="0" Size="1024" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
-                    </Parameters>
-                  </DbCommand>
-                </InsertCommand>
-                <SelectCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="false">
-                    <CommandText>SELECT        GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
-FROM            TBDD_GROUPS
-WHERE        (INTERNAL = 0)</CommandText>
-                    <Parameters />
-                  </DbCommand>
-                </SelectCommand>
-                <UpdateCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="false">
-                    <CommandText>UPDATE       TBDD_USER_GROUPS
-SET                NAME = @NAME, CHANGED_WHO = @CHANGED_WHO
-WHERE        (GUID = @Original_GUID);  
-SELECT GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = @GUID)</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@NAME" Precision="0" Scale="0" Size="1024" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" Scale="0" Size="1024" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@Original_GUID" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@GUID" Precision="0" Scale="0" Size="1024" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
-                    </Parameters>
-                  </DbCommand>
-                </UpdateCommand>
-              </DbSource>
-            </MainSource>
-            <Mappings>
-              <Mapping SourceColumn="GUID" DataSetColumn="GUID" />
-              <Mapping SourceColumn="NAME" DataSetColumn="NAME" />
-              <Mapping SourceColumn="ADDED_WHO" DataSetColumn="ADDED_WHO" />
-              <Mapping SourceColumn="ADDED_WHEN" DataSetColumn="ADDED_WHEN" />
-              <Mapping SourceColumn="CHANGED_WHO" DataSetColumn="CHANGED_WHO" />
-              <Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
-            </Mappings>
-            <Sources>
-              <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectType="Unknown" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetDataBy" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetDataBy" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="Fill">
-                <SelectCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>SELECT        GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
-FROM            TBDD_USER_GROUPS</CommandText>
-                    <Parameters />
-                  </DbCommand>
-                </SelectCommand>
-              </DbSource>
-            </Sources>
-          </TableAdapter>
           <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBDD_GROUPS_USERTableAdapter" GeneratorDataComponentClassName="TBDD_GROUPS_USERTableAdapter" Name="TBDD_GROUPS_USER" UserDataComponentName="TBDD_GROUPS_USERTableAdapter">
             <MainSource>
               <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBDD_GROUPS_USER" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
@@ -1125,60 +1049,6 @@ WHERE        (USER_ID = @USER_ID) ORDER BY NAME</CommandText>
             </Mappings>
             <Sources />
           </TableAdapter>
-          <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWGI_DOCTYPE_GROUPTableAdapter" GeneratorDataComponentClassName="VWGI_DOCTYPE_GROUPTableAdapter" Name="VWGI_DOCTYPE_GROUP" UserDataComponentName="VWGI_DOCTYPE_GROUPTableAdapter">
-            <MainSource>
-              <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.VWGI_DOCTYPE_GROUP" DbObjectType="View" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
-                <SelectCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>SELECT        GUID, DOCTYPE_ID, DOCTYPE, GROUP_ID, [GROUP], ADDED_WHO, ADDED_WHEN, CHANGED_WHEN
-FROM            VWGI_DOCTYPE_GROUP
-WHERE        (DOCTYPE_ID = @DOCTYPE_ID)
-ORDER BY DOCTYPE</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="DOCTYPE_ID" ColumnName="DOCTYPE_ID" DataSourceName="DD_ECM.dbo.VWGI_DOCTYPE_GROUP" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                    </Parameters>
-                  </DbCommand>
-                </SelectCommand>
-              </DbSource>
-            </MainSource>
-            <Mappings>
-              <Mapping SourceColumn="GUID" DataSetColumn="GUID" />
-              <Mapping SourceColumn="DOCTYPE_ID" DataSetColumn="DOCTYPE_ID" />
-              <Mapping SourceColumn="DOCTYPE" DataSetColumn="DOCTYPE" />
-              <Mapping SourceColumn="GROUP_ID" DataSetColumn="GROUP_ID" />
-              <Mapping SourceColumn="GROUP" DataSetColumn="GROUP" />
-              <Mapping SourceColumn="ADDED_WHO" DataSetColumn="ADDED_WHO" />
-              <Mapping SourceColumn="ADDED_WHEN" DataSetColumn="ADDED_WHEN" />
-              <Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
-            </Mappings>
-            <Sources>
-              <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdDelete" Modifier="Public" Name="cmdDelete" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdDelete">
-                <DeleteCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>DELETE FROM TBDD_USRGRP_DOKTYPE
-WHERE        (GUID = @ID)</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="ID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBDD_USRGRP_DOKTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
-                    </Parameters>
-                  </DbCommand>
-                </DeleteCommand>
-              </DbSource>
-              <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdInsert" Modifier="Public" Name="cmdInsert" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy1" UserSourceName="cmdInsert">
-                <InsertCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>INSERT INTO TBDD_USRGRP_DOKTYPE
-                         (DOCTYPE_ID, GROUP_ID, ADDED_WHO)
-VALUES        (@DOCTYPE_ID,@GROUP_ID,@ADDED_WHO)</CommandText>
-                    <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="DOCTYPE_ID" ColumnName="DOCTYPE_ID" DataSourceName="DD_ECM.dbo.TBDD_USRGRP_DOKTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="GROUP_ID" ColumnName="GROUP_ID" DataSourceName="DD_ECM.dbo.TBDD_USRGRP_DOKTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GROUP_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GROUP_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM.dbo.TBDD_USRGRP_DOKTYPE" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
-                    </Parameters>
-                  </DbCommand>
-                </InsertCommand>
-              </DbSource>
-            </Sources>
-          </TableAdapter>
           <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBHOTKEY_PROFILETableAdapter" GeneratorDataComponentClassName="TBHOTKEY_PROFILETableAdapter" Name="TBHOTKEY_PROFILE" UserDataComponentName="TBHOTKEY_PROFILETableAdapter">
             <MainSource>
               <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBHOTKEY_PROFILE" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
@@ -1751,53 +1621,50 @@ ORDER BY GUID DESC</CommandText>
             <MainSource>
               <DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
                 <DeleteCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="false">
-                    <CommandText>DELETE FROM [TBGI_REGEX_DOCTYPE] WHERE (([GUID] = @Original_GUID) AND ([REGEX] = @Original_REGEX) AND ((@IsNull_DOCTYPE_ID = 1 AND [DOCTYPE_ID] IS NULL) OR ([DOCTYPE_ID] = @Original_DOCTYPE_ID)) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)))</CommandText>
+                  <DbCommand CommandType="Text" ModifiedByUser="true">
+                    <CommandText>DELETE FROM TBGI_REGEX_DOCTYPE
+WHERE        (GUID = @Original_GUID)</CommandText>
                     <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
                   </DbCommand>
                 </DeleteCommand>
                 <InsertCommand>
-                  <DbCommand CommandType="Text" ModifiedByUser="true">
-                    <CommandText>INSERT INTO TBGI_REGEX_DOCTYPE
-                         (REGEX, DOCTYPE_ID, ADDED_WHO)
-VALUES        (@REGEX,@DOCTYPE_ID,@ADDED_WHO); 
+                  <DbCommand CommandType="Text" ModifiedByUser="false">
+                    <CommandText>INSERT INTO [TBGI_REGEX_DOCTYPE] ([REGEX], [DOCTYPE_ID], [ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN]) VALUES (@REGEX, @DOCTYPE_ID, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN);
 SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBGI_REGEX_DOCTYPE WHERE (GUID = SCOPE_IDENTITY())</CommandText>
                     <Parameters>
-                      <Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="true" AutogeneratedName="DOCTYPE_ID" ColumnName="DOCTYPE_ID" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
-                      <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
                     </Parameters>
                   </DbCommand>
                 </InsertCommand>
                 <SelectCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>SELECT        TBGI_REGEX_DOCTYPE.*
-FROM            TBGI_REGEX_DOCTYPE</CommandText>
-                    <Parameters />
+FROM            TBGI_REGEX_DOCTYPE WHERE DOCTYPE_ID = @DOCTYPE_ID</CommandText>
+                    <Parameters>
+                      <Parameter AllowDbNull="true" AutogeneratedName="DOCTYPE_ID" ColumnName="DOCTYPE_ID" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                    </Parameters>
                   </DbCommand>
                 </SelectCommand>
                 <UpdateCommand>
                   <DbCommand CommandType="Text" ModifiedByUser="true">
                     <CommandText>UPDATE       TBGI_REGEX_DOCTYPE
-SET                REGEX = @REGEX, DOCTYPE_ID = @DOCTYPE_ID, CHANGED_WHO = @CHANGED_WHO
+SET                REGEX = @REGEX, DOCTYPE_ID = @DOCTYPE_ID, ADDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CHANGED_WHO = @CHANGED_WHO, CHANGED_WHEN = @CHANGED_WHEN
 WHERE        (GUID = @Original_GUID); 
 SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBGI_REGEX_DOCTYPE WHERE (GUID = @GUID)</CommandText>
                     <Parameters>
                       <Parameter AllowDbNull="false" AutogeneratedName="REGEX" ColumnName="REGEX" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="REGEX" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="DOCTYPE_ID" ColumnName="DOCTYPE_ID" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DOCTYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DOCTYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
+                      <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHEN" ColumnName="CHANGED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
                       <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                       <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBGI_REGEX_DOCTYPE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
                     </Parameters>
@@ -2690,36 +2557,6 @@ SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="TBDD_GROUPS" msprop:Generator_TableClassName="TBDD_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS" msprop:Generator_TablePropName="TBDD_GROUPS" msprop:Generator_RowDeletingName="TBDD_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPSRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS" msprop:Generator_RowChangedName="TBDD_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPSRow">
-          <xs:complexType>
-            <xs:sequence>
-              <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_UserColumnName="NAME" minOccurs="0">
-                <xs:simpleType>
-                  <xs:restriction base="xs:string">
-                    <xs:maxLength value="50" />
-                  </xs:restriction>
-                </xs:simpleType>
-              </xs:element>
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO" minOccurs="0">
-                <xs:simpleType>
-                  <xs:restriction base="xs:string">
-                    <xs:maxLength value="50" />
-                  </xs:restriction>
-                </xs:simpleType>
-              </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
-                <xs:simpleType>
-                  <xs:restriction base="xs:string">
-                    <xs:maxLength value="50" />
-                  </xs:restriction>
-                </xs:simpleType>
-              </xs:element>
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
-            </xs:sequence>
-          </xs:complexType>
-        </xs:element>
         <xs:element name="TBDD_GROUPS_USER" msprop:Generator_TableClassName="TBDD_GROUPS_USERDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS_USER" msprop:Generator_TablePropName="TBDD_GROUPS_USER" msprop:Generator_RowDeletingName="TBDD_GROUPS_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPS_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPS_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPS_USERRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS_USER" msprop:Generator_RowChangedName="TBDD_GROUPS_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPS_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPS_USERRow">
           <xs:complexType>
             <xs:sequence>
@@ -2784,38 +2621,6 @@ SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
             </xs:sequence>
           </xs:complexType>
         </xs:element>
-        <xs:element name="VWGI_DOCTYPE_GROUP" msprop:Generator_TableClassName="VWGI_DOCTYPE_GROUPDataTable" msprop:Generator_TableVarName="tableVWGI_DOCTYPE_GROUP" msprop:Generator_RowChangedName="VWGI_DOCTYPE_GROUPRowChanged" msprop:Generator_TablePropName="VWGI_DOCTYPE_GROUP" msprop:Generator_RowDeletingName="VWGI_DOCTYPE_GROUPRowDeleting" msprop:Generator_RowChangingName="VWGI_DOCTYPE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="VWGI_DOCTYPE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="VWGI_DOCTYPE_GROUPRowDeleted" msprop:Generator_RowClassName="VWGI_DOCTYPE_GROUPRow" msprop:Generator_UserTableName="VWGI_DOCTYPE_GROUP" msprop:Generator_RowEvArgName="VWGI_DOCTYPE_GROUPRowChangeEvent">
-          <xs:complexType>
-            <xs:sequence>
-              <xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
-              <xs:element name="DOCTYPE_ID" msprop:Generator_ColumnVarNameInTable="columnDOCTYPE_ID" msprop:Generator_ColumnPropNameInRow="DOCTYPE_ID" msprop:Generator_ColumnPropNameInTable="DOCTYPE_IDColumn" msprop:Generator_UserColumnName="DOCTYPE_ID" type="xs:int" />
-              <xs:element name="DOCTYPE" msprop:Generator_ColumnVarNameInTable="columnDOCTYPE" msprop:Generator_ColumnPropNameInRow="DOCTYPE" msprop:Generator_ColumnPropNameInTable="DOCTYPEColumn" msprop:Generator_UserColumnName="DOCTYPE">
-                <xs:simpleType>
-                  <xs:restriction base="xs:string">
-                    <xs:maxLength value="50" />
-                  </xs:restriction>
-                </xs:simpleType>
-              </xs:element>
-              <xs:element name="GROUP_ID" msprop:Generator_ColumnVarNameInTable="columnGROUP_ID" msprop:Generator_ColumnPropNameInRow="GROUP_ID" msprop:Generator_ColumnPropNameInTable="GROUP_IDColumn" msprop:Generator_UserColumnName="GROUP_ID" type="xs:int" />
-              <xs:element name="GROUP" msprop:Generator_ColumnVarNameInTable="columnGROUP" msprop:Generator_ColumnPropNameInRow="GROUP" msprop:Generator_ColumnPropNameInTable="GROUPColumn" msprop:Generator_UserColumnName="GROUP" minOccurs="0">
-                <xs:simpleType>
-                  <xs:restriction base="xs:string">
-                    <xs:maxLength value="50" />
-                  </xs:restriction>
-                </xs:simpleType>
-              </xs:element>
-              <xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO">
-                <xs:simpleType>
-                  <xs:restriction base="xs:string">
-                    <xs:maxLength value="50" />
-                  </xs:restriction>
-                </xs:simpleType>
-              </xs:element>
-              <xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" minOccurs="0" />
-              <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
-            </xs:sequence>
-          </xs:complexType>
-        </xs:element>
         <xs:element name="TBHOTKEY_PROFILE" msprop:Generator_TableClassName="TBHOTKEY_PROFILEDataTable" msprop:Generator_TableVarName="tableTBHOTKEY_PROFILE" msprop:Generator_TablePropName="TBHOTKEY_PROFILE" msprop:Generator_RowDeletingName="TBHOTKEY_PROFILERowDeleting" msprop:Generator_RowChangingName="TBHOTKEY_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBHOTKEY_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBHOTKEY_PROFILERowDeleted" msprop:Generator_UserTableName="TBHOTKEY_PROFILE" msprop:Generator_RowChangedName="TBHOTKEY_PROFILERowChanged" msprop:Generator_RowEvArgName="TBHOTKEY_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBHOTKEY_PROFILERow">
           <xs:complexType>
             <xs:sequence>
@@ -3240,10 +3045,6 @@ SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
       <xs:selector xpath=".//mstns:TBWHDD_INDEX_MAN" />
       <xs:field xpath="mstns:GUID" />
     </xs:unique>
-    <xs:unique name="TBDD_GROUPS_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
-      <xs:selector xpath=".//mstns:TBDD_GROUPS" />
-      <xs:field xpath="mstns:GUID" />
-    </xs:unique>
     <xs:unique name="TBDD_GROUPS_USER_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
       <xs:selector xpath=".//mstns:TBDD_GROUPS_USER" />
       <xs:field xpath="mstns:GUID" />
@@ -3252,10 +3053,6 @@ SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
       <xs:selector xpath=".//mstns:VWGI_USER_GROUPS_RELATION" />
       <xs:field xpath="mstns:GUID" />
     </xs:unique>
-    <xs:unique name="VWGI_DOCTYPE_GROUP_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
-      <xs:selector xpath=".//mstns:VWGI_DOCTYPE_GROUP" />
-      <xs:field xpath="mstns:GUID" />
-    </xs:unique>
     <xs:unique name="TBHOTKEY_PROFILE_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
       <xs:selector xpath=".//mstns:TBHOTKEY_PROFILE" />
       <xs:field xpath="mstns:GUID" />
@@ -3300,7 +3097,6 @@ SELECT GUID, REGEX, DOCTYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN
       <msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" />
       <msdata:Relationship name="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msdata:parent="TBDD_INDEX_MAN" msdata:child="TBDD_INDEX_MAN_POSTPROCESSING" msdata:parentkey="GUID" msdata:childkey="IDXMAN_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_ChildPropName="GetTBDD_INDEX_MAN_POSTPROCESSINGRows" msprop:Generator_UserRelationName="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_ParentPropName="TBDD_INDEX_MANRow" msprop:Generator_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" msprop:Generator_UserParentTable="TBDD_INDEX_MAN" />
       <msdata:Relationship name="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msdata:parent="TBWHDD_INDEX_MAN" msdata:child="TBDD_INDEX_MAN_POSTPROCESSING" msdata:parentkey="GUID" msdata:childkey="IDXMAN_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN_POSTPROCESSING" msprop:Generator_ChildPropName="GetTBDD_INDEX_MAN_POSTPROCESSINGRows" msprop:Generator_UserRelationName="FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_ParentPropName="TBWHDD_INDEX_MANRow" msprop:Generator_RelationVarName="relationFKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" msprop:Generator_UserParentTable="TBWHDD_INDEX_MAN" />
-      <msdata:Relationship name="FK_TBDD_GROUPS_USER_GROUP_ID" msdata:parent="TBDD_GROUPS" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_UserParentTable="TBDD_GROUPS" />
       <msdata:Relationship name="FK_TBDD_GROUPS_USER_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_ParentPropName="TBDD_USERRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" />
       <msdata:Relationship name="FK_TBDD_INDEX_MAN_DAID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_MAN" msdata:parentkey="GUID" msdata:childkey="DOK_ID" msprop:Generator_UserChildTable="TBDD_INDEX_MAN" msprop:Generator_ChildPropName="GetTBDD_INDEX_MANRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_MAN_DAID" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_MAN_DAID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" />
       <msdata:Relationship name="FK_TBHOTKEY_PATTERNS_PROFILE_ID" msdata:parent="TBHOTKEY_PROFILE" msdata:child="TBHOTKEY_PATTERNS" msdata:parentkey="GUID" msdata:childkey="HKPROFILE_ID" msprop:Generator_UserChildTable="TBHOTKEY_PATTERNS" msprop:Generator_ChildPropName="GetTBHOTKEY_PATTERNSRows" msprop:Generator_UserRelationName="FK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_ParentPropName="TBHOTKEY_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBHOTKEY_PATTERNS_PROFILE_ID" msprop:Generator_UserParentTable="TBHOTKEY_PROFILE" />

Global_Indexer/frmConfig_Basic.designer.vb

@@ -44,7 +44,7 @@ Partial Class frmConfig_Basic
         Me.cmbLanguage = New System.Windows.Forms.ComboBox()
         Me.Label9 = New System.Windows.Forms.Label()
         Me.CheckBoxPreviewDocs = New System.Windows.Forms.CheckBox()
-        Me.CheckBox2 = New System.Windows.Forms.CheckBox()
+        Me.CheckBoxIndexResult = New System.Windows.Forms.CheckBox()
         Me.chkLogErrorsOnly = New System.Windows.Forms.CheckBox()
         Me.btnLogMail = New System.Windows.Forms.Button()
         Me.btnApplicationFolder = New System.Windows.Forms.Button()
@@ -175,7 +175,7 @@ Partial Class frmConfig_Basic
         Me.TabPage2.Controls.Add(Me.cmbLanguage)
         Me.TabPage2.Controls.Add(Me.Label9)
         Me.TabPage2.Controls.Add(Me.CheckBoxPreviewDocs)
-        Me.TabPage2.Controls.Add(Me.CheckBox2)
+        Me.TabPage2.Controls.Add(Me.CheckBoxIndexResult)
         Me.TabPage2.Controls.Add(Me.chkLogErrorsOnly)
         Me.TabPage2.Controls.Add(Me.btnLogMail)
         Me.TabPage2.Controls.Add(Me.btnApplicationFolder)
@@ -211,19 +211,16 @@ Partial Class frmConfig_Basic
         'CheckBoxPreviewDocs
         '
         resources.ApplyResources(Me.CheckBoxPreviewDocs, "CheckBoxPreviewDocs")
-        Me.CheckBoxPreviewDocs.Checked = Global.Global_Indexer.My.MySettings.Default.DoNot_Show_Documents
-        Me.CheckBoxPreviewDocs.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.Global_Indexer.My.MySettings.Default, "DoNot_Show_Documents", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
         Me.CheckBoxPreviewDocs.Name = "CheckBoxPreviewDocs"
         Me.CheckBoxPreviewDocs.UseVisualStyleBackColor = True
         '
-        'CheckBox2
+        'CheckBoxIndexResult
         '
-        resources.ApplyResources(Me.CheckBox2, "CheckBox2")
-        Me.CheckBox2.Checked = Global.Global_Indexer.My.MySettings.Default.Show_IndexResult
-        Me.CheckBox2.CheckState = System.Windows.Forms.CheckState.Checked
-        Me.CheckBox2.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.Global_Indexer.My.MySettings.Default, "Show_IndexResult", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
-        Me.CheckBox2.Name = "CheckBox2"
-        Me.CheckBox2.UseVisualStyleBackColor = True
+        resources.ApplyResources(Me.CheckBoxIndexResult, "CheckBoxIndexResult")
+        Me.CheckBoxIndexResult.Checked = True
+        Me.CheckBoxIndexResult.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.CheckBoxIndexResult.Name = "CheckBoxIndexResult"
+        Me.CheckBoxIndexResult.UseVisualStyleBackColor = True
         '
         'chkLogErrorsOnly
         '
@@ -400,7 +397,7 @@ Partial Class frmConfig_Basic
     Friend WithEvents chkLogErrorsOnly As System.Windows.Forms.CheckBox
     Friend WithEvents btnopenlog As System.Windows.Forms.Button
     Friend WithEvents btnApplicationFolder As System.Windows.Forms.Button
-    Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox
+    Friend WithEvents CheckBoxIndexResult As System.Windows.Forms.CheckBox
     Friend WithEvents Button2 As System.Windows.Forms.Button
     Friend WithEvents txtScanFolderWatch As System.Windows.Forms.TextBox
     Friend WithEvents Label7 As System.Windows.Forms.Label

Global_Indexer/frmConfig_Basic.resx

@@ -579,32 +579,32 @@
   <data name="&gt;&gt;CheckBoxPreviewDocs.ZOrder" xml:space="preserve">
     <value>4</value>
   </data>
-  <data name="CheckBox2.AutoSize" type="System.Boolean, mscorlib">
+  <data name="CheckBoxIndexResult.AutoSize" type="System.Boolean, mscorlib">
     <value>True</value>
   </data>
-  <data name="CheckBox2.Location" type="System.Drawing.Point, System.Drawing">
+  <data name="CheckBoxIndexResult.Location" type="System.Drawing.Point, System.Drawing">
     <value>242, 44</value>
   </data>
-  <data name="CheckBox2.Size" type="System.Drawing.Size, System.Drawing">
+  <data name="CheckBoxIndexResult.Size" type="System.Drawing.Size, System.Drawing">
     <value>230, 30</value>
   </data>
-  <data name="CheckBox2.TabIndex" type="System.Int32, mscorlib">
+  <data name="CheckBoxIndexResult.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
   </data>
-  <data name="CheckBox2.Text" xml:space="preserve">
+  <data name="CheckBoxIndexResult.Text" xml:space="preserve">
     <value>Meldungsfenster für erfolgreiche
 Übertragung nach windream anzeigen?</value>
   </data>
-  <data name="&gt;&gt;CheckBox2.Name" xml:space="preserve">
-    <value>CheckBox2</value>
+  <data name="&gt;&gt;CheckBoxIndexResult.Name" xml:space="preserve">
+    <value>CheckBoxIndexResult</value>
   </data>
-  <data name="&gt;&gt;CheckBox2.Type" xml:space="preserve">
+  <data name="&gt;&gt;CheckBoxIndexResult.Type" xml:space="preserve">
     <value>System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </data>
-  <data name="&gt;&gt;CheckBox2.Parent" xml:space="preserve">
+  <data name="&gt;&gt;CheckBoxIndexResult.Parent" xml:space="preserve">
     <value>TabPage2</value>
   </data>
-  <data name="&gt;&gt;CheckBox2.ZOrder" xml:space="preserve">
+  <data name="&gt;&gt;CheckBoxIndexResult.ZOrder" xml:space="preserve">
     <value>5</value>
   </data>
   <data name="chkLogErrorsOnly.AutoSize" type="System.Boolean, mscorlib">

Global_Indexer/frmConfig_Basic.vb

@@ -66,12 +66,12 @@ Public Class frmConfig_Basic
 
                 Dim sql = "SELECT MAX(GUID) FROM TBDD_USER WHERE (LOWER(USERNAME) = LOWER('@user'))"
                 sql = sql.Replace("@user", Environment.UserName)
-                ClassLogger.Add(">> Username: " & Environment.UserName, False)
+                LOGGER.Info(">> Username: " & Environment.UserName)
 
                 USER_ID = ClassDatabase.Execute_Scalar(sql, MyConnectionString, True)
                 If IsDBNull(USER_ID) Then
                     MsgBox("Attention: Your Username '" & Environment.UserName & "' is not configured for Global Indexer. this might result in unhandled exceptions!", MsgBoxStyle.Exclamation)
-                    ClassLogger.Add("User '" & Environment.UserName & "' not configured for Global Indexer! (DBNull - frmConfigBasic)", True)
+                    LOGGER.Info("User '" & Environment.UserName & "' not configured for Global Indexer! (DBNull - frmConfigBasic)")
                 End If
 
 
@@ -123,9 +123,9 @@ Public Class frmConfig_Basic
         Cursor = Cursors.Default
     End Sub
 
-    <STAThread()> _
     Private Sub frmConfig_Basic_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-
+        CheckBoxIndexResult.Checked = CONFIG.Config.ShowIndexResult
+        CheckBoxPreviewDocs.Checked = CONFIG.Config.FilePreview
     End Sub
 
     Dim reload As Boolean = False
@@ -144,7 +144,7 @@ Public Class frmConfig_Basic
                 End If
                 'chkdelete_origin.Checked = CURR_DELETE_ORIGIN
             Case 2
-               If ERROR_STATE = "NO DB-CONNECTION" Then
+                If ERROR_STATE = "NO DB-CONNECTION" Then
                     MsgBox("Configurations only editable after Application started completely!", MsgBoxStyle.Exclamation)
                     Me.TabControl1.SelectedIndex = 0
                     Exit Sub
@@ -242,7 +242,7 @@ Public Class frmConfig_Basic
                     CONFIG.Save()
                     CURRENT_FOLDERWATCH = ""
                 End If
-              
+
                 Exit Sub
             End If
             Try
@@ -250,8 +250,9 @@ Public Class frmConfig_Basic
                     System.IO.Directory.CreateDirectory(mypath)
                 End If
             Catch ex As Exception
-                ClassLogger.Add(" >> Unexpected error in CheckFolder: " & mypath, False)
-                ClassLogger.Add(" >> " & ex.Message, False)
+                LOGGER.Info(" >> Unexpected error in CheckFolder: " & mypath)
+                LOGGER.Error(ex.Message)
+                LOGGER.Info(" >> " & ex.Message)
                 If USER_LANGUAGE = "de-DE" Then
                     MsgBox("Unexpected error in ECheckFolder: " & mypath & vbNewLine & "Bitte überprüfen Sie die Rechte!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
                 Else
@@ -356,7 +357,7 @@ Public Class frmConfig_Basic
             CONFIG.Config.LogErrorsOnly = chkLogErrorsOnly.Checked
             CONFIG.Save()
             'SaveConfigValue("LogErrorsOnly", chkLogErrorsOnly.Checked)
-            ClassLogger.Add(" >> LogErrorsOnly changed to '" & chkLogErrorsOnly.Checked, False)
+            LOGGER.Info(" >> LogErrorsOnly changed to '" & chkLogErrorsOnly.Checked)
             LogErrorsOnly = chkLogErrorsOnly.Checked
         End If
     End Sub
@@ -406,9 +407,9 @@ Public Class frmConfig_Basic
         Process.Start(Application.UserAppDataPath())
     End Sub
 
-    Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox2.CheckedChanged
-
-        My.Settings.Save()
+    Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBoxIndexResult.CheckedChanged
+        CONFIG.Config.ShowIndexResult = CheckBoxIndexResult.Checked
+        CONFIG.Save()
     End Sub
 
     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

Global_Indexer/frmConnections.Designer.vb

@@ -1,6 +1,6 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class frmConnections
-    Inherits System.Windows.Forms.Form
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
 
     'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
     <System.Diagnostics.DebuggerNonUserCode()> _
@@ -36,20 +36,6 @@ Partial Class frmConnections
         Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.TBDD_CONNECTIONTableAdapter = New Global_Indexer.MyDatasetTableAdapters.TBDD_CONNECTIONTableAdapter()
         Me.TableAdapterManager = New Global_Indexer.MyDatasetTableAdapters.TableAdapterManager()
-        Me.TBDD_CONNECTIONBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
-        Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
-        Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
-        Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
-        Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
-        Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
-        Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
-        Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
-        Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
-        Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
-        Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
-        Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
-        Me.TBDD_CONNECTIONBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
-        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
         Me.BEZEICHNUNGTextBox = New System.Windows.Forms.TextBox()
         Me.SERVERTextBox = New System.Windows.Forms.TextBox()
         Me.DATENBANKTextBox = New System.Windows.Forms.TextBox()
@@ -70,10 +56,19 @@ Partial Class frmConnections
         Me.lblDatenbank = New System.Windows.Forms.Label()
         Me.cmbInitialCatalog = New System.Windows.Forms.ComboBox()
         Me.CheckBoxwin_aut = New System.Windows.Forms.CheckBox()
-        Me.btnCheck_Con = New System.Windows.Forms.Button()
         Me.chkOR_ohne_TNS = New System.Windows.Forms.CheckBox()
-        Me.lblSave = New System.Windows.Forms.Label()
         Me.GUIDTextBox = New System.Windows.Forms.TextBox()
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
+        Me.labelStatus = New DevExpress.XtraBars.BarStaticItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
         GUIDLabel = New System.Windows.Forms.Label()
         BEZEICHNUNGLabel = New System.Windows.Forms.Label()
         SQL_PROVIDERLabel = New System.Windows.Forms.Label()
@@ -84,8 +79,7 @@ Partial Class frmConnections
         GEAENDERTWANNLabel = New System.Windows.Forms.Label()
         CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.TBDD_CONNECTIONBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.TBDD_CONNECTIONBindingNavigator.SuspendLayout()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'GUIDLabel
@@ -149,13 +143,13 @@ Partial Class frmConnections
         Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
+        Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
         Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
         Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
         Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
@@ -163,96 +157,6 @@ Partial Class frmConnections
         Me.TableAdapterManager.TBHOTKEY_WINDOW_HOOKTableAdapter = Nothing
         Me.TableAdapterManager.UpdateOrder = Global_Indexer.MyDatasetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
         '
-        'TBDD_CONNECTIONBindingNavigator
-        '
-        Me.TBDD_CONNECTIONBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
-        Me.TBDD_CONNECTIONBindingNavigator.BindingSource = Me.TBDD_CONNECTIONBindingSource
-        Me.TBDD_CONNECTIONBindingNavigator.CountItem = Me.BindingNavigatorCountItem
-        Me.TBDD_CONNECTIONBindingNavigator.CountItemFormat = "of {0}"
-        Me.TBDD_CONNECTIONBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem
-        Me.TBDD_CONNECTIONBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBDD_CONNECTIONBindingNavigatorSaveItem, Me.ToolStripButton1})
-        resources.ApplyResources(Me.TBDD_CONNECTIONBindingNavigator, "TBDD_CONNECTIONBindingNavigator")
-        Me.TBDD_CONNECTIONBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
-        Me.TBDD_CONNECTIONBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
-        Me.TBDD_CONNECTIONBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem
-        Me.TBDD_CONNECTIONBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
-        Me.TBDD_CONNECTIONBindingNavigator.Name = "TBDD_CONNECTIONBindingNavigator"
-        Me.TBDD_CONNECTIONBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
-        '
-        'BindingNavigatorAddNewItem
-        '
-        Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem")
-        Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
-        '
-        'BindingNavigatorCountItem
-        '
-        Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
-        resources.ApplyResources(Me.BindingNavigatorCountItem, "BindingNavigatorCountItem")
-        '
-        'BindingNavigatorDeleteItem
-        '
-        Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem")
-        Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
-        '
-        'BindingNavigatorMoveFirstItem
-        '
-        Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.BindingNavigatorMoveFirstItem, "BindingNavigatorMoveFirstItem")
-        Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
-        '
-        'BindingNavigatorMovePreviousItem
-        '
-        Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.BindingNavigatorMovePreviousItem, "BindingNavigatorMovePreviousItem")
-        Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
-        '
-        'BindingNavigatorSeparator
-        '
-        Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
-        resources.ApplyResources(Me.BindingNavigatorSeparator, "BindingNavigatorSeparator")
-        '
-        'BindingNavigatorPositionItem
-        '
-        resources.ApplyResources(Me.BindingNavigatorPositionItem, "BindingNavigatorPositionItem")
-        Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
-        '
-        'BindingNavigatorSeparator1
-        '
-        Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
-        resources.ApplyResources(Me.BindingNavigatorSeparator1, "BindingNavigatorSeparator1")
-        '
-        'BindingNavigatorMoveNextItem
-        '
-        Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.BindingNavigatorMoveNextItem, "BindingNavigatorMoveNextItem")
-        Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
-        '
-        'BindingNavigatorMoveLastItem
-        '
-        Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.BindingNavigatorMoveLastItem, "BindingNavigatorMoveLastItem")
-        Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
-        '
-        'BindingNavigatorSeparator2
-        '
-        Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
-        resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
-        '
-        'TBDD_CONNECTIONBindingNavigatorSaveItem
-        '
-        Me.TBDD_CONNECTIONBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        resources.ApplyResources(Me.TBDD_CONNECTIONBindingNavigatorSaveItem, "TBDD_CONNECTIONBindingNavigatorSaveItem")
-        Me.TBDD_CONNECTIONBindingNavigatorSaveItem.Name = "TBDD_CONNECTIONBindingNavigatorSaveItem"
-        '
-        'ToolStripButton1
-        '
-        Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
-        Me.ToolStripButton1.Image = Global.Global_Indexer.My.Resources.Resources.refresh_16xLG
-        resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1")
-        Me.ToolStripButton1.Name = "ToolStripButton1"
-        '
         'BEZEICHNUNGTextBox
         '
         Me.BEZEICHNUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEZEICHNUNG", True))
@@ -341,8 +245,8 @@ Partial Class frmConnections
         '
         Me.ListBox1.DataSource = Me.TBDD_CONNECTIONBindingSource
         Me.ListBox1.DisplayMember = "BEZEICHNUNG"
-        Me.ListBox1.FormattingEnabled = True
         resources.ApplyResources(Me.ListBox1, "ListBox1")
+        Me.ListBox1.FormattingEnabled = True
         Me.ListBox1.Name = "ListBox1"
         Me.ListBox1.ValueMember = "GUID"
         '
@@ -384,25 +288,12 @@ Partial Class frmConnections
         Me.CheckBoxwin_aut.Name = "CheckBoxwin_aut"
         Me.CheckBoxwin_aut.UseVisualStyleBackColor = True
         '
-        'btnCheck_Con
-        '
-        Me.btnCheck_Con.Image = Global.Global_Indexer.My.Resources.Resources.database_refresh
-        resources.ApplyResources(Me.btnCheck_Con, "btnCheck_Con")
-        Me.btnCheck_Con.Name = "btnCheck_Con"
-        Me.btnCheck_Con.UseVisualStyleBackColor = True
-        '
         'chkOR_ohne_TNS
         '
         resources.ApplyResources(Me.chkOR_ohne_TNS, "chkOR_ohne_TNS")
         Me.chkOR_ohne_TNS.Name = "chkOR_ohne_TNS"
         Me.chkOR_ohne_TNS.UseVisualStyleBackColor = True
         '
-        'lblSave
-        '
-        resources.ApplyResources(Me.lblSave, "lblSave")
-        Me.lblSave.BackColor = System.Drawing.Color.Yellow
-        Me.lblSave.Name = "lblSave"
-        '
         'GUIDTextBox
         '
         Me.GUIDTextBox.BackColor = System.Drawing.Color.WhiteSmoke
@@ -411,21 +302,102 @@ Partial Class frmConnections
         Me.GUIDTextBox.Name = "GUIDTextBox"
         Me.GUIDTextBox.ReadOnly = True
         '
+        'RibbonControl1
+        '
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.labelStatus, Me.BarButtonItem5})
+        resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
+        Me.RibbonControl1.MaxItemId = 7
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
+        '
+        'BarButtonItem1
+        '
+        resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
+        Me.BarButtonItem1.Id = 1
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'BarButtonItem2
+        '
+        resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
+        Me.BarButtonItem2.Id = 2
+        Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem2.Name = "BarButtonItem2"
+        '
+        'BarButtonItem3
+        '
+        resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3")
+        Me.BarButtonItem3.Id = 3
+        Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem3.Name = "BarButtonItem3"
+        '
+        'BarButtonItem4
+        '
+        resources.ApplyResources(Me.BarButtonItem4, "BarButtonItem4")
+        Me.BarButtonItem4.Id = 4
+        Me.BarButtonItem4.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem4.Name = "BarButtonItem4"
+        '
+        'labelStatus
+        '
+        resources.ApplyResources(Me.labelStatus, "labelStatus")
+        Me.labelStatus.Id = 5
+        Me.labelStatus.ImageOptions.SvgImage = CType(resources.GetObject("labelStatus.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.labelStatus.Name = "labelStatus"
+        Me.labelStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
+        '
+        'RibbonPageGroup1
+        '
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem3)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem4)
+        Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem5)
+        Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
+        resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
+        resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
+        '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
+        '
+        'BarButtonItem5
+        '
+        resources.ApplyResources(Me.BarButtonItem5, "BarButtonItem5")
+        Me.BarButtonItem5.Id = 6
+        Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem5.Name = "BarButtonItem5"
+        '
         'frmConnections
         '
+        Me.Appearance.Options.UseFont = True
         resources.ApplyResources(Me, "$this")
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.Controls.Add(Me.ListBox1)
         Me.Controls.Add(Me.GUIDTextBox)
-        Me.Controls.Add(Me.lblSave)
         Me.Controls.Add(Me.chkOR_ohne_TNS)
-        Me.Controls.Add(Me.btnCheck_Con)
         Me.Controls.Add(Me.CheckBoxwin_aut)
         Me.Controls.Add(Me.cmbInitialCatalog)
         Me.Controls.Add(Me.lblPassword)
         Me.Controls.Add(Me.lblUserId)
         Me.Controls.Add(Me.lblInitialCatalog)
         Me.Controls.Add(Me.lblDataSource)
-        Me.Controls.Add(Me.ListBox1)
         Me.Controls.Add(Me.SQL_PROVIDERComboBox)
         Me.Controls.Add(GUIDLabel)
         Me.Controls.Add(BEZEICHNUNGLabel)
@@ -446,18 +418,20 @@ Partial Class frmConnections
         Me.Controls.Add(Me.GEANDERTWERTextBox)
         Me.Controls.Add(GEAENDERTWANNLabel)
         Me.Controls.Add(Me.GEAENDERTWANNTextBox)
-        Me.Controls.Add(Me.TBDD_CONNECTIONBindingNavigator)
         Me.Controls.Add(Me.lblDatenbank)
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
         Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmConnections.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
         Me.MaximizeBox = False
         Me.MinimizeBox = False
         Me.Name = "frmConnections"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
         CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.TBDD_CONNECTIONBindingSource,System.ComponentModel.ISupportInitialize).EndInit
-        CType(Me.TBDD_CONNECTIONBindingNavigator,System.ComponentModel.ISupportInitialize).EndInit
-        Me.TBDD_CONNECTIONBindingNavigator.ResumeLayout(false)
-        Me.TBDD_CONNECTIONBindingNavigator.PerformLayout
-        Me.ResumeLayout(false)
+        CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
         Me.PerformLayout
 
 End Sub
@@ -465,19 +439,6 @@ End Sub
     Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
     Friend WithEvents TBDD_CONNECTIONTableAdapter As Global_Indexer.MyDatasetTableAdapters.TBDD_CONNECTIONTableAdapter
     Friend WithEvents TableAdapterManager As Global_Indexer.MyDatasetTableAdapters.TableAdapterManager
-    Friend WithEvents TBDD_CONNECTIONBindingNavigator As System.Windows.Forms.BindingNavigator
-    Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
-    Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
-    Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
-    Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
-    Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
-    Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
-    Friend WithEvents BindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
-    Friend WithEvents BindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
-    Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
-    Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
-    Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
-    Friend WithEvents TBDD_CONNECTIONBindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
     Friend WithEvents BEZEICHNUNGTextBox As System.Windows.Forms.TextBox
     Friend WithEvents SERVERTextBox As System.Windows.Forms.TextBox
     Friend WithEvents DATENBANKTextBox As System.Windows.Forms.TextBox
@@ -498,9 +459,17 @@ End Sub
     Friend WithEvents lblDatenbank As System.Windows.Forms.Label
     Friend WithEvents cmbInitialCatalog As System.Windows.Forms.ComboBox
     Friend WithEvents CheckBoxwin_aut As System.Windows.Forms.CheckBox
-    Friend WithEvents btnCheck_Con As System.Windows.Forms.Button
     Friend WithEvents chkOR_ohne_TNS As System.Windows.Forms.CheckBox
-    Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
-    Friend WithEvents lblSave As System.Windows.Forms.Label
     Friend WithEvents GUIDTextBox As System.Windows.Forms.TextBox
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents labelStatus As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents BarButtonItem5 As DevExpress.XtraBars.BarButtonItem
 End Class

Global_Indexer/frmConnections.vb

@@ -1,7 +1,7 @@
 Imports Oracle.ManagedDataAccess.Client
 Public Class frmConnections
 
-    Private Sub TBDD_CONNECTIONBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBDD_CONNECTIONBindingNavigatorSaveItem.Click
+    Private Sub TBDD_CONNECTIONBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
         Try
             Me.Validate()
             Me.TBDD_CONNECTIONBindingSource.EndEdit()
@@ -9,14 +9,14 @@ Public Class frmConnections
                 Me.GEANDERTWERTextBox.Text = Environment.UserName
                 Me.TBDD_CONNECTIONBindingSource.EndEdit()
                 TBDD_CONNECTIONTableAdapter.Update(MyDataset.TBDD_CONNECTION)
-                Me.lblSave.Visible = True
+                Me.labelStatus.Caption = "Verbindung gespeichert!"
             Else
-                Me.lblSave.Visible = False
+                Me.labelStatus.Caption = String.Empty
             End If
         Catch ex As Exception
             MsgBox("Error in Save Connection:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
-     
+
     End Sub
 
     Private Sub frmConnections_Load(sender As Object, e As EventArgs) Handles MyBase.Load
@@ -34,7 +34,6 @@ Public Class frmConnections
 
     Private Sub SQL_PROVIDERComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles SQL_PROVIDERComboBox.SelectedIndexChanged
         If Me.SQL_PROVIDERComboBox.SelectedIndex <> -1 Then
-            Me.btnCheck_Con.Visible = True
             CheckBoxwin_aut.Visible = False
             chkOR_ohne_TNS.Visible = False
             Select Case Me.SQL_PROVIDERComboBox.SelectedItem
@@ -144,7 +143,7 @@ Public Class frmConnections
         End If
     End Sub
 
-    Private Sub btnCheck_Con_Click(sender As Object, e As EventArgs) Handles btnCheck_Con.Click
+    Private Sub btnCheck_Con_Click(sender As Object, e As EventArgs)
         Dim msg_string As String
         Try
             If Me.SQL_PROVIDERComboBox.SelectedIndex <> -1 Then
@@ -200,7 +199,7 @@ Public Class frmConnections
                             Dim conn As New OracleConnectionStringBuilder
 
                             If chkOR_ohne_TNS.Checked Then
-                                connstr = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" & SERVERTextBox.Text & ")(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" & _
+                                connstr = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" & SERVERTextBox.Text & ")(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" &
                                     DATENBANKTextBox.Text & ")));User Id=" & USERNAMETextBox.Text & ";Password=" & PASSWORDTextBox.Text & ";"
                             Else
                                 conn.DataSource = DATENBANKTextBox.Text
@@ -325,12 +324,12 @@ Public Class frmConnections
         Me.MyDataset.TBDD_CONNECTION.ERSTELLTWERColumn.DefaultValue = Environment.UserName
     End Sub
 
-    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
+    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs)
         Load_Conns()
     End Sub
 
     Private Sub TBDD_CONNECTIONBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBDD_CONNECTIONBindingSource.CurrentChanged
-        Me.lblSave.Visible = False
+        Me.labelStatus.Caption = String.Empty
     End Sub
 
     Private Sub BEMERKUNGTextBox_TextChanged(sender As Object, e As EventArgs) Handles BEMERKUNGTextBox.TextChanged
@@ -346,4 +345,132 @@ Public Class frmConnections
         Threading.Thread.Sleep(300)
         Load_Conns()
     End Sub
+
+    Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
+        TBDD_CONNECTIONBindingSource.AddNew()
+    End Sub
+
+    Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
+        Load_Conns()
+    End Sub
+
+    Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
+        Try
+            Me.Validate()
+            Me.TBDD_CONNECTIONBindingSource.EndEdit()
+            If Me.MyDataset.TBDD_CONNECTION.GetChanges Is Nothing = False Then
+                Me.GEANDERTWERTextBox.Text = Environment.UserName
+                Me.TBDD_CONNECTIONBindingSource.EndEdit()
+                TBDD_CONNECTIONTableAdapter.Update(MyDataset.TBDD_CONNECTION)
+                Me.labelStatus.Caption = "Verbindung gespeichert!"
+            Else
+                Me.labelStatus.Caption = String.Empty
+            End If
+        Catch ex As Exception
+            MsgBox("Error in Save Connection:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+        End Try
+    End Sub
+
+    Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
+        TBDD_CONNECTIONBindingSource.RemoveCurrent()
+    End Sub
+
+    Private Sub BarButtonItem5_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem5.ItemClick
+        Dim msg_string As String
+        Try
+            If Me.SQL_PROVIDERComboBox.SelectedIndex <> -1 Then
+                Cursor = Cursors.WaitCursor
+
+                Select Case Me.SQL_PROVIDERComboBox.SelectedItem
+                    Case "MS-SQL".ToUpper
+                        Dim con As String
+                        If CheckBoxwin_aut.Checked Then
+                            con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbInitialCatalog.Text & ";Trusted_Connection=True;"
+                        Else
+                            con = "Server=" & Me.SERVERTextBox.Text & ";Database=" & Me.cmbInitialCatalog.Text & ";User Id=" & Me.USERNAMETextBox.Text & ";Password=" & Me.PASSWORDTextBox.Text & ";"
+                        End If
+                        msg_string = con
+                        Dim connection As New SqlClient.SqlConnection(con)
+                        connection.Open()
+                        Cursor = Cursors.Default
+
+
+                        If USER_LANGUAGE = "de-DE" Then
+                            MsgBox("Die SQL-Server Verbindung wurde erfolgreich aufgebaut!", MsgBoxStyle.Information, "Erfolg:")
+                        Else
+                            MsgBox("Connection to Server successfully established!", MsgBoxStyle.Information, "Success:")
+                        End If
+
+
+                        My.Settings.Save()
+                    Case "MS-SQLServer".ToUpper
+                        Dim con As String
+                        If CheckBoxwin_aut.Checked Then
+                            con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbInitialCatalog.Text & ";Trusted_Connection=True;"
+                        Else
+                            con = "Server=" & Me.SERVERTextBox.Text & ";Database=" & Me.cmbInitialCatalog.Text & ";User Id=" & Me.USERNAMETextBox.Text & ";Password=" & Me.PASSWORDTextBox.Text & ";"
+                        End If
+                        msg_string = con
+                        Dim connection As New SqlClient.SqlConnection(con)
+                        connection.Open()
+                        Cursor = Cursors.Default
+
+
+                        If USER_LANGUAGE = "de-DE" Then
+                            MsgBox("Die SQL-Server Verbindung wurde erfolgreich aufgebaut!", MsgBoxStyle.Information, "Erfolg:")
+                        Else
+                            MsgBox("Connection to Server successfully established!", MsgBoxStyle.Information, "Success:")
+                        End If
+
+
+                        My.Settings.Save()
+                    Case "Oracle"
+                        My.Settings.Save()
+                        Dim connstr As String
+                        Try
+                            Dim conn As New OracleConnectionStringBuilder
+
+                            If chkOR_ohne_TNS.Checked Then
+                                connstr = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" & SERVERTextBox.Text & ")(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" &
+                                    DATENBANKTextBox.Text & ")));User Id=" & USERNAMETextBox.Text & ";Password=" & PASSWORDTextBox.Text & ";"
+                            Else
+                                conn.DataSource = DATENBANKTextBox.Text
+                                conn.UserID = USERNAMETextBox.Text
+                                conn.Password = PASSWORDTextBox.Text
+                                conn.PersistSecurityInfo = True
+                                conn.ConnectionTimeout = 120
+                                connstr = conn.ConnectionString
+                            End If
+
+                            Dim connection As New OracleConnection(connstr)
+                            connection.Open()
+
+                            If USER_LANGUAGE = "de-DE" Then
+                                MsgBox("Die SQL-Server Verbindung wurde erfolgreich aufgebaut!", MsgBoxStyle.Information, "Erfolg:")
+                            Else
+                                MsgBox("Connection to Server successfully established!", MsgBoxStyle.Information, "Success:")
+                            End If
+                            My.Settings.Save()
+
+                        Catch ex As Exception
+                            MsgBox(ex.Message & vbNewLine & vbNewLine & connstr, MsgBoxStyle.Critical, "Unexpected error in Verbindungsaufbau Oracle:")
+                        End Try
+
+                    Case Else
+                        If USER_LANGUAGE = "de-DE" Then
+                            MsgBox("Test zur Zeit nicht möglich", MsgBoxStyle.Information, "Achtung:")
+                        Else
+                            MsgBox("Test not available", MsgBoxStyle.Information, "Warning:")
+                        End If
+                End Select
+            End If
+
+
+        Catch ex As Exception
+            Dim template As String = ex.Message
+            Clipboard.SetDataObject(template)
+            MsgBox("Unexpected error inm Verbindungsaufbau: " & vbNewLine & ex.Message & vbNewLine & "Connection-String: " & vbNewLine & msg_string, MsgBoxStyle.Critical)
+        End Try
+        Cursor = Cursors.Default
+    End Sub
 End Class

Global_Indexer/frmHistory.Designer.vb

@@ -164,7 +164,6 @@ Partial Class frmHistory
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

Global_Indexer/frmHistory.resx.bak

@@ -1,574 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<root>
-  <!-- 
-    Microsoft ResX Schema 
-    
-    Version 2.0
-    
-    The primary goals of this format is to allow a simple XML format 
-    that is mostly human readable. The generation and parsing of the 
-    various data types are done through the TypeConverter classes 
-    associated with the data types.
-    
-    Example:
-    
-    ... ado.net/XML headers & schema ...
-    <resheader name="resmimetype">text/microsoft-resx</resheader>
-    <resheader name="version">2.0</resheader>
-    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
-    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
-    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
-    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
-    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
-        <value>[base64 mime encoded serialized .NET Framework object]</value>
-    </data>
-    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
-        <comment>This is a comment</comment>
-    </data>
-                
-    There are any number of "resheader" rows that contain simple 
-    name/value pairs.
-    
-    Each data row contains a name, and value. The row also contains a 
-    type or mimetype. Type corresponds to a .NET class that support 
-    text/value conversion through the TypeConverter architecture. 
-    Classes that don't support this are serialized and stored with the 
-    mimetype set.
-    
-    The mimetype is used for serialized objects, and tells the 
-    ResXResourceReader how to depersist the object. This is currently not 
-    extensible. For a given mimetype the value must be set accordingly:
-    
-    Note - application/x-microsoft.net.object.binary.base64 is the format 
-    that the ResXResourceWriter will generate, however the reader can 
-    read any of the formats listed below.
-    
-    mimetype: application/x-microsoft.net.object.binary.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
-            : and then encoded with base64 encoding.
-    
-    mimetype: application/x-microsoft.net.object.soap.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
-            : and then encoded with base64 encoding.
-
-    mimetype: application/x-microsoft.net.object.bytearray.base64
-    value   : The object must be serialized into a byte array 
-            : using a System.ComponentModel.TypeConverter
-            : and then encoded with base64 encoding.
-    -->
-  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
-    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
-    <xsd:element name="root" msdata:IsDataSet="true">
-      <xsd:complexType>
-        <xsd:choice maxOccurs="unbounded">
-          <xsd:element name="metadata">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" />
-              </xsd:sequence>
-              <xsd:attribute name="name" use="required" type="xsd:string" />
-              <xsd:attribute name="type" type="xsd:string" />
-              <xsd:attribute name="mimetype" type="xsd:string" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="assembly">
-            <xsd:complexType>
-              <xsd:attribute name="alias" type="xsd:string" />
-              <xsd:attribute name="name" type="xsd:string" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="data">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
-              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
-              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="resheader">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" />
-            </xsd:complexType>
-          </xsd:element>
-        </xsd:choice>
-      </xsd:complexType>
-    </xsd:element>
-  </xsd:schema>
-  <resheader name="resmimetype">
-    <value>text/microsoft-resx</value>
-  </resheader>
-  <resheader name="version">
-    <value>2.0</value>
-  </resheader>
-  <resheader name="reader">
-    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <resheader name="writer">
-    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <data name="&gt;&gt;MyDataset.Name" xml:space="preserve">
-    <value>MyDataset</value>
-  </data>
-  <data name="&gt;&gt;ToolStripButton3.Name" xml:space="preserve">
-    <value>ToolStripButton3</value>
-  </data>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="GridControl1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveFirstItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="colFILENAME_NEW.Visible" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="BindingNavigatorCountItem.ToolTipText" xml:space="preserve">
-    <value>Die Gesamtanzahl der Elemente.</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYTableAdapter.Type" xml:space="preserve">
-    <value>Global_Indexer.MyDatasetTableAdapters.TBGI_HISTORYTableAdapter, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.Text" xml:space="preserve">
-    <value>Vorherige verschieben</value>
-  </data>
-  <data name="&gt;&gt;colGUID.Name" xml:space="preserve">
-    <value>colGUID</value>
-  </data>
-  <data name="&gt;&gt;colFILENAME_NEW.Name" xml:space="preserve">
-    <value>colFILENAME_NEW</value>
-  </data>
-  <data name="colADDED_WHEN.Visible" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="ToolStripButton1.ImageTransparentColor" type="System.Drawing.Color, System.Drawing">
-    <value>Magenta</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
-        wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
-        v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
-        UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
-        Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
-        lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="&gt;&gt;$this.Name" xml:space="preserve">
-    <value>frmHistory</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorPositionItem.Name" xml:space="preserve">
-    <value>BindingNavigatorPositionItem</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator1.Name" xml:space="preserve">
-    <value>BindingNavigatorSeparator1</value>
-  </data>
-  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="GridControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
-    <value>Fill</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
-        h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
-        twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
-        kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
-        WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
-        8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
-</value>
-  </data>
-  <data name="ToolStripButton1.Text" xml:space="preserve">
-    <value>Alle Dateien laden</value>
-  </data>
-  <assembly alias="DevExpress.XtraEditors.v15.2" name="DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v15.2">
-    <value>Center</value>
-  </data>
-  <data name="colFILENAME_NEW.Width" type="System.Int32, mscorlib">
-    <value>368</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.Text" xml:space="preserve">
-    <value>Letzte verschieben</value>
-  </data>
-  <data name="&gt;&gt;ToolStripButton2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="colGUID.Visible" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="colFILENAME_ORIGINAL.VisibleIndex" type="System.Int32, mscorlib">
-    <value>1</value>
-  </data>
-  <data name="colFILENAME_ORIGINAL.Width" type="System.Int32, mscorlib">
-    <value>315</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.Text" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;colGUID.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="colGUID.VisibleIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
-    <value>Regular</value>
-  </data>
-  <data name="BindingNavigatorCountItem.Text" xml:space="preserve">
-    <value>von {0} indexierten Dateien</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.AutoSize" type="System.Boolean, mscorlib">
-    <value>False</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
-        5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
-        Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
-        08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="&gt;&gt;ToolStripButton2.Name" xml:space="preserve">
-    <value>ToolStripButton2</value>
-  </data>
-  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>1089, 362</value>
-  </data>
-  <assembly alias="DevExpress.Utils.v15.2" name="DevExpress.Utils.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v15.2">
-    <value>None</value>
-  </data>
-  <data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
-    <value>1</value>
-  </data>
-  <data name="&gt;&gt;colADDED_WHEN.Name" xml:space="preserve">
-    <value>colADDED_WHEN</value>
-  </data>
-  <data name="&gt;&gt;colFILENAME_ORIGINAL.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;$this.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigatorSeparator1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>6, 25</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.AccessibleName" xml:space="preserve">
-    <value>Position</value>
-  </data>
-  <data name="ToolStripButton2.Text" xml:space="preserve">
-    <value>Heutige Dateien laden</value>
-  </data>
-  <data name="GridControl1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 25</value>
-  </data>
-  <data name="colADDED_WHEN.Width" type="System.Int32, mscorlib">
-    <value>140</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.ToolTipText" xml:space="preserve">
-    <value>Aktuelle Position</value>
-  </data>
-  <data name="&gt;&gt;ToolStripButton1.Name" xml:space="preserve">
-    <value>ToolStripButton1</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.BackColor" type="System.Drawing.Color, System.Drawing">
-    <value>Aqua</value>
-  </data>
-  <data name="ToolStripButton1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>122, 22</value>
-  </data>
-  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
-    <value>6, 13</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveLastItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMoveLastItem</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorCountItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;colFILENAME_NEW.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="colADDED_WHEN.Caption" xml:space="preserve">
-    <value>Erstellt wann</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="BindingNavigatorCountItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>148, 22</value>
-  </data>
-  <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
-    <value>TableAdapterManager</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="&gt;&gt;colADDED_WHEN.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 8.25pt</value>
-  </data>
-  <data name="BindingNavigatorMoveNextItem.Text" xml:space="preserve">
-    <value>Nächste verschieben</value>
-  </data>
-  <data name="&gt;&gt;GridView1.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
-    <value>Tile</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveLastItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorPositionItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripTextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1089, 337</value>
-  </data>
-  <data name="colFILENAME_NEW.Caption" xml:space="preserve">
-    <value>Filename New</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator2.Name" xml:space="preserve">
-    <value>BindingNavigatorSeparator2</value>
-  </data>
-  <data name="TBGI_HISTORYBindingNavigator.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorCountItem.Name" xml:space="preserve">
-    <value>BindingNavigatorCountItem</value>
-  </data>
-  <data name="&gt;&gt;MyDataset.Type" xml:space="preserve">
-    <value>Global_Indexer.MyDataset, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
-  </data>
-  <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
-    <value>Global_Indexer.MyDatasetTableAdapters.TableAdapterManager, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
-  </data>
-  <data name="ToolStripButton3.ImageTransparentColor" type="System.Drawing.Color, System.Drawing">
-    <value>Magenta</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveNextItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYBindingNavigator.Name" xml:space="preserve">
-    <value>TBGI_HISTORYBindingNavigator</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYBindingSource.Type" xml:space="preserve">
-    <value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigatorSeparator.Size" type="System.Drawing.Size, System.Drawing">
-    <value>6, 25</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTip" xml:space="preserve">
-    <value />
-  </data>
-  <data name="colADDED_WHEN.VisibleIndex" type="System.Int32, mscorlib">
-    <value>3</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="BindingNavigatorSeparator2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>6, 25</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="TBGI_HISTORYBindingNavigator.Text" xml:space="preserve">
-    <value>BindingNavigator1</value>
-  </data>
-  <data name="&gt;&gt;colFILENAME_ORIGINAL.Name" xml:space="preserve">
-    <value>colFILENAME_ORIGINAL</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYBindingNavigator.Type" xml:space="preserve">
-    <value>System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="TBGI_HISTORYBindingNavigator.Size" type="System.Drawing.Size, System.Drawing">
-    <value>1089, 25</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
-        n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
-        N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
-        oAc0QjgAAAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYBindingSource.Name" xml:space="preserve">
-    <value>TBGI_HISTORYBindingSource</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Name" xml:space="preserve">
-    <value>GridControl1</value>
-  </data>
-  <data name="ToolStripButton2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>144, 22</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveFirstItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMoveFirstItem</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.FontSizeDelta" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="ToolStripButton2.ImageTransparentColor" type="System.Drawing.Color, System.Drawing">
-    <value>Magenta</value>
-  </data>
-  <data name="$this.Text" xml:space="preserve">
-    <value>Historie - Indexierte Dateien</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYBindingNavigator.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <assembly alias="DevExpress.Data.v15.2" name="DevExpress.Data.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v15.2">
-    <value>Default</value>
-  </data>
-  <data name="colFILENAME_NEW.VisibleIndex" type="System.Int32, mscorlib">
-    <value>2</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
-    <value />
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Top, Left</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="BindingNavigatorMoveNextItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYBindingNavigator.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMovePreviousItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="colGUID.Caption" xml:space="preserve">
-    <value>ID</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="colGUID.Width" type="System.Int32, mscorlib">
-    <value>65</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMovePreviousItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMovePreviousItem</value>
-  </data>
-  <data name="colFILENAME_ORIGINAL.Visible" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="&gt;&gt;TBGI_HISTORYTableAdapter.Name" xml:space="preserve">
-    <value>TBGI_HISTORYTableAdapter</value>
-  </data>
-  <data name="colFILENAME_ORIGINAL.Caption" xml:space="preserve">
-    <value>Original Filename</value>
-  </data>
-  <data name="BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="TBGI_HISTORYBindingNavigator.TabIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;GridView1.Name" xml:space="preserve">
-    <value>GridView1</value>
-  </data>
-  <data name="ToolStripButton3.Text" xml:space="preserve">
-    <value>Export Excel</value>
-  </data>
-  <data name="&gt;&gt;ToolStripButton3.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
-    <value>Horizontal</value>
-  </data>
-  <data name="&gt;&gt;ToolStripButton1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.Text" xml:space="preserve">
-    <value>Erste verschieben</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveNextItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMoveNextItem</value>
-  </data>
-  <data name="ToolStripButton3.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
-    <value>Inherit</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>50, 23</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator.Name" xml:space="preserve">
-    <value>BindingNavigatorSeparator</value>
-  </data>
-  <metadata name="TBGI_HISTORYTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>336, 17</value>
-  </metadata>
-  <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>540, 17</value>
-  </metadata>
-  <metadata name="TBGI_HISTORYBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>127, 17</value>
-  </metadata>
-  <metadata name="$this.Language" type="System.Globalization.CultureInfo, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>en-US</value>
-  </metadata>
-  <metadata name="TBGI_HISTORYBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>713, 17</value>
-  </metadata>
-  <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 17</value>
-  </metadata>
-</root>

Global_Indexer/frmHotKey_Add.Designer.vb

@@ -758,7 +758,6 @@ Partial Class frmHotKey_Add
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

Global_Indexer/frmHotKey_Add.vb

@@ -307,7 +307,7 @@
                                 If ClassDatabase.Execute_non_Query(del, True) = True Then
                                     del = "DELETE FROM TBHOTKEY_PROFILE WHERE GUID = " & ID
                                     If ClassDatabase.Execute_non_Query(del, True) = True Then
-                                        ClassLogger.Add(">> Hotkey-Profil: " & ID & " wurde gelöscht!", False)
+                                        LOGGER.Info(">> Hotkey-Profil: " & ID & " wurde gelöscht!")
                                         Load_Profiles()
                                         Load_UserForProfiles()
                                         MsgBox("Profil wurde erfolgreich gelöscht!", MsgBoxStyle.Information, "Erfolgsmeldung")

Global_Indexer/frmHotkey_User.Designer.vb

@@ -134,7 +134,6 @@ Partial Class frmHotkey_User
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
@@ -248,9 +247,7 @@ Partial Class frmHotkey_User
         'chkbxMaximizeWS
         '
         resources.ApplyResources(Me.chkbxMaximizeWS, "chkbxMaximizeWS")
-        Me.chkbxMaximizeWS.Checked = Global.Global_Indexer.My.MySettings.Default.WDSearch_maximized
         Me.chkbxMaximizeWS.CheckState = System.Windows.Forms.CheckState.Checked
-        Me.chkbxMaximizeWS.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.Global_Indexer.My.MySettings.Default, "WDSearch_maximized", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
         Me.chkbxMaximizeWS.Name = "chkbxMaximizeWS"
         Me.chkbxMaximizeWS.UseVisualStyleBackColor = True
         '

Global_Indexer/frmHotkey_User.vb

@@ -105,6 +105,7 @@
     End Sub
 
     Private Sub chkbxMaximizeWS_CheckedChanged(sender As Object, e As EventArgs) Handles chkbxMaximizeWS.CheckedChanged
-        My.Settings.Save()
+        CONFIG.Config.WindreamSearchMaximized = chkbxMaximizeWS.Checked
+        CONFIG.Save()
     End Sub
 End Class

Global_Indexer/frmIndex.designer.vb

@@ -1,6 +1,6 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class frmIndex
-    Inherits System.Windows.Forms.Form
+    Inherits DevExpress.XtraBars.Ribbon.RibbonForm
 
     'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
     <System.Diagnostics.DebuggerNonUserCode()>
@@ -27,23 +27,31 @@ Partial Class frmIndex
         Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
         Me.pnlIndex = New System.Windows.Forms.Panel()
         Me.Panel1 = New System.Windows.Forms.Panel()
-        Me.CheckBox1 = New System.Windows.Forms.CheckBox()
-        Me.Button1 = New System.Windows.Forms.Button()
-        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
-        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
-        Me.lblerror = New System.Windows.Forms.Label()
         Me.cmbDokumentart = New System.Windows.Forms.ComboBox()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.Panel2 = New System.Windows.Forms.Panel()
-        Me.chkMultiIndexer = New System.Windows.Forms.CheckBox()
-        Me.chkdelete_origin = New System.Windows.Forms.CheckBox()
-        Me.Label2 = New System.Windows.Forms.Label()
-        Me.txtIndexfilepath = New System.Windows.Forms.TextBox()
-        Me.btnOK = New System.Windows.Forms.Button()
+        Me.checkMultiindex = New DevExpress.XtraEditors.CheckEdit()
+        Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
+        Me.BarToggleSwitchItem1 = New DevExpress.XtraBars.BarToggleSwitchItem()
+        Me.BarToggleSwitchItem2 = New DevExpress.XtraBars.BarToggleSwitchItem()
+        Me.BarCheckItem1 = New DevExpress.XtraBars.BarCheckItem()
+        Me.checkItemDeleteSource = New DevExpress.XtraBars.BarCheckItem()
+        Me.checkItemPreselection = New DevExpress.XtraBars.BarCheckItem()
+        Me.labelError = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarStaticItem1 = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarStaticItem2 = New DevExpress.XtraBars.BarStaticItem()
+        Me.labelFilePath = New DevExpress.XtraBars.BarStaticItem()
+        Me.checkItemPreview = New DevExpress.XtraBars.BarCheckItem()
+        Me.labelNotice = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarListItem1 = New DevExpress.XtraBars.BarListItem()
+        Me.BarStaticItem4 = New DevExpress.XtraBars.BarStaticItem()
+        Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
+        Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
+        Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
+        Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
+        Me.btnOK = New DevExpress.XtraEditors.SimpleButton()
         Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
-        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
-        Me.lblhinweis = New System.Windows.Forms.ToolStripStatusLabel()
-        Me.tslblVorschau = New System.Windows.Forms.ToolStripStatusLabel()
         Me.MyDataset = New Global_Indexer.MyDataset()
         Me.VWDDINDEX_MANBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.VWDDINDEX_MANTableAdapter = New Global_Indexer.MyDatasetTableAdapters.VWDDINDEX_MANTableAdapter()
@@ -52,14 +60,15 @@ Partial Class frmIndex
         Me.VWINDEX_AUTOMTableAdapter = New Global_Indexer.MyDatasetTableAdapters.VWDDINDEX_AUTOMTableAdapter()
         Me.PdfBarController1 = New DevExpress.XtraPdfViewer.Bars.PdfBarController(Me.components)
         Me.PdfBarController2 = New DevExpress.XtraPdfViewer.Bars.PdfBarController(Me.components)
+        Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SplitContainer1.Panel1.SuspendLayout()
         Me.SplitContainer1.Panel2.SuspendLayout()
         Me.SplitContainer1.SuspendLayout()
         Me.Panel1.SuspendLayout()
-        Me.ToolStrip1.SuspendLayout()
         Me.Panel2.SuspendLayout()
-        Me.StatusStrip1.SuspendLayout()
+        CType(Me.checkMultiindex.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.VWDDINDEX_MANBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.VWINDEX_AUTOMBindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -90,51 +99,12 @@ Partial Class frmIndex
         '
         'Panel1
         '
-        Me.Panel1.BackColor = System.Drawing.SystemColors.ButtonHighlight
-        Me.Panel1.Controls.Add(Me.CheckBox1)
-        Me.Panel1.Controls.Add(Me.Button1)
-        Me.Panel1.Controls.Add(Me.ToolStrip1)
-        Me.Panel1.Controls.Add(Me.lblerror)
+        Me.Panel1.BackColor = System.Drawing.Color.Transparent
         Me.Panel1.Controls.Add(Me.cmbDokumentart)
         Me.Panel1.Controls.Add(Me.Label1)
         resources.ApplyResources(Me.Panel1, "Panel1")
         Me.Panel1.Name = "Panel1"
         '
-        'CheckBox1
-        '
-        resources.ApplyResources(Me.CheckBox1, "CheckBox1")
-        Me.CheckBox1.Checked = Global.Global_Indexer.My.MySettings.Default.DA_Vorauswahlaktiv
-        Me.CheckBox1.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.Global_Indexer.My.MySettings.Default, "DA_Vorauswahlaktiv", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
-        Me.CheckBox1.Name = "CheckBox1"
-        Me.CheckBox1.UseVisualStyleBackColor = True
-        '
-        'Button1
-        '
-        resources.ApplyResources(Me.Button1, "Button1")
-        Me.Button1.Image = Global.Global_Indexer.My.Resources.Resources.cancel
-        Me.Button1.Name = "Button1"
-        Me.Button1.UseVisualStyleBackColor = True
-        '
-        'ToolStrip1
-        '
-        Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
-        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1})
-        resources.ApplyResources(Me.ToolStrip1, "ToolStrip1")
-        Me.ToolStrip1.Name = "ToolStrip1"
-        '
-        'ToolStripButton1
-        '
-        Me.ToolStripButton1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.ToolStripButton1.BackColor = System.Drawing.SystemColors.ButtonHighlight
-        Me.ToolStripButton1.Image = Global.Global_Indexer.My.Resources.Resources.bullet_arrow_top
-        resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1")
-        Me.ToolStripButton1.Name = "ToolStripButton1"
-        '
-        'lblerror
-        '
-        resources.ApplyResources(Me.lblerror, "lblerror")
-        Me.lblerror.Name = "lblerror"
-        '
         'cmbDokumentart
         '
         resources.ApplyResources(Me.cmbDokumentart, "cmbDokumentart")
@@ -150,43 +120,170 @@ Partial Class frmIndex
         '
         'Panel2
         '
-        Me.Panel2.Controls.Add(Me.chkMultiIndexer)
-        Me.Panel2.Controls.Add(Me.chkdelete_origin)
-        Me.Panel2.Controls.Add(Me.Label2)
-        Me.Panel2.Controls.Add(Me.txtIndexfilepath)
+        Me.Panel2.BackColor = System.Drawing.Color.Transparent
+        Me.Panel2.Controls.Add(Me.checkMultiindex)
         Me.Panel2.Controls.Add(Me.btnOK)
         resources.ApplyResources(Me.Panel2, "Panel2")
         Me.Panel2.Name = "Panel2"
         '
-        'chkMultiIndexer
+        'checkMultiindex
         '
-        resources.ApplyResources(Me.chkMultiIndexer, "chkMultiIndexer")
-        Me.chkMultiIndexer.BackColor = System.Drawing.Color.Yellow
-        Me.chkMultiIndexer.ForeColor = System.Drawing.Color.Maroon
-        Me.chkMultiIndexer.Name = "chkMultiIndexer"
-        Me.chkMultiIndexer.UseVisualStyleBackColor = False
+        resources.ApplyResources(Me.checkMultiindex, "checkMultiindex")
+        Me.checkMultiindex.MenuManager = Me.RibbonControl1
+        Me.checkMultiindex.Name = "checkMultiindex"
+        Me.checkMultiindex.Properties.Appearance.BackColor = System.Drawing.Color.Khaki
+        Me.checkMultiindex.Properties.Appearance.Font = CType(resources.GetObject("checkMultiindex.Properties.Appearance.Font"), System.Drawing.Font)
+        Me.checkMultiindex.Properties.Appearance.ForeColor = System.Drawing.Color.DarkRed
+        Me.checkMultiindex.Properties.Appearance.Options.UseBackColor = True
+        Me.checkMultiindex.Properties.Appearance.Options.UseFont = True
+        Me.checkMultiindex.Properties.Appearance.Options.UseForeColor = True
+        Me.checkMultiindex.Properties.Caption = resources.GetString("checkMultiindex.Properties.Caption")
         '
-        'chkdelete_origin
+        'RibbonControl1
         '
-        resources.ApplyResources(Me.chkdelete_origin, "chkdelete_origin")
-        Me.chkdelete_origin.Name = "chkdelete_origin"
-        Me.chkdelete_origin.UseVisualStyleBackColor = True
+        Me.RibbonControl1.ExpandCollapseItem.Id = 0
+        Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarToggleSwitchItem1, Me.BarToggleSwitchItem2, Me.BarCheckItem1, Me.checkItemDeleteSource, Me.checkItemPreselection, Me.labelError, Me.BarStaticItem1, Me.BarStaticItem2, Me.labelFilePath, Me.checkItemPreview, Me.labelNotice, Me.BarListItem1, Me.BarStaticItem4, Me.BarButtonItem1})
+        resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
+        Me.RibbonControl1.MaxItemId = 22
+        Me.RibbonControl1.Name = "RibbonControl1"
+        Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
+        Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
+        Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
         '
-        'Label2
+        'BarToggleSwitchItem1
         '
-        resources.ApplyResources(Me.Label2, "Label2")
-        Me.Label2.Name = "Label2"
+        resources.ApplyResources(Me.BarToggleSwitchItem1, "BarToggleSwitchItem1")
+        Me.BarToggleSwitchItem1.Id = 1
+        Me.BarToggleSwitchItem1.Name = "BarToggleSwitchItem1"
         '
-        'txtIndexfilepath
+        'BarToggleSwitchItem2
         '
-        resources.ApplyResources(Me.txtIndexfilepath, "txtIndexfilepath")
-        Me.txtIndexfilepath.Name = "txtIndexfilepath"
-        Me.txtIndexfilepath.ReadOnly = True
+        resources.ApplyResources(Me.BarToggleSwitchItem2, "BarToggleSwitchItem2")
+        Me.BarToggleSwitchItem2.Id = 2
+        Me.BarToggleSwitchItem2.Name = "BarToggleSwitchItem2"
+        '
+        'BarCheckItem1
+        '
+        resources.ApplyResources(Me.BarCheckItem1, "BarCheckItem1")
+        Me.BarCheckItem1.Id = 5
+        Me.BarCheckItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarCheckItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarCheckItem1.Name = "BarCheckItem1"
+        '
+        'checkItemDeleteSource
+        '
+        resources.ApplyResources(Me.checkItemDeleteSource, "checkItemDeleteSource")
+        Me.checkItemDeleteSource.Id = 7
+        Me.checkItemDeleteSource.ImageOptions.SvgImage = CType(resources.GetObject("checkItemDeleteSource.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.checkItemDeleteSource.Name = "checkItemDeleteSource"
+        '
+        'checkItemPreselection
+        '
+        resources.ApplyResources(Me.checkItemPreselection, "checkItemPreselection")
+        Me.checkItemPreselection.Id = 9
+        Me.checkItemPreselection.ImageOptions.SvgImage = CType(resources.GetObject("checkItemPreselection.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.checkItemPreselection.Name = "checkItemPreselection"
+        '
+        'labelError
+        '
+        resources.ApplyResources(Me.labelError, "labelError")
+        Me.labelError.Id = 10
+        Me.labelError.ImageOptions.SvgImage = CType(resources.GetObject("labelError.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.labelError.Name = "labelError"
+        Me.labelError.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        Me.labelError.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        '
+        'BarStaticItem1
+        '
+        resources.ApplyResources(Me.BarStaticItem1, "BarStaticItem1")
+        Me.BarStaticItem1.Id = 12
+        Me.BarStaticItem1.Name = "BarStaticItem1"
+        '
+        'BarStaticItem2
+        '
+        resources.ApplyResources(Me.BarStaticItem2, "BarStaticItem2")
+        Me.BarStaticItem2.Id = 13
+        Me.BarStaticItem2.Name = "BarStaticItem2"
+        '
+        'labelFilePath
+        '
+        resources.ApplyResources(Me.labelFilePath, "labelFilePath")
+        Me.labelFilePath.Id = 14
+        Me.labelFilePath.ImageOptions.SvgImage = CType(resources.GetObject("labelFilePath.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.labelFilePath.Name = "labelFilePath"
+        Me.labelFilePath.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        '
+        'checkItemPreview
+        '
+        resources.ApplyResources(Me.checkItemPreview, "checkItemPreview")
+        Me.checkItemPreview.Id = 16
+        Me.checkItemPreview.ImageOptions.SvgImage = CType(resources.GetObject("checkItemPreview.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.checkItemPreview.Name = "checkItemPreview"
+        '
+        'labelNotice
+        '
+        resources.ApplyResources(Me.labelNotice, "labelNotice")
+        Me.labelNotice.Id = 17
+        Me.labelNotice.ImageOptions.SvgImage = CType(resources.GetObject("labelNotice.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.labelNotice.Name = "labelNotice"
+        Me.labelNotice.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
+        Me.labelNotice.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
+        '
+        'BarListItem1
+        '
+        resources.ApplyResources(Me.BarListItem1, "BarListItem1")
+        Me.BarListItem1.Id = 19
+        Me.BarListItem1.Name = "BarListItem1"
+        '
+        'BarStaticItem4
+        '
+        resources.ApplyResources(Me.BarStaticItem4, "BarStaticItem4")
+        Me.BarStaticItem4.Id = 20
+        Me.BarStaticItem4.Name = "BarStaticItem4"
+        '
+        'BarButtonItem1
+        '
+        resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
+        Me.BarButtonItem1.Id = 21
+        Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem1.Name = "BarButtonItem1"
+        '
+        'RibbonPage1
+        '
+        Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroup2})
+        Me.RibbonPage1.Name = "RibbonPage1"
+        resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
+        '
+        'RibbonPageGroup3
+        '
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.checkItemDeleteSource)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.checkItemPreselection)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.checkItemPreview)
+        Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem1)
+        Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
+        resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3")
+        '
+        'RibbonPageGroup2
+        '
+        Me.RibbonPageGroup2.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
+        Me.RibbonPageGroup2.ItemLinks.Add(Me.BarCheckItem1)
+        Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
+        resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2")
+        '
+        'RibbonStatusBar1
+        '
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.labelFilePath)
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.labelError)
+        Me.RibbonStatusBar1.ItemLinks.Add(Me.labelNotice)
+        resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
+        Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
+        Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
         '
         'btnOK
         '
         resources.ApplyResources(Me.btnOK, "btnOK")
-        Me.btnOK.Image = Global.Global_Indexer.My.Resources.Resources.Go
+        Me.btnOK.Appearance.Font = CType(resources.GetObject("btnOK.Appearance.Font"), System.Drawing.Font)
+        Me.btnOK.Appearance.Options.UseFont = True
+        Me.btnOK.ImageOptions.SvgImage = CType(resources.GetObject("btnOK.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
         Me.btnOK.Name = "btnOK"
         '
         'DocumentViewer1
@@ -194,23 +291,6 @@ Partial Class frmIndex
         resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1")
         Me.DocumentViewer1.Name = "DocumentViewer1"
         '
-        'StatusStrip1
-        '
-        Me.StatusStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
-        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.lblhinweis, Me.tslblVorschau})
-        resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
-        Me.StatusStrip1.Name = "StatusStrip1"
-        '
-        'lblhinweis
-        '
-        Me.lblhinweis.Name = "lblhinweis"
-        resources.ApplyResources(Me.lblhinweis, "lblhinweis")
-        '
-        'tslblVorschau
-        '
-        Me.tslblVorschau.Name = "tslblVorschau"
-        resources.ApplyResources(Me.tslblVorschau, "tslblVorschau")
-        '
         'MyDataset
         '
         Me.MyDataset.DataSetName = "MyDataset"
@@ -233,7 +313,6 @@ Partial Class frmIndex
         Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
@@ -257,29 +336,32 @@ Partial Class frmIndex
         '
         Me.VWINDEX_AUTOMTableAdapter.ClearBeforeFill = True
         '
+        'RibbonPage2
+        '
+        Me.RibbonPage2.Name = "RibbonPage2"
+        resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
+        '
         'frmIndex
         '
+        Me.Appearance.Options.UseFont = True
         resources.ApplyResources(Me, "$this")
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ControlBox = False
         Me.Controls.Add(Me.SplitContainer1)
-        Me.Controls.Add(Me.StatusStrip1)
-        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.SizableToolWindow
-        Me.MaximizeBox = False
-        Me.MinimizeBox = False
+        Me.Controls.Add(Me.RibbonStatusBar1)
+        Me.Controls.Add(Me.RibbonControl1)
+        Me.IconOptions.SvgImage = CType(resources.GetObject("frmIndex.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
         Me.Name = "frmIndex"
+        Me.Ribbon = Me.RibbonControl1
+        Me.StatusBar = Me.RibbonStatusBar1
         Me.SplitContainer1.Panel1.ResumeLayout(False)
         Me.SplitContainer1.Panel2.ResumeLayout(False)
         CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
         Me.SplitContainer1.ResumeLayout(False)
         Me.Panel1.ResumeLayout(False)
         Me.Panel1.PerformLayout()
-        Me.ToolStrip1.ResumeLayout(False)
-        Me.ToolStrip1.PerformLayout()
         Me.Panel2.ResumeLayout(False)
-        Me.Panel2.PerformLayout()
-        Me.StatusStrip1.ResumeLayout(False)
-        Me.StatusStrip1.PerformLayout()
+        CType(Me.checkMultiindex.Properties, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.VWDDINDEX_MANBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.VWINDEX_AUTOMBindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -289,7 +371,6 @@ Partial Class frmIndex
         Me.PerformLayout()
 
     End Sub
-    Friend WithEvents btnOK As System.Windows.Forms.Button
 
     Friend WithEvents Label1 As System.Windows.Forms.Label
     Friend WithEvents cmbDokumentart As System.Windows.Forms.ComboBox
@@ -297,34 +378,43 @@ Partial Class frmIndex
 
     Friend WithEvents Panel1 As System.Windows.Forms.Panel
     Friend WithEvents TBCONNECTIONBindingSource As System.Windows.Forms.BindingSource
-
-    Friend WithEvents lblerror As System.Windows.Forms.Label
-    Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
-    Friend WithEvents lblhinweis As System.Windows.Forms.ToolStripStatusLabel
     Friend WithEvents VWINDEX_AUTOMBindingSource As System.Windows.Forms.BindingSource
 
     Friend WithEvents Panel2 As System.Windows.Forms.Panel
-    Friend WithEvents tslblVorschau As System.Windows.Forms.ToolStripStatusLabel
     Friend WithEvents VWDMS_DOKUMENTARTZUORDNUNGBindingSource As System.Windows.Forms.BindingSource
 
     Friend WithEvents VWIORDNER_DOKARTBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents Label2 As System.Windows.Forms.Label
-    Friend WithEvents txtIndexfilepath As System.Windows.Forms.TextBox
     Friend WithEvents MyDataset As Global_Indexer.MyDataset
     Friend WithEvents VWDDINDEX_MANBindingSource As System.Windows.Forms.BindingSource
     Friend WithEvents VWDDINDEX_MANTableAdapter As Global_Indexer.MyDatasetTableAdapters.VWDDINDEX_MANTableAdapter
     Friend WithEvents TableAdapterManager As Global_Indexer.MyDatasetTableAdapters.TableAdapterManager
     Friend WithEvents VWINDEX_AUTOMBindingSource1 As System.Windows.Forms.BindingSource
     Friend WithEvents VWINDEX_AUTOMTableAdapter As Global_Indexer.MyDatasetTableAdapters.VWDDINDEX_AUTOMTableAdapter
-    Friend WithEvents chkdelete_origin As System.Windows.Forms.CheckBox
     Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer
     Friend WithEvents pnlIndex As System.Windows.Forms.Panel
     Friend WithEvents PdfBarController1 As DevExpress.XtraPdfViewer.Bars.PdfBarController
     Friend WithEvents PdfBarController2 As DevExpress.XtraPdfViewer.Bars.PdfBarController
-    Friend WithEvents chkMultiIndexer As System.Windows.Forms.CheckBox
-    Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
-    Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
-    Friend WithEvents Button1 As System.Windows.Forms.Button
-    Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
     Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer
+    Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
+    Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
+    Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
+    Friend WithEvents BarToggleSwitchItem1 As DevExpress.XtraBars.BarToggleSwitchItem
+    Friend WithEvents BarToggleSwitchItem2 As DevExpress.XtraBars.BarToggleSwitchItem
+    Friend WithEvents BarCheckItem1 As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents checkItemDeleteSource As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents checkItemPreselection As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents labelError As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents BarStaticItem2 As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
+    Friend WithEvents labelFilePath As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents checkItemPreview As DevExpress.XtraBars.BarCheckItem
+    Friend WithEvents labelNotice As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents BarListItem1 As DevExpress.XtraBars.BarListItem
+    Friend WithEvents BarStaticItem4 As DevExpress.XtraBars.BarStaticItem
+    Friend WithEvents btnOK As DevExpress.XtraEditors.SimpleButton
+    Friend WithEvents checkMultiindex As DevExpress.XtraEditors.CheckEdit
+    Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
 End Class

Global_Indexer/frmIndex.resx

@@ -123,7 +123,7 @@
   </data>
   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
   <data name="SplitContainer1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 0</value>
+    <value>0, 158</value>
   </data>
   <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="pnlIndex.AutoScroll" type="System.Boolean, mscorlib">
@@ -133,10 +133,10 @@
     <value>Fill</value>
   </data>
   <data name="pnlIndex.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 104</value>
+    <value>0, 57</value>
   </data>
   <data name="pnlIndex.Size" type="System.Drawing.Size, System.Drawing">
-    <value>535, 269</value>
+    <value>636, 404</value>
   </data>
   <data name="pnlIndex.TabIndex" type="System.Int32, mscorlib">
     <value>8</value>
@@ -156,158 +156,14 @@
   <data name="&gt;&gt;pnlIndex.ZOrder" xml:space="preserve">
     <value>0</value>
   </data>
-  <data name="CheckBox1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Right</value>
-  </data>
-  <data name="CheckBox1.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="CheckBox1.CheckAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleRight</value>
-  </data>
-  <data name="CheckBox1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>408, 76</value>
-  </data>
-  <data name="CheckBox1.RightToLeft" type="System.Windows.Forms.RightToLeft, System.Windows.Forms">
-    <value>No</value>
-  </data>
-  <data name="CheckBox1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>123, 21</value>
-  </data>
-  <data name="CheckBox1.TabIndex" type="System.Int32, mscorlib">
-    <value>12</value>
-  </data>
-  <data name="CheckBox1.Text" xml:space="preserve">
-    <value>Vorauswahl aktiv</value>
-  </data>
-  <data name="&gt;&gt;CheckBox1.Name" xml:space="preserve">
-    <value>CheckBox1</value>
-  </data>
-  <data name="&gt;&gt;CheckBox1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;CheckBox1.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;CheckBox1.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="Button1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Right</value>
-  </data>
-  <data name="Button1.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt, style=Bold</value>
-  </data>
-  <data name="Button1.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleLeft</value>
-  </data>
-  <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>398, 40</value>
-  </data>
-  <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>133, 30</value>
-  </data>
-  <data name="Button1.TabIndex" type="System.Int32, mscorlib">
-    <value>11</value>
-  </data>
-  <data name="Button1.Text" xml:space="preserve">
-    <value>Abbruch</value>
-  </data>
-  <data name="Button1.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleRight</value>
-  </data>
-  <data name="&gt;&gt;Button1.Name" xml:space="preserve">
-    <value>Button1</value>
-  </data>
-  <data name="&gt;&gt;Button1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Button1.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;Button1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>774, 56</value>
-  </metadata>
-  <data name="ToolStripButton1.ImageTransparentColor" type="System.Drawing.Color, System.Drawing">
-    <value>Magenta</value>
-  </data>
-  <data name="ToolStripButton1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>120, 24</value>
-  </data>
-  <data name="ToolStripButton1.Text" xml:space="preserve">
-    <value>Top Most = False</value>
-  </data>
-  <data name="ToolStrip1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="ToolStrip1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>535, 27</value>
-  </data>
-  <data name="ToolStrip1.TabIndex" type="System.Int32, mscorlib">
-    <value>6</value>
-  </data>
-  <data name="ToolStrip1.Text" xml:space="preserve">
-    <value>ToolStrip1</value>
-  </data>
-  <data name="&gt;&gt;ToolStrip1.Name" xml:space="preserve">
-    <value>ToolStrip1</value>
-  </data>
-  <data name="&gt;&gt;ToolStrip1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;ToolStrip1.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;ToolStrip1.ZOrder" xml:space="preserve">
-    <value>2</value>
-  </data>
-  <data name="lblerror.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="lblerror.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Verdana, 9.75pt</value>
-  </data>
-  <data name="lblerror.Location" type="System.Drawing.Point, System.Drawing">
-    <value>4, 78</value>
-  </data>
-  <data name="lblerror.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>2, 0, 2, 0</value>
-  </data>
-  <data name="lblerror.Size" type="System.Drawing.Size, System.Drawing">
-    <value>39, 16</value>
-  </data>
-  <data name="lblerror.TabIndex" type="System.Int32, mscorlib">
-    <value>3</value>
-  </data>
-  <data name="lblerror.Text" xml:space="preserve">
-    <value>Error</value>
-  </data>
-  <data name="lblerror.Visible" type="System.Boolean, mscorlib">
-    <value>False</value>
-  </data>
-  <data name="&gt;&gt;lblerror.Name" xml:space="preserve">
-    <value>lblerror</value>
-  </data>
-  <data name="&gt;&gt;lblerror.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;lblerror.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;lblerror.ZOrder" xml:space="preserve">
-    <value>3</value>
-  </data>
   <data name="cmbDokumentart.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
     <value>Top, Left, Right</value>
   </data>
   <data name="cmbDokumentart.Location" type="System.Drawing.Point, System.Drawing">
-    <value>5, 44</value>
+    <value>3, 23</value>
   </data>
   <data name="cmbDokumentart.Size" type="System.Drawing.Size, System.Drawing">
-    <value>391, 25</value>
+    <value>630, 25</value>
   </data>
   <data name="cmbDokumentart.TabIndex" type="System.Int32, mscorlib">
     <value>2</value>
@@ -322,22 +178,22 @@
     <value>Panel1</value>
   </data>
   <data name="&gt;&gt;cmbDokumentart.ZOrder" xml:space="preserve">
-    <value>4</value>
+    <value>0</value>
   </data>
   <data name="Label1.AutoSize" type="System.Boolean, mscorlib">
     <value>True</value>
   </data>
   <data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>3, 25</value>
+    <value>3, 3</value>
   </data>
   <data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>208, 17</value>
+    <value>156, 17</value>
   </data>
   <data name="Label1.TabIndex" type="System.Int32, mscorlib">
     <value>1</value>
   </data>
   <data name="Label1.Text" xml:space="preserve">
-    <value>Bitte wählen Sie eine Dokumentart:</value>
+    <value>Bitte wählen Sie ein Profil:</value>
   </data>
   <data name="&gt;&gt;Label1.Name" xml:space="preserve">
     <value>Label1</value>
@@ -349,7 +205,7 @@
     <value>Panel1</value>
   </data>
   <data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
-    <value>5</value>
+    <value>1</value>
   </data>
   <data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Top</value>
@@ -361,7 +217,7 @@
     <value>2, 3, 2, 3</value>
   </data>
   <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>535, 104</value>
+    <value>636, 57</value>
   </data>
   <data name="Panel1.TabIndex" type="System.Int32, mscorlib">
     <value>4</value>
@@ -378,185 +234,364 @@
   <data name="&gt;&gt;Panel1.ZOrder" xml:space="preserve">
     <value>1</value>
   </data>
-  <data name="chkMultiIndexer.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="chkMultiIndexer.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Verdana, 9.75pt, style=Bold, Italic</value>
-  </data>
-  <data name="chkMultiIndexer.Location" type="System.Drawing.Point, System.Drawing">
-    <value>3, 39</value>
-  </data>
-  <data name="chkMultiIndexer.Size" type="System.Drawing.Size, System.Drawing">
-    <value>520, 20</value>
-  </data>
-  <data name="chkMultiIndexer.TabIndex" type="System.Int32, mscorlib">
-    <value>10</value>
-  </data>
-  <data name="chkMultiIndexer.Text" xml:space="preserve">
-    <value>Multi-Indexing - Alle nachfolgenden Dateien (0) identisch indexieren</value>
-  </data>
-  <data name="&gt;&gt;chkMultiIndexer.Name" xml:space="preserve">
-    <value>chkMultiIndexer</value>
-  </data>
-  <data name="&gt;&gt;chkMultiIndexer.Type" xml:space="preserve">
-    <value>System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;chkMultiIndexer.Parent" xml:space="preserve">
-    <value>Panel2</value>
-  </data>
-  <data name="&gt;&gt;chkMultiIndexer.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="chkdelete_origin.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="chkdelete_origin.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Verdana, 9.75pt</value>
-  </data>
-  <data name="chkdelete_origin.Location" type="System.Drawing.Point, System.Drawing">
-    <value>3, 13</value>
-  </data>
-  <data name="chkdelete_origin.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>2, 3, 2, 3</value>
-  </data>
-  <data name="chkdelete_origin.Size" type="System.Drawing.Size, System.Drawing">
-    <value>176, 20</value>
-  </data>
-  <data name="chkdelete_origin.TabIndex" type="System.Int32, mscorlib">
-    <value>3</value>
-  </data>
-  <data name="chkdelete_origin.Text" xml:space="preserve">
-    <value>Lösche Ursprungsdatei</value>
-  </data>
-  <data name="&gt;&gt;chkdelete_origin.Name" xml:space="preserve">
-    <value>chkdelete_origin</value>
-  </data>
-  <data name="&gt;&gt;chkdelete_origin.Type" xml:space="preserve">
-    <value>System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;chkdelete_origin.Parent" xml:space="preserve">
-    <value>Panel2</value>
-  </data>
-  <data name="&gt;&gt;chkdelete_origin.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <data name="Label2.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="Label2.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Verdana, 8.25pt</value>
-  </data>
-  <data name="Label2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 62</value>
-  </data>
-  <data name="Label2.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>2, 0, 2, 0</value>
-  </data>
-  <data name="Label2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>92, 13</value>
-  </data>
-  <data name="Label2.TabIndex" type="System.Int32, mscorlib">
-    <value>2</value>
-  </data>
-  <data name="Label2.Text" xml:space="preserve">
-    <value>Aktuelle Datei;</value>
-  </data>
-  <data name="&gt;&gt;Label2.Name" xml:space="preserve">
-    <value>Label2</value>
-  </data>
-  <data name="&gt;&gt;Label2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Label2.Parent" xml:space="preserve">
-    <value>Panel2</value>
-  </data>
-  <data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
-    <value>2</value>
-  </data>
-  <data name="txtIndexfilepath.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
+  <data name="checkMultiindex.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
     <value>Top, Left, Right</value>
   </data>
-  <data name="txtIndexfilepath.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Verdana, 6.75pt</value>
+  <data name="checkMultiindex.Location" type="System.Drawing.Point, System.Drawing">
+    <value>3, 20</value>
   </data>
-  <data name="txtIndexfilepath.Location" type="System.Drawing.Point, System.Drawing">
-    <value>3, 78</value>
+  <data name="BarToggleSwitchItem1.Caption" xml:space="preserve">
+    <value>Lösche Ursprungsdatei</value>
   </data>
-  <data name="txtIndexfilepath.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>2, 3, 2, 3</value>
+  <data name="BarToggleSwitchItem2.Caption" xml:space="preserve">
+    <value>Multi Indexing</value>
   </data>
-  <data name="txtIndexfilepath.Multiline" type="System.Boolean, mscorlib">
-    <value>True</value>
+  <data name="BarCheckItem1.Caption" xml:space="preserve">
+    <value>Andere Fenster überdecken</value>
   </data>
-  <data name="txtIndexfilepath.Size" type="System.Drawing.Size, System.Drawing">
-    <value>528, 34</value>
+  <assembly alias="DevExpress.Data.v19.2" name="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="BarCheckItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAEMEAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        WWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAz
+        OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl
+        Pg0KICA8ZyBpZD0iV2luZG93cyI+DQogICAgPHBhdGggZD0iTTE4LDE4LjFWMTZoMnYwLjlDMTkuMywx
+        Ny4yLDE4LjYsMTcuNiwxOCwxOC4xeiBNMTQuNywyNkgyVjE2SDB2MTFjMCwwLjUsMC41LDEsMSwxaDE1
+        LjEgICBDMTUuNSwyNy4zLDE1LjEsMjYuNiwxNC43LDI2eiBNMjQsMThjNS43LDAsOCw2LDgsNnMtMi4z
+        LDYtOCw2Yy01LjcsMC04LTYtOC02UzE4LjMsMTgsMjQsMTggTTI0LDIwYy0zLjMsMC01LjEsMi43LTUu
+        OCw0ICAgYzAuNywxLjMsMi41LDQsNS44LDRjMy4zLDAsNS4xLTIuNyw1LjgtNEMyOS4xLDIyLjcsMjcu
+        MywyMCwyNCwyMEwyNCwyMHogTTI0LDIyYy0xLjEsMC0yLDAuOS0yLDJzMC45LDIsMiwyYzEuMSwwLDIt
+        MC45LDItMiAgIFMyNS4xLDIyLDI0LDIyeiBNMjYsMTYuMlY4aDJ2OC45QzI3LjQsMTYuNiwyNi43LDE2
+        LjQsMjYsMTYuMnogTTEwLDhIOHYyaDJWOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICA8cGF0aCBkPSJN
+        MCwxNnYtNWMwLTAuNSwwLjUtMSwxLTFoMThjMC41LDAsMSwwLjUsMSwxdjVIMHogTTI4LDhWM2MwLTAu
+        NS0wLjUtMS0xLTFIOUM4LjUsMiw4LDIuNSw4LDN2NUgyOHoiIGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+
+        DQo8L3N2Zz4L
+</value>
   </data>
-  <data name="txtIndexfilepath.TabIndex" type="System.Int32, mscorlib">
+  <data name="checkItemDeleteSource.Caption" xml:space="preserve">
+    <value>Ursprungsdatei löschen</value>
+  </data>
+  <data name="checkItemDeleteSource.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPECAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
+        WWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAz
+        OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KCS5zdDF7b3BhY2l0eTowLjU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl
+        Pg0KICA8ZyBpZD0iRGVsZXRlTGlzdCI+DQogICAgPHBhdGggZD0iTTYsMjZWNGgxOHYxMy4ybDItMlYz
+        YzAtMC42LTAuNC0xLTEtMUg1QzQuNCwyLDQsMi40LDQsM3YyNGMwLDAuNiwwLjQsMSwxLDFoOC4ybDIt
+        Mkg2eiIgY2xhc3M9IkJsYWNrIiAvPg0KICAgIDxwb2x5Z29uIHBvaW50cz0iMjgsMjAgMjYsMTggMjIs
+        MjIgMTgsMTggMTYsMjAgMjAsMjQgMTYsMjggMTgsMzAgMjIsMjYgMjYsMzAgMjgsMjggMjQsMjQgICIg
+        Y2xhc3M9IlJlZCIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <data name="checkItemPreselection.Caption" xml:space="preserve">
+    <value>Profilauswahl merken</value>
+  </data>
+  <data name="checkItemPreselection.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPcFAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
+        QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
+        MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iSXRlbVR5cGVD
+        aGVja2VkIj4NCiAgICA8Zz4NCiAgICAgIDxnPg0KICAgICAgICA8cmVjdCB4PSIyMCIgeT0iOCIgd2lk
+        dGg9IjEwIiBoZWlnaHQ9IjQiIHJ4PSIwIiByeT0iMCIgY2xhc3M9IkJsYWNrIiAvPg0KICAgICAgICA8
+        cmVjdCB4PSIyMCIgeT0iMjIiIHdpZHRoPSIxMCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNz
+        PSJCbGFjayIgLz4NCiAgICAgICAgPHBhdGggZD0iTTE1LDE4SDNjLTAuNSwwLTEsMC41LTEsMXYxMmMw
+        LDAuNSwwLjUsMSwxLDFoMTJjMC41LDAsMS0wLjUsMS0xVjE5QzE2LDE4LjUsMTUuNSwxOCwxNSwxOHog
+        TTE0LDMwSDRWMjAgICAgIGgxMFYzMHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgICAgPHBhdGggZD0i
+        TTE0LDEwLjhWMTRINFY0aDguMmwyLTJIM0MyLjUsMiwyLDIuNSwyLDN2MTJjMCwwLjUsMC41LDEsMSwx
+        aDEyYzAuNSwwLDEtMC41LDEtMVY4LjhMMTQsMTAuOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgIDwv
+        Zz4NCiAgICAgIDxnPg0KICAgICAgICA8cmVjdCB4PSIyMCIgeT0iOCIgd2lkdGg9IjEwIiBoZWlnaHQ9
+        IjQiIHJ4PSIwIiByeT0iMCIgY2xhc3M9IkJsYWNrIiAvPg0KICAgICAgICA8cmVjdCB4PSIyMCIgeT0i
+        MjIiIHdpZHRoPSIxMCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNzPSJCbGFjayIgLz4NCiAg
+        ICAgICAgPHBhdGggZD0iTTE1LDE4SDNjLTAuNSwwLTEsMC41LTEsMXYxMmMwLDAuNSwwLjUsMSwxLDFo
+        MTJjMC41LDAsMS0wLjUsMS0xVjE5QzE2LDE4LjUsMTUuNSwxOCwxNSwxOHogTTE0LDMwSDRWMjAgICAg
+        IGgxMFYzMHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgICAgPHBhdGggZD0iTTE0LDEwLjhWMTRINFY0
+        aDguMmwyLTJIM0MyLjUsMiwyLDIuNSwyLDN2MTJjMCwwLjUsMC41LDEsMSwxaDEyYzAuNSwwLDEtMC41
+        LDEtMVY4LjhMMTQsMTAuOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgIDwvZz4NCiAgICA8L2c+DQog
+        ICAgPHBvbHlnb24gcG9pbnRzPSI2LDUgNiw4IDEwLDEyIDE4LDQgMTgsMSAxMCw5ICAiIGNsYXNzPSJH
+        cmVlbiIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <data name="labelError.Caption" xml:space="preserve">
+    <value>labelError</value>
+  </data>
+  <data name="labelError.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABIDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
+        MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
+        bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iSGlnaEltcG9ydGFuY2UiPg0KICAg
+        IDxwYXRoIGQ9Ik0xNiwyQzguMywyLDIsOC4zLDIsMTZzNi4zLDE0LDE0LDE0czE0LTYuMywxNC0xNFMy
+        My43LDIsMTYsMnogTTE2LDI0Yy0xLjEsMC0yLTAuOS0yLTJzMC45LTIsMi0yczIsMC45LDIsMiAgIFMx
+        Ny4xLDI0LDE2LDI0eiBNMTgsMThoLTRWOGg0VjE4eiIgY2xhc3M9IlJlZCIgLz4NCiAgPC9nPg0KPC9z
+        dmc+Cw==
+</value>
+  </data>
+  <data name="BarStaticItem1.Caption" xml:space="preserve">
+    <value>Aktuelle Datei:</value>
+  </data>
+  <data name="BarStaticItem2.Caption" xml:space="preserve">
+    <value>BarStaticItem2</value>
+  </data>
+  <data name="labelFilePath.Caption" xml:space="preserve">
+    <value>labelFilePath</value>
+  </data>
+  <data name="labelFilePath.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOMCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KPC9zdHlsZT4NCiAgPGcgaWQ9IlNpbmdsZVBhZ2VWaWV3Ij4NCiAgICA8cGF0aCBk
+        PSJNMjcsMEgzQzIuNCwwLDIsMC40LDIsMXYyOGMwLDAuNiwwLjQsMSwxLDFoMjRjMC42LDAsMS0wLjQs
+        MS0xVjFDMjgsMC40LDI3LjYsMCwyNywweiBNMjYsMjhINFYyaDIyVjI4eiIgY2xhc3M9IkJsYWNrIiAv
+        Pg0KICAgIDxwYXRoIGQ9Ik0yMiw4SDhWNmgxNFY4eiBNMjIsMTBIOHYyaDE0VjEweiBNMjIsMTRIOHYy
+        aDE0VjE0eiBNMjIsMThIOHYyaDE0VjE4eiBNMjIsMjJIOHYyaDE0VjIyeiIgY2xhc3M9IkJsdWUiIC8+
+        DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="checkItemPreview.Caption" xml:space="preserve">
+    <value>Dateivorschau aktiv</value>
+  </data>
+  <data name="checkItemPreview.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAHcDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjc1O30KPC9zdHlsZT4NCiAgPGcgaWQ9IlByZXZpZXciPg0KICAgIDxwYXRoIGQ9Ik0yMS40
+        LDI4SDE4bDAsMGwwLDBIOFY0aDEydjVjMCwwLjYsMC40LDEsMSwxaDV2MTMuNGwyLDJWOWwtNy03SDdD
+        Ni40LDIsNiwyLjQsNiwzdjI2YzAsMC42LDAuNCwxLDEsMWgxNi40ICAgTDIxLjQsMjh6IiBjbGFzcz0i
+        QmxhY2siIC8+DQogICAgPHBhdGggZD0iTTE4LDE0YzMuMywwLDYsMi43LDYsNmMwLDEuMi0wLjQsMi4z
+        LTEsMy4zbDQuNiw0LjZjMC41LDAuNSwwLjUsMS4zLDAsMS43Yy0wLjUsMC41LTEuMywwLjUtMS43LDBM
+        MjEuMywyNSAgIGMtMC45LDAuNi0yLjEsMS0zLjMsMWMtMy4zLDAtNi0yLjctNi02QzEyLDE2LjcsMTQu
+        NywxNCwxOCwxNHogTTE4LDI0YzIuMiwwLDQtMS44LDQtNHMtMS44LTQtNC00cy00LDEuOC00LDRTMTUu
+        OCwyNCwxOCwyNHoiIGNsYXNzPSJCbHVlIiAvPg0KICA8L2c+DQo8L3N2Zz4L
+</value>
+  </data>
+  <data name="labelNotice.Caption" xml:space="preserve">
+    <value>labelNotice</value>
+  </data>
+  <data name="labelNotice.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAABsDAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
+        MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
+        bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iQWJvdXQiPg0KICAgIDxwYXRoIGQ9
+        Ik0xNiwyQzguMywyLDIsOC4zLDIsMTZzNi4zLDE0LDE0LDE0czE0LTYuMywxNC0xNFMyMy43LDIsMTYs
+        MnogTTE2LDZjMS4xLDAsMiwwLjksMiwycy0wLjksMi0yLDJzLTItMC45LTItMiAgIFMxNC45LDYsMTYs
+        NnogTTIwLDI0aC04di0yaDJ2LThoLTJ2LTJoMmg0djEwaDJWMjR6IiBjbGFzcz0iQmx1ZSIgLz4NCiAg
+        PC9nPg0KPC9zdmc+Cw==
+</value>
+  </data>
+  <data name="BarListItem1.Caption" xml:space="preserve">
+    <value>BarListItem1</value>
+  </data>
+  <data name="BarStaticItem4.Caption" xml:space="preserve">
+    <value>Bitte wählen Sie ein Profil:</value>
+  </data>
+  <data name="BarButtonItem1.Caption" xml:space="preserve">
+    <value>Datei überspringen</value>
+  </data>
+  <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAJkCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMzU3NUJCO30KCS5C
+        bGFja3tmaWxsOiM3MzczNzQ7fQoJLldoaXRle2ZpbGw6I0ZGRkZGRjt9CgkuWWVsbG93e2ZpbGw6I0ZD
+        QjAxQjt9CgkuUmVke2ZpbGw6I0QwMjAyNzt9CgkuR3JlZW57ZmlsbDojMTI5QzQ5O30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQo8L3N0eWxlPg0KICA8cGF0aCBkPSJNMzEsMkgxMWMtMC41LDAtMSwwLjUtMSwxdjlo
+        MlY0aDE4djI0SDEydi04aC0ydjljMCwwLjUsMC41LDEsMSwxaDIwYzAuNSwwLDEtMC41LDEtMVYzQzMy
+        LDIuNSwzMS41LDIsMzEsMnogICIgY2xhc3M9IkJsYWNrIiAvPg0KICA8cG9seWdvbiBwb2ludHM9IjQs
+        MTQgMTQsMTQgMTQsOCAyMiwxNiAxNCwyNCAxNCwxOCA0LDE4ICIgY2xhc3M9IkJsdWUiIC8+DQo8L3N2
+        Zz4L
+</value>
+  </data>
+  <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>0, 0</value>
+  </data>
+  <data name="RibbonPageGroup3.Text" xml:space="preserve">
+    <value>Indexierung</value>
+  </data>
+  <data name="RibbonPageGroup2.Text" xml:space="preserve">
+    <value>Fenster</value>
+  </data>
+  <data name="RibbonPage1.Text" xml:space="preserve">
+    <value>Start</value>
+  </data>
+  <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1076, 158</value>
+  </data>
+  <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
+    <value>0, 675</value>
+  </data>
+  <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
+    <value>1076, 24</value>
+  </data>
+  <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
+    <value>RibbonStatusBar1</value>
+  </data>
+  <data name="&gt;&gt;RibbonStatusBar1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonStatusBar, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonStatusBar1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;RibbonStatusBar1.ZOrder" xml:space="preserve">
     <value>1</value>
   </data>
-  <data name="&gt;&gt;txtIndexfilepath.Name" xml:space="preserve">
-    <value>txtIndexfilepath</value>
+  <data name="&gt;&gt;RibbonControl1.Name" xml:space="preserve">
+    <value>RibbonControl1</value>
   </data>
-  <data name="&gt;&gt;txtIndexfilepath.Type" xml:space="preserve">
-    <value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  <data name="&gt;&gt;RibbonControl1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;txtIndexfilepath.Parent" xml:space="preserve">
+  <data name="&gt;&gt;RibbonControl1.Parent" xml:space="preserve">
+    <value>$this</value>
+  </data>
+  <data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve">
+    <value>2</value>
+  </data>
+  <data name="checkMultiindex.Properties.Appearance.Font" type="System.Drawing.Font, System.Drawing">
+    <value>Tahoma, 8.25pt, style=Bold</value>
+  </data>
+  <data name="checkMultiindex.Properties.Caption" xml:space="preserve">
+    <value>Multi-Indexing - Alle nachfolgenden Dateien (0) identisch indexieren</value>
+  </data>
+  <data name="checkMultiindex.Size" type="System.Drawing.Size, System.Drawing">
+    <value>441, 20</value>
+  </data>
+  <data name="checkMultiindex.TabIndex" type="System.Int32, mscorlib">
+    <value>12</value>
+  </data>
+  <data name="&gt;&gt;checkMultiindex.Name" xml:space="preserve">
+    <value>checkMultiindex</value>
+  </data>
+  <data name="&gt;&gt;checkMultiindex.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;checkMultiindex.Parent" xml:space="preserve">
     <value>Panel2</value>
   </data>
-  <data name="&gt;&gt;txtIndexfilepath.ZOrder" xml:space="preserve">
-    <value>3</value>
+  <data name="&gt;&gt;checkMultiindex.ZOrder" xml:space="preserve">
+    <value>0</value>
   </data>
   <data name="btnOK.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Top, Right</value>
+    <value>Top, Bottom, Right</value>
   </data>
-  <data name="btnOK.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt, style=Bold</value>
+  <data name="btnOK.Appearance.Font" type="System.Drawing.Font, System.Drawing">
+    <value>Tahoma, 11.25pt, style=Bold</value>
   </data>
-  <data name="btnOK.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleLeft</value>
+  <data name="btnOK.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAEQCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
+        ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
+        OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
+        dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFycm93NFJpZ2h0Ij4NCiAgICA8cG9seWdvbiBwb2lu
+        dHM9IjE4LDYgMTIuMyw2IDIwLjMsMTQgNCwxNCA0LDE4IDIwLjMsMTggMTIuMywyNiAxOCwyNiAyOCwx
+        NiAgIiBjbGFzcz0iR3JlZW4iIC8+DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
   </data>
   <data name="btnOK.Location" type="System.Drawing.Point, System.Drawing">
-    <value>378, 6</value>
-  </data>
-  <data name="btnOK.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>3, 4, 3, 4</value>
+    <value>450, 6</value>
   </data>
   <data name="btnOK.Size" type="System.Drawing.Size, System.Drawing">
-    <value>153, 30</value>
+    <value>183, 44</value>
   </data>
   <data name="btnOK.TabIndex" type="System.Int32, mscorlib">
-    <value>0</value>
+    <value>11</value>
   </data>
   <data name="btnOK.Text" xml:space="preserve">
     <value>Datei verarbeiten</value>
   </data>
-  <data name="btnOK.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleRight</value>
-  </data>
   <data name="&gt;&gt;btnOK.Name" xml:space="preserve">
     <value>btnOK</value>
   </data>
   <data name="&gt;&gt;btnOK.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+    <value>DevExpress.XtraEditors.SimpleButton, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;btnOK.Parent" xml:space="preserve">
     <value>Panel2</value>
   </data>
   <data name="&gt;&gt;btnOK.ZOrder" xml:space="preserve">
-    <value>4</value>
+    <value>1</value>
   </data>
   <data name="Panel2.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
     <value>Bottom</value>
   </data>
   <data name="Panel2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 373</value>
+    <value>0, 461</value>
   </data>
   <data name="Panel2.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
     <value>2, 3, 2, 3</value>
   </data>
   <data name="Panel2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>535, 120</value>
+    <value>636, 56</value>
   </data>
   <data name="Panel2.TabIndex" type="System.Int32, mscorlib">
     <value>7</value>
@@ -595,7 +630,7 @@
     <value>3, 4, 3, 4</value>
   </data>
   <data name="DocumentViewer1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>365, 493</value>
+    <value>436, 517</value>
   </data>
   <data name="DocumentViewer1.TabIndex" type="System.Int32, mscorlib">
     <value>0</value>
@@ -625,10 +660,10 @@
     <value>1</value>
   </data>
   <data name="SplitContainer1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>904, 493</value>
+    <value>1076, 517</value>
   </data>
   <data name="SplitContainer1.SplitterDistance" type="System.Int32, mscorlib">
-    <value>535</value>
+    <value>636</value>
   </data>
   <data name="SplitContainer1.TabIndex" type="System.Int32, mscorlib">
     <value>8</value>
@@ -645,54 +680,6 @@
   <data name="&gt;&gt;SplitContainer1.ZOrder" xml:space="preserve">
     <value>0</value>
   </data>
-  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 17</value>
-  </metadata>
-  <data name="lblhinweis.Size" type="System.Drawing.Size, System.Drawing">
-    <value>0, 17</value>
-  </data>
-  <data name="lblhinweis.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleLeft</value>
-  </data>
-  <data name="lblhinweis.Visible" type="System.Boolean, mscorlib">
-    <value>False</value>
-  </data>
-  <data name="tslblVorschau.Size" type="System.Drawing.Size, System.Drawing">
-    <value>98, 17</value>
-  </data>
-  <data name="tslblVorschau.Text" xml:space="preserve">
-    <value>Vorschau ist aktiv</value>
-  </data>
-  <data name="tslblVorschau.Visible" type="System.Boolean, mscorlib">
-    <value>False</value>
-  </data>
-  <data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 493</value>
-  </data>
-  <data name="StatusStrip1.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>1, 0, 10, 0</value>
-  </data>
-  <data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>904, 22</value>
-  </data>
-  <data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib">
-    <value>6</value>
-  </data>
-  <data name="StatusStrip1.Text" xml:space="preserve">
-    <value>StatusStrip1</value>
-  </data>
-  <data name="&gt;&gt;StatusStrip1.Name" xml:space="preserve">
-    <value>StatusStrip1</value>
-  </data>
-  <data name="&gt;&gt;StatusStrip1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;StatusStrip1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;StatusStrip1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
   <metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>134, 17</value>
   </metadata>
@@ -717,6 +704,9 @@
   <metadata name="PdfBarController2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>509, 56</value>
   </metadata>
+  <data name="RibbonPage2.Text" xml:space="preserve">
+    <value>RibbonPage2</value>
+  </data>
   <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
@@ -727,34 +717,144 @@
     <value>7, 17</value>
   </data>
   <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>904, 515</value>
+    <value>1076, 699</value>
   </data>
   <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
     <value>Segoe UI, 9.75pt</value>
   </data>
+  <data name="frmIndex.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGYEAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
+        ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5HcmVlbntmaWxsOiMwMzlD
+        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntkaXNwbGF5Om5vbmU7fQoJLnN0M3tk
+        aXNwbGF5OmlubGluZTtmaWxsOiNGRkIxMTU7fQoJLnN0NHtkaXNwbGF5OmlubGluZTt9Cgkuc3Q1e2Rp
+        c3BsYXk6aW5saW5lO29wYWNpdHk6MC43NTt9Cgkuc3Q2e2Rpc3BsYXk6aW5saW5lO29wYWNpdHk6MC41
+        O30KCS5zdDd7ZGlzcGxheTppbmxpbmU7ZmlsbDojMDM5QzIzO30KCS5zdDh7ZGlzcGxheTppbmxpbmU7
+        ZmlsbDojRDExQzFDO30KCS5zdDl7ZGlzcGxheTppbmxpbmU7ZmlsbDojMTE3N0Q3O30KCS5zdDEwe2Rp
+        c3BsYXk6aW5saW5lO2ZpbGw6I0ZGRkZGRjt9Cjwvc3R5bGU+DQogIDxnIGlkPSJEb2N1bWVudF8xXyI+
+        DQogICAgPHBhdGggZD0iTTE1LDIwbDktOWw1LDVsLTksOUwxNSwyMHogTTMxLjcsMTEuOWwtMy42LTMu
+        NmMtMC40LTAuNC0xLTAuNC0xLjQsMEwyNSwxMGw1LDVsMS43LTEuNyAgIEMzMi4xLDEyLjksMzIuMSwx
+        Mi4zLDMxLjcsMTEuOXogTTE0LDI2aDVsLTUtNVYyNnoiIGNsYXNzPSJCbHVlIiAvPg0KICAgIDxwYXRo
+        IGQ9Ik0yNCwyMy44VjI4aC00LjJIMTJINlY0aDE4djQuMmwyLTJWM2MwLTAuNS0wLjUtMS0xLTFINUM0
+        LjQsMiw0LDIuNSw0LDN2MjZjMCwwLjUsMC41LDEsMSwxaDIwICAgYzAuNSwwLDEtMC41LDEtMXYtNy4y
+        TDI0LDIzLjh6IiBjbGFzcz0iQmxhY2siIC8+DQogIDwvZz4NCjwvc3ZnPgs=
+</value>
+  </data>
   <data name="$this.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
     <value>3, 4, 3, 4</value>
   </data>
   <data name="$this.Text" xml:space="preserve">
-    <value>Indexierung Drag 'n Drop File:</value>
+    <value>Datei Indexierung</value>
   </data>
-  <data name="&gt;&gt;ToolStripButton1.Name" xml:space="preserve">
-    <value>ToolStripButton1</value>
+  <data name="&gt;&gt;BarToggleSwitchItem1.Name" xml:space="preserve">
+    <value>BarToggleSwitchItem1</value>
   </data>
-  <data name="&gt;&gt;ToolStripButton1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  <data name="&gt;&gt;BarToggleSwitchItem1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarToggleSwitchItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;lblhinweis.Name" xml:space="preserve">
-    <value>lblhinweis</value>
+  <data name="&gt;&gt;BarToggleSwitchItem2.Name" xml:space="preserve">
+    <value>BarToggleSwitchItem2</value>
   </data>
-  <data name="&gt;&gt;lblhinweis.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  <data name="&gt;&gt;BarToggleSwitchItem2.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarToggleSwitchItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;tslblVorschau.Name" xml:space="preserve">
-    <value>tslblVorschau</value>
+  <data name="&gt;&gt;BarCheckItem1.Name" xml:space="preserve">
+    <value>BarCheckItem1</value>
   </data>
-  <data name="&gt;&gt;tslblVorschau.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  <data name="&gt;&gt;BarCheckItem1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarCheckItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;checkItemDeleteSource.Name" xml:space="preserve">
+    <value>checkItemDeleteSource</value>
+  </data>
+  <data name="&gt;&gt;checkItemDeleteSource.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarCheckItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;checkItemPreselection.Name" xml:space="preserve">
+    <value>checkItemPreselection</value>
+  </data>
+  <data name="&gt;&gt;checkItemPreselection.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarCheckItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;labelError.Name" xml:space="preserve">
+    <value>labelError</value>
+  </data>
+  <data name="&gt;&gt;labelError.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;BarStaticItem1.Name" xml:space="preserve">
+    <value>BarStaticItem1</value>
+  </data>
+  <data name="&gt;&gt;BarStaticItem1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;BarStaticItem2.Name" xml:space="preserve">
+    <value>BarStaticItem2</value>
+  </data>
+  <data name="&gt;&gt;BarStaticItem2.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;labelFilePath.Name" xml:space="preserve">
+    <value>labelFilePath</value>
+  </data>
+  <data name="&gt;&gt;labelFilePath.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;checkItemPreview.Name" xml:space="preserve">
+    <value>checkItemPreview</value>
+  </data>
+  <data name="&gt;&gt;checkItemPreview.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarCheckItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;labelNotice.Name" xml:space="preserve">
+    <value>labelNotice</value>
+  </data>
+  <data name="&gt;&gt;labelNotice.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;BarListItem1.Name" xml:space="preserve">
+    <value>BarListItem1</value>
+  </data>
+  <data name="&gt;&gt;BarListItem1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarListItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;BarStaticItem4.Name" xml:space="preserve">
+    <value>BarStaticItem4</value>
+  </data>
+  <data name="&gt;&gt;BarStaticItem4.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;BarButtonItem1.Name" xml:space="preserve">
+    <value>BarButtonItem1</value>
+  </data>
+  <data name="&gt;&gt;BarButtonItem1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
+    <value>RibbonPage1</value>
+  </data>
+  <data name="&gt;&gt;RibbonPage1.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroup3.Name" xml:space="preserve">
+    <value>RibbonPageGroup3</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroup3.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroup2.Name" xml:space="preserve">
+    <value>RibbonPageGroup2</value>
+  </data>
+  <data name="&gt;&gt;RibbonPageGroup2.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="&gt;&gt;MyDataset.Name" xml:space="preserve">
     <value>MyDataset</value>
@@ -804,10 +904,16 @@
   <data name="&gt;&gt;PdfBarController2.Type" xml:space="preserve">
     <value>DevExpress.XtraPdfViewer.Bars.PdfBarController, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;RibbonPage2.Name" xml:space="preserve">
+    <value>RibbonPage2</value>
+  </data>
+  <data name="&gt;&gt;RibbonPage2.Type" xml:space="preserve">
+    <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmIndex</value>
   </data>
   <data name="&gt;&gt;$this.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+    <value>DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
 </root>

Global_Indexer/frmIndexFileList.Designer.vb

@@ -88,7 +88,6 @@ Partial Class frmIndexFileList
         Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing

Global_Indexer/frmIndexFileList.resx.bak

@@ -1,472 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<root>
-  <!-- 
-    Microsoft ResX Schema 
-    
-    Version 2.0
-    
-    The primary goals of this format is to allow a simple XML format 
-    that is mostly human readable. The generation and parsing of the 
-    various data types are done through the TypeConverter classes 
-    associated with the data types.
-    
-    Example:
-    
-    ... ado.net/XML headers & schema ...
-    <resheader name="resmimetype">text/microsoft-resx</resheader>
-    <resheader name="version">2.0</resheader>
-    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
-    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
-    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
-    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
-    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
-        <value>[base64 mime encoded serialized .NET Framework object]</value>
-    </data>
-    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
-        <comment>This is a comment</comment>
-    </data>
-                
-    There are any number of "resheader" rows that contain simple 
-    name/value pairs.
-    
-    Each data row contains a name, and value. The row also contains a 
-    type or mimetype. Type corresponds to a .NET class that support 
-    text/value conversion through the TypeConverter architecture. 
-    Classes that don't support this are serialized and stored with the 
-    mimetype set.
-    
-    The mimetype is used for serialized objects, and tells the 
-    ResXResourceReader how to depersist the object. This is currently not 
-    extensible. For a given mimetype the value must be set accordingly:
-    
-    Note - application/x-microsoft.net.object.binary.base64 is the format 
-    that the ResXResourceWriter will generate, however the reader can 
-    read any of the formats listed below.
-    
-    mimetype: application/x-microsoft.net.object.binary.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
-            : and then encoded with base64 encoding.
-    
-    mimetype: application/x-microsoft.net.object.soap.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
-            : and then encoded with base64 encoding.
-
-    mimetype: application/x-microsoft.net.object.bytearray.base64
-    value   : The object must be serialized into a byte array 
-            : using a System.ComponentModel.TypeConverter
-            : and then encoded with base64 encoding.
-    -->
-  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
-    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
-    <xsd:element name="root" msdata:IsDataSet="true">
-      <xsd:complexType>
-        <xsd:choice maxOccurs="unbounded">
-          <xsd:element name="metadata">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" />
-              </xsd:sequence>
-              <xsd:attribute name="name" use="required" type="xsd:string" />
-              <xsd:attribute name="type" type="xsd:string" />
-              <xsd:attribute name="mimetype" type="xsd:string" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="assembly">
-            <xsd:complexType>
-              <xsd:attribute name="alias" type="xsd:string" />
-              <xsd:attribute name="name" type="xsd:string" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="data">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
-              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
-              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="resheader">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" />
-            </xsd:complexType>
-          </xsd:element>
-        </xsd:choice>
-      </xsd:complexType>
-    </xsd:element>
-  </xsd:schema>
-  <resheader name="resmimetype">
-    <value>text/microsoft-resx</value>
-  </resheader>
-  <resheader name="version">
-    <value>2.0</value>
-  </resheader>
-  <resheader name="reader">
-    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <resheader name="writer">
-    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <data name="&gt;&gt;Label2.Name" xml:space="preserve">
-    <value>Label2</value>
-  </data>
-  <data name="&gt;&gt;Label2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Label2.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;Label1.Name" xml:space="preserve">
-    <value>Label1</value>
-  </data>
-  <data name="&gt;&gt;Label1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Label1.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
-    <value>Top</value>
-  </data>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>655, 57</value>
-  </data>
-  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="Panel1.TabIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;Panel1.Name" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;Panel1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Panel1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;Panel1.ZOrder" xml:space="preserve">
-    <value>5</value>
-  </data>
-  <data name="Label2.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="Label2.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt, style=Bold</value>
-  </data>
-  <data name="Label2.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
-    <value>NoControl</value>
-  </data>
-  <data name="Label2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>3, 31</value>
-  </data>
-  <data name="Label2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>522, 17</value>
-  </data>
-  <data name="Label2.TabIndex" type="System.Int32, mscorlib">
-    <value>1</value>
-  </data>
-  <data name="Label2.Text" xml:space="preserve">
-    <value>Sie haben nun Möglichkeit die Indexierung für ausgewählte Dateien zu verhindern.</value>
-  </data>
-  <data name="&gt;&gt;Label2.Name" xml:space="preserve">
-    <value>Label2</value>
-  </data>
-  <data name="&gt;&gt;Label2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Label2.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="Label1.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="Label1.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt</value>
-  </data>
-  <data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>3, 9</value>
-  </data>
-  <data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>326, 17</value>
-  </data>
-  <data name="Label1.TabIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="Label1.Text" xml:space="preserve">
-    <value>Folgende Dateien werden zur Indexierung angeboten! </value>
-  </data>
-  <data name="&gt;&gt;Label1.Name" xml:space="preserve">
-    <value>Label1</value>
-  </data>
-  <data name="&gt;&gt;Label1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Label1.Parent" xml:space="preserve">
-    <value>Panel1</value>
-  </data>
-  <data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <data name="&gt;&gt;CheckedListBoxControl1.Name" xml:space="preserve">
-    <value>CheckedListBoxControl1</value>
-  </data>
-  <data name="&gt;&gt;CheckedListBoxControl1.Type" xml:space="preserve">
-    <value>DevExpress.XtraEditors.CheckedListBoxControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;CheckedListBoxControl1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;CheckedListBoxControl1.ZOrder" xml:space="preserve">
-    <value>3</value>
-  </data>
-  <data name="Button1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Left</value>
-  </data>
-  <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>6, 292</value>
-  </data>
-  <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>115, 23</value>
-  </data>
-  <data name="Button1.TabIndex" type="System.Int32, mscorlib">
-    <value>1</value>
-  </data>
-  <data name="Button1.Text" xml:space="preserve">
-    <value>Alle auswählen</value>
-  </data>
-  <data name="&gt;&gt;Button1.Name" xml:space="preserve">
-    <value>Button1</value>
-  </data>
-  <data name="&gt;&gt;Button1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Button1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;Button1.ZOrder" xml:space="preserve">
-    <value>2</value>
-  </data>
-  <metadata name="TBGI_FILES_USERTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>357, 17</value>
-  </metadata>
-  <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>574, 17</value>
-  </metadata>
-  <data name="Button2.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Left</value>
-  </data>
-  <data name="Button2.Location" type="System.Drawing.Point, System.Drawing">
-    <value>6, 319</value>
-  </data>
-  <data name="Button2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>115, 23</value>
-  </data>
-  <data name="Button2.TabIndex" type="System.Int32, mscorlib">
-    <value>6</value>
-  </data>
-  <data name="Button2.Text" xml:space="preserve">
-    <value>Alle unselektieren</value>
-  </data>
-  <data name="&gt;&gt;Button2.Name" xml:space="preserve">
-    <value>Button2</value>
-  </data>
-  <data name="&gt;&gt;Button2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Button2.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;Button2.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <data name="btnCancel.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Right</value>
-  </data>
-  <data name="btnCancel.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleLeft</value>
-  </data>
-  <data name="btnCancel.Location" type="System.Drawing.Point, System.Drawing">
-    <value>406, 292</value>
-  </data>
-  <data name="btnCancel.Size" type="System.Drawing.Size, System.Drawing">
-    <value>86, 36</value>
-  </data>
-  <data name="btnCancel.TabIndex" type="System.Int32, mscorlib">
-    <value>7</value>
-  </data>
-  <data name="btnCancel.Text" xml:space="preserve">
-    <value>Abbruch</value>
-  </data>
-  <data name="btnCancel.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleRight</value>
-  </data>
-  <data name="&gt;&gt;btnCancel.Name" xml:space="preserve">
-    <value>btnCancel</value>
-  </data>
-  <data name="&gt;&gt;btnCancel.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;btnCancel.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;btnCancel.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="btnstartIndex.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Right</value>
-  </data>
-  <data name="btnstartIndex.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9pt, style=Bold</value>
-  </data>
-  <data name="btnstartIndex.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleLeft</value>
-  </data>
-  <data name="btnstartIndex.Location" type="System.Drawing.Point, System.Drawing">
-    <value>498, 292</value>
-  </data>
-  <data name="btnstartIndex.Size" type="System.Drawing.Size, System.Drawing">
-    <value>145, 36</value>
-  </data>
-  <data name="btnstartIndex.TabIndex" type="System.Int32, mscorlib">
-    <value>3</value>
-  </data>
-  <data name="btnstartIndex.Text" xml:space="preserve">
-    <value>Starte Indexierung</value>
-  </data>
-  <data name="btnstartIndex.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleRight</value>
-  </data>
-  <data name="&gt;&gt;btnstartIndex.Name" xml:space="preserve">
-    <value>btnstartIndex</value>
-  </data>
-  <data name="&gt;&gt;btnstartIndex.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;btnstartIndex.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;btnstartIndex.ZOrder" xml:space="preserve">
-    <value>4</value>
-  </data>
-  <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
-    <value>7, 15</value>
-  </data>
-  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>655, 354</value>
-  </data>
-  <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9pt</value>
-  </data>
-  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        AAABAAMAEBAQAAEABAAoAQAANgAAABAQAAABAAgAaAUAAF4BAAAQEAAAAQAgAGgEAADGBgAAKAAAABAA
-        AAAgAAAAAQAEAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAIAAAACAgACAAAAAgACAAICA
-        AACAgIAAwMDAAAAA/wAA/wAAAP//AP8AAAD/AP8A//8AAP///wAAAP///////wAA93d3d3d/AAD3d3d3
-        d38AAPd////3fwAA93////d/AAD3f///938AD/d////3fwD3eH////d/D3Zn////93/3ZmZ///d3f/Z2
-        Z2//93fw9/Zvf3d3fwD/9m//d3fwAPD2bw///wAAAP//AAAAAAAAAAAAAAAAAPAAAADwAAAA8AAAAPAA
-        AADwAAAA8AAAAOAAAADAAAAAgAAAAAAAAAAAAQAAAAMAAAAHAABCDwAAw/8AAP//AAAoAAAAEAAAACAA
-        AAABAAgAAAAAAAABAAAAAAAAAAAAAAABAAAAAQAAAAAAAEJCQgCcUwAAvpBcAIaGhgCzs7MA8e/wAPTz
-        9AD29vYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////AAAAAAAICAgICAgICAgICAgAAAAACAEBAQEB
-        AQEBAQEIAAAAAAgBAQEBAQEBAQEBCAAAAAAIAQEGBgYGBgYBAQgAAAAACAEBBgYGBgYGAQEIAAAAAAgB
-        AQYGBgYGBgEBCAAAAAgIAQEGBgYGBgYBAQgAAAgDAwUBBgYGBgYGAQEIAAgDAgIDCAYGBgYGBgEBCAgD
-        AgICAgMIBgYGAQEBBAgIAgMCAgMCCAYGBgEBBAgACAMIAgIIAwgBAQEBBAgAAAgICAICCAgIAQEBBAgA
-        AAAIAAgCAggACAgICAgAAAAAAAAICAgIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADwAAAA8AAAAPAA
-        AADwAAAA8AAAAPAAAADgAAAAwAAAAIAAAAAAAAAAAAEAAAADAAAABwAAQg8AAMP/AAD//wAAKAAAABAA
-        AAAgAAAAAQAgAAAAAABABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD29vb/9vb2//b2
-        9v/29vb/9vb2//b29v/29vb/9vb2//b29v/29vb/9vb2//b29v8AAAAAAAAAAAAAAAAAAAAA9vb2/0JC
-        Qv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv/29vb/AAAAAAAAAAAAAAAAAAAAAPb2
-        9v9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/QkJC/0JCQv9CQkL/9vb2/wAAAAAAAAAAAAAAAAAA
-        AAD29vb/QkJC/0JCQv/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P9CQkL/QkJC//b29v8AAAAAAAAAAAAA
-        AAAAAAAA9vb2/0JCQv9CQkL/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/QkJC/0JCQv/29vb/AAAAAAAA
-        AAAAAAAA9vb2MPb29v9CQkL/QkJC//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w/0JCQv9CQkL/9vb2/wAA
-        AAAAAAAA9vb2MPb29u/29vb/QkJC/0JCQv/x7/D/8e/w//Hv8P/x7/D/8e/w//Hv8P9CQkL/QkJC//b2
-        9v8AAAAA9vb2MPb29u++kFz/vpBc/7Ozs/9CQkL/8e/w//Hv8P/x7/D/8e/w//Hv8P/x7/D/QkJC/0JC
-        Qv/29vb/9vb2MPb29u++kFz/nFMA/5xTAP++kFz/9vb2//Hv8P/x7/D/8e/w//Hv8P/x7/D/8e/w/0JC
-        Qv9CQkL/9vb2//b29u++kFz/nFMA/5xTAP+cUwD/nFMA/76QXP/08/T/8e/w//Hv8P/x7/D/QkJC/0JC
-        Qv9CQkL/hoaG//b29u/29vb/nFMA/76QXP+cUwD/nFMA/76QXP+cUwD/9vb2//Hv8P/x7/D/8e/w/0JC
-        Qv9CQkL/hoaG//b29u/29vYw9vb2/76QXP/29vb/nFMA/5xTAP/29vb/vpBc//b29v9CQkL/QkJC/0JC
-        Qv9CQkL/hoaG//b29u/29vYwAAAAAPb29v/29vbv9vb2/5xTAP+cUwD/9vb2//b29u/29vb/QkJC/0JC
-        Qv9CQkL/hoaG//b29u/29vYwAAAAAAAAAAD29vbv9vb2MPb29v+cUwD/nFMA//b29v/29vYw9vb2//b2
-        9v/29vb/9vb2//b29u/29vYwAAAAAAAAAAAAAAAA9vb2MAAAAAD29vb/9vb2//b29v/29vb/AAAAAPb2
-        9jAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADwAAAA8AAAAPAAAADwAAAA8AAAAOAA
-        AADAAAAAgAAAAAAAAAAAAAAAAAAAAAABAAAAAwAAAAcAAEL/AAD//wAA
-</value>
-  </data>
-  <data name="$this.Text" xml:space="preserve">
-    <value>Zu indexierende Dateien:</value>
-  </data>
-  <data name="&gt;&gt;TBGI_FILES_USERBindingSource.Name" xml:space="preserve">
-    <value>TBGI_FILES_USERBindingSource</value>
-  </data>
-  <data name="&gt;&gt;TBGI_FILES_USERBindingSource.Type" xml:space="preserve">
-    <value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;MyDataset1.Name" xml:space="preserve">
-    <value>MyDataset1</value>
-  </data>
-  <data name="&gt;&gt;MyDataset1.Type" xml:space="preserve">
-    <value>Global_Indexer.MyDataset, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
-  </data>
-  <data name="&gt;&gt;TBGI_FILES_USERTableAdapter.Name" xml:space="preserve">
-    <value>TBGI_FILES_USERTableAdapter</value>
-  </data>
-  <data name="&gt;&gt;TBGI_FILES_USERTableAdapter.Type" xml:space="preserve">
-    <value>Global_Indexer.MyDatasetTableAdapters.TBGI_FILES_USERTableAdapter, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
-  </data>
-  <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
-    <value>TableAdapterManager</value>
-  </data>
-  <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
-    <value>Global_Indexer.MyDatasetTableAdapters.TableAdapterManager, MyDataset.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
-  </data>
-  <data name="&gt;&gt;$this.Name" xml:space="preserve">
-    <value>frmIndexFileList</value>
-  </data>
-  <data name="&gt;&gt;$this.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-</root>

Global_Indexer/frmNamenkonvention.designer.vb

@@ -212,7 +212,6 @@ Partial Class frmNamenkonvention
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Me.TBDD_INDEX_MANTableAdapter
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

Global_Indexer/frmSQLConfigAutoIndex.Designer.vb

@@ -124,7 +124,6 @@ Partial Class SQLConfigAutoIndex
         Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing

Global_Indexer/frmSQLConfigAutoIndex.vb

@@ -46,7 +46,7 @@ Public Class SQLConfigAutoIndex
                         MsgBox("Excactly 1 record was returned!", MsgBoxStyle.Information)
                     End If
                 End If
-                    CURRENT_SQLRESULT = sql_command
+                CURRENT_SQLRESULT = sql_command
                 DTSQL_RESULT = dt
                 frmSQL_Result.ShowDialog()
             End If
@@ -115,7 +115,8 @@ Public Class SQLConfigAutoIndex
             '    End If
 
         Catch ex As Exception
-            ClassLogger.Add(" - Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Info(" - Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in TestSQL:")
         End Try
     End Sub

Global_Indexer/frmSQLSuggestion.Designer.vb

@@ -134,7 +134,6 @@ Partial Class frmSQLSuggestion
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing

Global_Indexer/frmSQLSuggestion.vb

@@ -89,7 +89,8 @@ Public Class frmSQLSuggestion
             End If
 
         Catch ex As Exception
-            ClassLogger.Add(" - Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Info(" - Unexpected error in TestSQL - Fehler: " & vbNewLine & ex.Message)
+            LOGGER.Error(ex.message)
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in TestSQL:")
         End Try
     End Sub
@@ -111,7 +112,6 @@ Public Class frmSQLSuggestion
         Catch ex As Exception
             MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Open Form:")
         End Try
-       
     End Sub
 
     Private Sub TBDD_CONNECTIONBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)

Global_Indexer/frmSQL_Admin.resx.bak

@@ -1,795 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<root>
-  <!-- 
-    Microsoft ResX Schema 
-    
-    Version 2.0
-    
-    The primary goals of this format is to allow a simple XML format 
-    that is mostly human readable. The generation and parsing of the 
-    various data types are done through the TypeConverter classes 
-    associated with the data types.
-    
-    Example:
-    
-    ... ado.net/XML headers & schema ...
-    <resheader name="resmimetype">text/microsoft-resx</resheader>
-    <resheader name="version">2.0</resheader>
-    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
-    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
-    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
-    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
-    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
-        <value>[base64 mime encoded serialized .NET Framework object]</value>
-    </data>
-    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
-        <comment>This is a comment</comment>
-    </data>
-                
-    There are any number of "resheader" rows that contain simple 
-    name/value pairs.
-    
-    Each data row contains a name, and value. The row also contains a 
-    type or mimetype. Type corresponds to a .NET class that support 
-    text/value conversion through the TypeConverter architecture. 
-    Classes that don't support this are serialized and stored with the 
-    mimetype set.
-    
-    The mimetype is used for serialized objects, and tells the 
-    ResXResourceReader how to depersist the object. This is currently not 
-    extensible. For a given mimetype the value must be set accordingly:
-    
-    Note - application/x-microsoft.net.object.binary.base64 is the format 
-    that the ResXResourceWriter will generate, however the reader can 
-    read any of the formats listed below.
-    
-    mimetype: application/x-microsoft.net.object.binary.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
-            : and then encoded with base64 encoding.
-    
-    mimetype: application/x-microsoft.net.object.soap.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
-            : and then encoded with base64 encoding.
-
-    mimetype: application/x-microsoft.net.object.bytearray.base64
-    value   : The object must be serialized into a byte array 
-            : using a System.ComponentModel.TypeConverter
-            : and then encoded with base64 encoding.
-    -->
-  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
-    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
-    <xsd:element name="root" msdata:IsDataSet="true">
-      <xsd:complexType>
-        <xsd:choice maxOccurs="unbounded">
-          <xsd:element name="metadata">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" />
-              </xsd:sequence>
-              <xsd:attribute name="name" use="required" type="xsd:string" />
-              <xsd:attribute name="type" type="xsd:string" />
-              <xsd:attribute name="mimetype" type="xsd:string" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="assembly">
-            <xsd:complexType>
-              <xsd:attribute name="alias" type="xsd:string" />
-              <xsd:attribute name="name" type="xsd:string" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="data">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
-              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
-              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="resheader">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" />
-            </xsd:complexType>
-          </xsd:element>
-        </xsd:choice>
-      </xsd:complexType>
-    </xsd:element>
-  </xsd:schema>
-  <resheader name="resmimetype">
-    <value>text/microsoft-resx</value>
-  </resheader>
-  <resheader name="version">
-    <value>2.0</value>
-  </resheader>
-  <resheader name="reader">
-    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <resheader name="writer">
-    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <data name="&gt;&gt;BindingNavigatorSeparator2.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigator1.Text" xml:space="preserve">
-    <value>BindingNavigator1</value>
-  </data>
-  <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="GridView1.Appearance.OddRow.FontSizeDelta" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
-  <data name="GridControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
-    <value>Fill</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveNextItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMoveNextItem</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage1.Parent" xml:space="preserve">
-    <value>XtraTabControl1</value>
-  </data>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="Button1.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>BottomCenter</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorPositionItem.Name" xml:space="preserve">
-    <value>BindingNavigatorPositionItem</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveNextItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTipTitle" xml:space="preserve">
-    <value />
-  </data>
-  <data name="txtSQL.TabIndex" type="System.Int32, mscorlib">
-    <value>3</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.AutoSize" type="System.Boolean, mscorlib">
-    <value>False</value>
-  </data>
-  <data name="&gt;&gt;OpenFileDialog1.Name" xml:space="preserve">
-    <value>OpenFileDialog1</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.MaximumSize" type="System.Drawing.Size, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
-        h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
-        twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
-        kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
-        WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
-        8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
-</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage2.Name" xml:space="preserve">
-    <value>XtraTabPage2</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
-    <value>Horizontal</value>
-  </data>
-  <data name="BindingNavigatorMoveNextItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="txtSQL.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Top, Bottom, Left, Right</value>
-  </data>
-  <data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>721, 377</value>
-  </data>
-  <data name="&gt;&gt;txtSQL.Type" xml:space="preserve">
-    <value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;TextBox1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="TextBox1.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt, style=Italic</value>
-  </data>
-  <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Name" xml:space="preserve">
-    <value>GridControl1</value>
-  </data>
-  <data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>14, 12</value>
-  </data>
-  <data name="$this.Text" xml:space="preserve">
-    <value>SQL-Admin</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.AccessibleDescription" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="&gt;&gt;XtraTabPage2.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <assembly alias="DevExpress.Data.v15.2" name="DevExpress.Data.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.AllowHtmlTextInToolTip" type="DevExpress.Utils.DefaultBoolean, DevExpress.Data.v15.2">
-    <value>Default</value>
-  </data>
-  <data name="&gt;&gt;Label1.Name" xml:space="preserve">
-    <value>Label1</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveLastItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="GridView1.Appearance.OddRow.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveFirstItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="TextBox1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>727, 25</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator1.Name" xml:space="preserve">
-    <value>BindingNavigatorSeparator1</value>
-  </data>
-  <data name="BindingNavigatorMoveNextItem.Text" xml:space="preserve">
-    <value>Nächste verschieben</value>
-  </data>
-  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        AAABAAMAEBAAAAEACABoBQAANgAAACAgAAABAAgAqAgAAJ4FAAAwMAAAAQAIAKgOAABGDgAAKAAAABAA
-        AAAgAAAAAQAIAAAAAABAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAADO3NEAvP+7AK/9rwCj+aMApvumAKT5
-        pQCn+qcAmfqbAJ35ngCX8ZgAkfSTAJHzkwC1/7cAOCw4AK3/sACs4asApd6nAI/WjwCH1YcAd9J3AGfN
-        ZwBpzGkAac5oAGPLYwBYyVgAQsVCAAChAAC4/7gAsfuyAKffpwCg3KAAgNSBAIHVgQBqzmoA2/HbAJ/j
-        oQBQx1AAQ8VDAErFSgAdtRwAm9ieAKH5pACO148Af9OAANTv0wBw03EATsdPAM7uzQCP35AAG7cbAH/U
-        fwCJ2okAOL84ADG9MQCb2Z4AnvmgAIbVhQCA1YEAhteHAP///wBXylcAteW1AG3PbgBz1XIAILwgADq+
-        OgAruywAnNudAJr2nQB00XMAas9qAFbIVwB303gAteS1ACy/LAAVuBUAze3OABK1EgAduR0AKMMoACW3
-        JACc2p4AlPeXAF3KXQDI7sgAxO3EAJ/fngBJxUgAVctWAE/HUAALvQsAp+CoAKPtowCj4aMABK8EAJ/Z
-        oQCI8owAVcdVAKbhqACl4acAiNmKADrEOwBWylYAVsZVAADJAACE34UAheiHAILfgwAIuAcAn9ihAIj1
-        jABMyEwAW8hbAELCQACO3I4A0O7QACi/KAAlyyUA7vHuACrNKgAN3g0AHeIdAAjACACg16IAgu+EAEPD
-        QgBJyEkAnN6dADPAMwDH6scAiNeIAD7PQAA12jYAJeIlAAy/CwCg16EAhO+HADXANQA6xDoAteS0AE3H
-        TAA8xT0AzO3LAIPhhgAqzCoASthMAG3abQAe4x4ADcAMAIXwhwAluSQARcVFADLAMgAswCwAxezFAIPg
-        hQAY3xgAIOIgAB/iHwAn5ScADLkMAJzWngCJ540AAJ4AABqwGAAftB4AIrUiACq7KQACrQAAALMAAB3C
-        HQAAvQAABMEDAAO+AwAAmAAAxf/GANfi2QCf76IAk9ibAJTYmwCS25kAkdyYAJPfmQCU3ZoAk9yZAJXc
-        mwCS2pkAvP++ADwyPAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADw8PDw8PDw8PDw8PAAAALGys7S1
-        tre4ubq6u7w8ADyjpKWmp6ipqqusra6vsDw8lpeYmRqaPJydnp+goaI8PImKizyNjjyQkZI8lJV8PDx9
-        fn+APIE8g4Q8hYaHiDw8b3BxcnM8dXY8eHl6e3w8PGFiY2RlZmdoaWprbG1uPDxTVDw8PFhZWls8PDxf
-        YDw8RUZHSEk8S0w8Tk9QUVI8PDg5Ojs8PTw/QDxBQkNEPDwqKyw8Li88MTIzPDU2Nzw8HR4fICEiPCQV
-        JSYnKCk8PA8QERITFBUWFxgZGhscPAA8AgMEBQYHCAkKCwwNPAAAADw8PDw8PDw8PDw8PAAAwAMAAIAB
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAQAAwAMAACgA
-        AAAgAAAAQAAAAAEACAAAAAAAgAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAABAgEABQkFAAsZDAAOOxAADlYQAAxnDwAKcg4ACXkMAAh7DAAIfAwAB34LAAd/
-        CgAHgQoABoIJAAaECAAFhQcABYgHAAaLBwAGkQcACJcIAAibCQAJogkACaUJAAinCAAIqQcACKwIAAiu
-        CAAIrwgACq8KAAyvDAAQrg8AEq0SABSrFAAWqBYAGKcXABioGAAarBkAG7AbABy1HAAbuBsAG7wbABq/
-        GgAawhoAGcYZABjKGAAYzhgAGNEYABjTGAAZ1RkAGNgZABvZGwAd2h0AHtweAB/dHwAg3iAAId4hACHd
-        IQAj2yMAJNYlACfRJwAozSgAKcgpACrCKgAqwCoAKr4qACq8KgApuykAKbopACm3KQAqtCoAKrMqACu0
-        KwAtti0AL7gvADG5MQAxuTIAMrkzADO6MwAzvDMAM780ADPBNAA0wTQANME0ADa/NgA3vjcAOL84ADnC
-        OQA6wzoAO8M7ADzBPAA8wDwAPL48ADy+PAA8vzwAPcA9AD7BPgA/wj8AP8M/AEDDQABBw0EAQsNCAEPE
-        RABFxEUARsRGAEfESABIxkgAScZJAErGSgBLxksAS8ZMAEzGTQBNxk0ATcZOAE7GTgBPxk8AUMVQAFHG
-        UQBSxlIAU8dTAFTHVQBVx1UAVsdWAFfHVwBYx1gAWcdZAFrIWgBbyFwAXMlcAF3JXQBfyl8AYMpgAGHL
-        YQBiy2EAY8tjAGTMZABkzGQAZs1lAGfNZwBozWgAaM1oAGnNaQBpzWkAas1qAGzObABtzm0Abs5uAG/O
-        bwBwz3EActByAHTQdAB20XYAeNJ5AHrSegB703sAfdN9AH/TfwCB1IEAg9SDAIXUhQCH1YcAidWKAIrV
-        igCL1YsAjNaNAI7WjgCO1o8Aj9aQAJDWkACR15IAk9eTAJTYlQCW2ZYAmNqYAJvbmwCe3Z4AoN6gAKPf
-        owCn4KgAq+GrAK7jrwCy5LIAs+S0ALXltgC25rcAuOe5ALzovQC/6b8AwevCAMPsxADE7cYAxe7HAMbw
-        yADH8soAyPXLAMj3zQDJ+c4AyfrOAMn6zwDK+c8Ay/fQAM330QDO99IAz/fTAND21ADR9tUA0/XWANT0
-        1gDU9NcA1vLYANjw2gDa8NsA2/DdANzw3gDd8uAA3/TiAOD35ADg+uYA4PznAOH96ADh/ukA4f7pAOL+
-        6ADi/ugA4/7oAOT+6ADl/ukA5v7pAOf+6QDo/uoA6v7rAOv+6wDs/u0A////AO/+7gDw/u8A8P7wAPH9
-        8QDy/fIA8/zzAPX89QD3/PcA+fz4APr9+gD8/fwA/f79AP7+/gD+/v4ACAgICAgICAgICAgICAgICAgI
-        CAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICN7s5eXl5uXl5eXl
-        5eXk5eXl5eXl5eTl6P8ICAgICAjfyk8UExERERMWFBgYFxcXFxcXFxcXFxcXafAICAgICNgqGSgrKysr
-        K09PT08sJiQtJiEhISEjJB8QfP8ICAgI0BknLU9NXVRSU1NKTSUxUmA+Nzc3PDQ1NR4X9ggICAjOHi9M
-        VF1kZGRhZkl717U4Oz9AQkJAPjgyKBPzCAgICM0jT1JnZ1xMXGNkWIn802FEO0A6Oj4/QDUqEvQICAgI
-        zSFTXmRqf5F0bnlhlPrDWWE+OltgOz0/OSoS9QgICAjNIVlebWCv/rdce2KU+tBEdUQ519dEPUA4KhL1
-        CAgICM0hZG14YaX4/8FpXJf9yXo5Wf7/vD49QjgqEvUICAgIzSJkdHV/eaT+/7Voh9q3W3PH/8k4Oj9C
-        OCoS9QgICAjNJm9zgIWFaKH1/6JbYW8+vP++Rjo/PkI4KhL1CAgICM4vdX+Eg4OGbqi/l2tydluOwUU4
-        Qj49QDcoEvUICAgIzimCiHZ7gnV7cVp9enV7azY6NDY3NzU2QysS9QgICAjOL4CG29/e3uCsdnt0dX1n
-        ZjK/3NXV3rgxKxT1CAgICM5NgJLy+PX4+rF4gHZ1dnFcNcX57/D6vDAsEvUICAgI0kyRlJmXl5iRfXx4
-        d3RjZ1MyVlxEWVtbSSsU9QgICAjSV5WVkp2Nl3yTp4d0enFYe5dLS0xJSUlZTxL0CAgICNRVmKKZlZSA
-        kd7/nldLSybB/6kkL1hIXFIrFfQICAgI1F2joqOjiZnv/8WGe7unTJju/7slSlxTXVAU8wgICAjTaaOm
-        oJ+o2f/femOd/sdTMI3//6oxVVNVTxTzCAgICNNnorCplb//yYKJd537x2htKIn38FZSZF1PFPUICAgI
-        1nmqrK6mpbmciJiAnfrJbWdvUoqSXWReZFAU9QgICAjYgLG5sbCml5+jmIWj+9N8hId8Y1xmZGRdLRT1
-        CAgICNiNtLu6rbGooKKjm6X+yYqUjISGe3lyZFQrE/QICAgI1Yq7vbqura2noaCgn5WKlJSUiIODg25k
-        VCsX9ggICAjrcaa7urOqpKWkmZiZlpubjYqLi3p4bWNRGlH/CAgICN/KhG1ra0lTWEpLS0tKMTExLycp
-        JCQjIRxV3ggICAgICNz/8vLy7u/v7/Dw8PDr7Ozs6+zt6+ns5v8ICAgICAgICAgICAgICAgICAgICAgI
-        CAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICP//////////4AAAD8AA
-        AAfAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AA
-        AAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAAH4AAAD///////////KAAAADAA
-        AABgAAAAAQAIAAAAAACACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAIAAAAhAAABSgEAAmcCAAJzAgADdQIAAncCAAJ5AgACewIAAX0BAAF/AQABgAEAAYIBAAKE
-        AgAFiAUACo0KAA+SDwAUlRMAE5cTABKZEgAQmxAADJwMAAefBwAGogYABaUFAASnBAAEqQQACKwHAAuv
-        CwAOsA4AELAQABOvEwATshMAErYSABG5EQARvREAD8QPAA7KDgAN0A0ADNUMABDVEAAU1hQAFtcWABfX
-        FwAZ2RkAGtoaABvcGwAc3RwAHdsdAB/YHwAg1SAAINIgACDMIAAgxiAAH7sfAB+3HwAesh4AHq0eAB6n
-        HgAeoR4AIKEgACGjIQAiqCIAJK0kACWxJQAmuCYAJ7onACe6JwAnuicAKLgoACu0KwAssi0ALLEtAC2y
-        LgAusy4ALrguAC66LwAvuy8AL7swAC+9MAAwvDEAM7kzADS3NAA0tjQANbg1ADa9NgA3wTcAOMY5ADrD
-        OgA6wTsAO8A7ADy/PAA9vj0APb49AD6/PgA/vz8AQMBAAEHAQQBBwEIAQsFCAEPCQwBDxEQARcRGAEbI
-        RwBGyEcAR8dIAEjESQBIw0kASL1KAEexSwBGpksARp9MAEeeTgBKnlEATZ5UAE6fVgBPo1YAT7lRAE/B
-        UABPwk8AUMNQAFDEUABQxlAAUcZRAFLJUgBTyVMAU8pUAFXJVQBWyFYAWMdYAFnHWgBbyFsAXMhdAF3J
-        XgBeyV4AX8pfAGDKYABhymEAYstjAGTMZABkyWUAZMdmAGbIZwBoy2gAactqAGrMawBszWwAbc5uAG/P
-        bwBwz3AAcc9xAHHPcgByz3MAc89zAHTPdAB10HUAddF2AHbUdwB41XkAetR6AHzSfAB90n0AftJ+AH/S
-        fwCA0oAAgdGCAIPRgwCE0YUAhdKGAIfShwCJ0okAitOKAIrUigCM1owAjtmOAJDakACS2pMAlNqVAJfa
-        mACa3JoAm92cAJ3enQCf3p8AoN6gAKPeowCl3aUAp96nAKnfqQCr36sAreCtAK7hrgCv4q8AsOOwALLl
-        sgCz5rMAtOe0ALfotgC56bkAv+q/AMXrxQDL7MoAzuzNANDtzwDT7dEA1O7SANbu0wDY79YA2vDYANvy
-        2gDf9N4A4/bjAOf45wDp+ekA6vnrAOv57ADs+e4A7PnvAOz58QDr+fMA6/jzAOv48wDr+PQA6/j0AOr4
-        9ADq+PQA6vj0AOv59QDs+fQA7vr0APD69ADy+/QA8/v0APT79QD2+/YA9/v2APn79wD7+vgA/fn4AP75
-        +AD++fgA/vn5AP37+wD9/f0A/v7+AP7+/gD+/v4A////AP7+/gAHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
-        BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
-        BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
-        BwcHBwcHB+LV3+rq5uLi4urq5urm5urq6urm6urq6urq6ubm5ubm5urq7eIHBwcHBwcHBwcH4tW2fHd3
-        eHd3d3h4eHh4d3d3d3d4eHh4eHh4eHh4eHh4eHd3lcbiBwcHBwcHBwfi15ZEFA4ODAwMDAwMEBAPEBIS
-        EhITFBMTExQUFBQUFBQUFBQREVvB4gcHBwcHBwfPrRgVGBgYGRkZGRkZQ0NDQ0NDQxsgICAdHR8fHx8f
-        Hx8fICAfFQ13yOIHBwcHBwfiQxgXGhpDQkdHR0dGREdHR0dHR0hMKT9XTCkkJiYmJiYmJSokHhUSmfYH
-        BwcHBwfiFRklJ0ZGQUhbUVFQTlZUTExMQCg/SVNXOjQ0NDQ0NDUzJjMzJB4Qe/gHBwcHBwfiHxwnQEBI
-        UFFbW1tbWF1ZWElYnse1VzM1NjY3Nzc3Nzc2MiwrKR0Pe/YHBwcHBwfiIiNBR0lVW1tZWVxZWVlZXU1d
-        w//ecTs5NzY2Nzg4NzY2NzIrKBsOe/YHBwcHBwfiIiRBSFNdXV1dTUlUXV1ZZ1hlxP/th2ZfNDM4Mi8v
-        MTg2NzcxKRoOe/gHBwcHBwfiIkFJT1tcXWJpZ2hjY2hnbV1uxf/ebWFfODMzMjQ1NDY2NTcyKRoOe/gH
-        BwcHBwfiIkFMU1tcYmKFu8SrYWdycl1yyf/ecDxfXzkvX7e3cS81NjcyKRoOe/gHBwcHBwfiIkFNV11i
-        a2GO7v/Wk2Vscl1uyP/hlTtfcDo5uf/trC80NjcyKRoOe/gHBwcHBwfiIkFTXGJsbl6M2v//3I9qgV1u
-        yP/gi4JfMV7O///boS80NjcyKRoOe/gHBwcHBwfiIlBbYmtubG5/ndT6/9uZVVVyyP/fX18zOMf7/9qc
-        NDI2NjcyKRoOe/gHBwcHBwfiIkhSYm1tboB+bKrS+v/Sq2Zmrc26cF+Evd7/2qU0Lzg2NjcyKRoOe/gH
-        BwcHBwfiIkxdY2xzf4CAfmmi1vr/zX5ecXFohDyl2v/esTsvNDg2NjcyKRoOe/gHBwcHBwfiJlRna3N/
-        gICAhXNqnNn/zoVdZ2BiczGT3P2mO1c6NDY2NjcxKRwOe/gHBwcHBwfiJ1lncoCAgICAgIdzc6OxnYFr
-        a2xubGBfjqVfLzo5NDg2NjcxKRwOe/gHBwcHBwfiJ1NshYBpY2xzaGZoaWldbIBzaW1tbl88MzMsLS8v
-        Ly8vLDE4PhoOe/gHBwcHBwfiJ1l/foqjrqyxq6isp4pzc3NubG1tcztXXzxtkYeGhoaHk188SRsOe/gH
-        BwcHBwfiJ2aBY6HY//Dy8vP/2pdzf25sbW1ucl5dTT6///Hv7+/w/6o/QRsPe/gHBwcHBwfiJ2eAaKjY
-        //Pz8/r62pdzgHNubG1ubmRbSTy+//Py8vLz/6tJQBsOe/gHBwcHBwfiKGWDhZ7CzcbIx8jMvox+gHNu
-        bGtjZV1cTDyTv7m2t7m5v4hMPxsOe/gHBwcHBwfiP2iLlIyBf4F/f4FzZ3R+c25tbmhdWV1VTElAJiot
-        LCcpJj5MSBsPe/gHBwcHBwfiP3OMkY6QmpuOjpGKf39/gIBza21sXV1YTExMTExMTExMTExMVUQNe/YH
-        BwcHBwfiSX6Kl5mRj5KQkZJ/is/wwHJecWtdXD+Y1NmKJE1ISVdMTExMSBsPe/gHBwcHBwfiTXSQnaKa
-        l5SPj3ORzvP/zYFZXT8/WCiu3//SiyMnU0xMTFtQRxsPe/YHBwcHBwfiTX+aoqGhop2Pf5nL8v/fvnNi
-        kqycZj+Oz/r/0IkpKVVSTFJRUEQPe/YHBwcHBwfiTYmco6OioqKZl83w//O5iGdyv/HUc05Ji9L//9CI
-        Pk5bTU5SUUQPe/YHBwcHBwfiTYubqKujnZyqzvD/8L+AameFzP/ugVM/P4vR//rPiylSTFNRUEQPe/YH
-        BwcHBwfiTYmZq7Otope0+v/uwIF/imyHzP/eiF1lUyiK0f/vuCVMV1pRUEQPe/gHBwcHBwfiU4yeqrKz
-        q5ms1NnFf4mTj26Ay//fjmdjXV1AitTQo0JVXFRbW0QPe/gHBwcHBwfiYpmts7Kxsqyfo6iajo+Qkn+J
-        y//fjWZiYmliWWJlXVlcW1tbW0MPe/gHBwcHBwfiYpmtubqzsLKrmZeanZyUkYGPzf/glHRzf39zYllY
-        WVlZW1xbUEMPe/gHBwcHBwfiY6OtusG7s7Gyq6Geo6OamYqSzf/tnYCKi4B/cnJuZmJiXVxSRxsPe/gH
-        BwcHBwfiZa22usLCuK+zs6yjn5+ip5iYx+/Rn4yRkYmAh4Bzc3JuXVtRRxsOe/gHBwcHBwfiY6u9wcPB
-        uK+xsbOsoZ+hoqGho6OXkZCQkZCJgICAgH9sXVtRRxsOe/gHBwcHBwfiYqOzvMXDubGzqKeno6Oak5eX
-        lIuKj5SPiYmHgIBycmxdXVlNRxsXlfgHBwcHBwfip3KXs7q6ta6ooZ2fn5qRjo6Pj5GUlIyHg4OEh4Nt
-        Z2liWlNOGxVEuuIHBwcHBwfi2KWNiICAgXNkZGRkZFxZWVlZWVlUVE1JSUhASEAnJycmHyAeFlCv4gcH
-        BwcHBwcH4tW3koaGhoZxcXFxcXFxcXFxcXFfX19fX11ZXV1dWVhMWVdAdb7iBwcHBwcHBwcHB+L/////
-        /////////////////////////////////////////+IHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
-        BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
-        BwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcHBwcH
-        Bwf///////8AAP///////wAA////////AAD4AAAAAD8AAPAAAAAAHwAA4AAAAAAPAADgAAAAAAcAAOAA
-        AAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAH
-        AADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAAcAAOAA
-        AAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAH
-        AADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAAcAAOAA
-        AAAABwAA4AAAAAAHAADgAAAAAAcAAOAAAAAABwAA4AAAAAAHAADgAAAAAA8AAPAAAAAAHwAA+AAAAAA/
-        AAD///////8AAP///////wAA////////AAA=
-</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigator1.Parent" xml:space="preserve">
-    <value>XtraTabPage2</value>
-  </data>
-  <data name="&gt;&gt;OpenFileDialog1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.OpenFileDialog, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>721, 352</value>
-  </data>
-  <data name="Label1.AutoSize" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="&gt;&gt;btnrunSQL.Name" xml:space="preserve">
-    <value>btnrunSQL</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImageLayout" type="System.Windows.Forms.ImageLayout, System.Windows.Forms">
-    <value>Tile</value>
-  </data>
-  <data name="btnrunSQL.Location" type="System.Drawing.Point, System.Drawing">
-    <value>17, 474</value>
-  </data>
-  <data name="BindingNavigatorSeparator.Size" type="System.Drawing.Size, System.Drawing">
-    <value>6, 25</value>
-  </data>
-  <data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
-    <value>4</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="XtraTabPage2.Text" xml:space="preserve">
-    <value>Ergebnis:</value>
-  </data>
-  <data name="&gt;&gt;BindingSource1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;Button1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigator1.TabIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMovePreviousItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMovePreviousItem</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
-        wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
-        v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
-        UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
-        Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
-        lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigator1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
-    <value>1</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.Text" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="BindingNavigatorMoveFirstItem.Text" xml:space="preserve">
-    <value>Erste verschieben</value>
-  </data>
-  <data name="XtraTabPage2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>721, 377</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage1.Type" xml:space="preserve">
-    <value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="txtSQL.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Consolas, 9pt</value>
-  </data>
-  <data name="&gt;&gt;$this.Name" xml:space="preserve">
-    <value>frmSQL_Admin</value>
-  </data>
-  <data name="Label1.TabIndex" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;GridView1.Name" xml:space="preserve">
-    <value>GridView1</value>
-  </data>
-  <assembly alias="DevExpress.Utils.v15.2" name="DevExpress.Utils.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.ToolTipIconType" type="DevExpress.Utils.ToolTipIconType, DevExpress.Utils.v15.2">
-    <value>None</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorPositionItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripTextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="btnrunSQL.TabIndex" type="System.Int32, mscorlib">
-    <value>4</value>
-  </data>
-  <data name="XtraTabControl1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>17, 63</value>
-  </data>
-  <data name="BindingNavigatorSeparator1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>6, 25</value>
-  </data>
-  <assembly alias="DevExpress.XtraEditors.v15.2" name="DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
-  <data name="GridControl1.EmbeddedNavigator.TextLocation" type="DevExpress.XtraEditors.NavigatorButtonsTextLocation, DevExpress.XtraEditors.v15.2">
-    <value>Center</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="&gt;&gt;Button1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Parent" xml:space="preserve">
-    <value>XtraTabPage2</value>
-  </data>
-  <data name="BindingNavigator1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>721, 25</value>
-  </data>
-  <data name="btnrunSQL.Size" type="System.Drawing.Size, System.Drawing">
-    <value>125, 33</value>
-  </data>
-  <data name="BindingNavigatorSeparator2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>6, 25</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage1.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.BackgroundImage" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMovePreviousItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;GridControl1.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;TextBox1.ZOrder" xml:space="preserve">
-    <value>3</value>
-  </data>
-  <data name="txtSQL.Location" type="System.Drawing.Point, System.Drawing">
-    <value>-1, 11</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>50, 23</value>
-  </data>
-  <data name="BindingNavigator1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 0</value>
-  </data>
-  <data name="$this.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
-    <value>3, 4, 3, 4</value>
-  </data>
-  <data name="&gt;&gt;GridView1.Type" xml:space="preserve">
-    <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;Button1.Name" xml:space="preserve">
-    <value>Button1</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage1.Name" xml:space="preserve">
-    <value>XtraTabPage1</value>
-  </data>
-  <data name="&gt;&gt;Button1.ZOrder" xml:space="preserve">
-    <value>1</value>
-  </data>
-  <data name="btnrunSQL.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Bottom, Left</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator.Name" xml:space="preserve">
-    <value>BindingNavigatorSeparator</value>
-  </data>
-  <data name="txtSQL.Multiline" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="GridControl1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 25</value>
-  </data>
-  <data name="BindingNavigatorCountItem.Text" xml:space="preserve">
-    <value>von {0} Datensätzen</value>
-  </data>
-  <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>750, 86</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorCountItem.Name" xml:space="preserve">
-    <value>BindingNavigatorCountItem</value>
-  </data>
-  <data name="GridView1.Appearance.OddRow.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
-    <value>Regular</value>
-  </data>
-  <data name="&gt;&gt;Label1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;TextBox1.Name" xml:space="preserve">
-    <value>TextBox1</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ToolTip" xml:space="preserve">
-    <value />
-  </data>
-  <data name="XtraTabControl1.TabIndex" type="System.Int32, mscorlib">
-    <value>6</value>
-  </data>
-  <data name="Button1.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>TopCenter</value>
-  </data>
-  <data name="GridView1.Appearance.OddRow.BackColor" type="System.Drawing.Color, System.Drawing">
-    <value>White</value>
-  </data>
-  <data name="&gt;&gt;Label1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage2.Type" xml:space="preserve">
-    <value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveFirstItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMoveFirstItem</value>
-  </data>
-  <data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>122, 17</value>
-  </data>
-  <data name="XtraTabPage1.Text" xml:space="preserve">
-    <value>Auszuführender SQL-Befehl</value>
-  </data>
-  <data name="btnrunSQL.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleLeft</value>
-  </data>
-  <data name="&gt;&gt;XtraTabControl1.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="&gt;&gt;txtSQL.Parent" xml:space="preserve">
-    <value>XtraTabPage1</value>
-  </data>
-  <data name="Label1.Text" xml:space="preserve">
-    <value>Aktuelle Verbindung:</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator2.Name" xml:space="preserve">
-    <value>BindingNavigatorSeparator2</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.Image" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="&gt;&gt;$this.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.ImeMode" type="System.Windows.Forms.ImeMode, System.Windows.Forms">
-    <value>Inherit</value>
-  </data>
-  <data name="TextBox1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>17, 32</value>
-  </data>
-  <data name="txtSQL.ScrollBars" type="System.Windows.Forms.ScrollBars, System.Windows.Forms">
-    <value>Both</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.Text" xml:space="preserve">
-    <value>Letzte verschieben</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.AccessibleName" xml:space="preserve">
-    <value>Position</value>
-  </data>
-  <data name="&gt;&gt;btnrunSQL.Type" xml:space="preserve">
-    <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;XtraTabPage2.Parent" xml:space="preserve">
-    <value>XtraTabControl1</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorCountItem.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="BindingNavigatorPositionItem.ToolTipText" xml:space="preserve">
-    <value>Aktuelle Position</value>
-  </data>
-  <data name="XtraTabControl1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>727, 405</value>
-  </data>
-  <data name="&gt;&gt;XtraTabControl1.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
-    <value>True</value>
-  </data>
-  <data name="&gt;&gt;btnrunSQL.ZOrder" xml:space="preserve">
-    <value>2</value>
-  </data>
-  <data name="btnrunSQL.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI Semibold, 9.75pt, style=Bold, Italic</value>
-  </data>
-  <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>75, 43</value>
-  </data>
-  <data name="&gt;&gt;TextBox1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="Label1.Font" type="System.Drawing.Font, System.Drawing">
-    <value>Segoe UI, 9.75pt, style=Italic</value>
-  </data>
-  <data name="&gt;&gt;txtSQL.Name" xml:space="preserve">
-    <value>txtSQL</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
-        5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
-        Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
-        08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
-</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.FontSizeDelta" type="System.Int32, mscorlib">
-    <value>0</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.AccessibleName" type="System.Resources.ResXNullRef, System.Windows.Forms">
-    <value />
-  </data>
-  <data name="btnrunSQL.Text" xml:space="preserve">
-    <value>SQL ausführen</value>
-  </data>
-  <data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
-        n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
-        N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
-        oAc0QjgAAAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="Button1.TabIndex" type="System.Int32, mscorlib">
-    <value>5</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>23, 22</value>
-  </data>
-  <data name="txtSQL.Size" type="System.Drawing.Size, System.Drawing">
-    <value>715, 371</value>
-  </data>
-  <data name="BindingNavigatorCountItem.ToolTipText" xml:space="preserve">
-    <value>Die Gesamtanzahl der Elemente.</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigator1.Name" xml:space="preserve">
-    <value>BindingNavigator1</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.BackColor" type="System.Drawing.Color, System.Drawing">
-    <value>Cyan</value>
-  </data>
-  <data name="BindingNavigatorCountItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>111, 22</value>
-  </data>
-  <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>826, 519</value>
-  </data>
-  <data name="&gt;&gt;XtraTabControl1.Name" xml:space="preserve">
-    <value>XtraTabControl1</value>
-  </data>
-  <data name="TextBox1.TabIndex" type="System.Int32, mscorlib">
-    <value>1</value>
-  </data>
-  <data name="&gt;&gt;txtSQL.ZOrder" xml:space="preserve">
-    <value>0</value>
-  </data>
-  <data name="BindingNavigatorMovePreviousItem.Text" xml:space="preserve">
-    <value>Vorherige verschieben</value>
-  </data>
-  <data name="&gt;&gt;BindingSource1.Name" xml:space="preserve">
-    <value>BindingSource1</value>
-  </data>
-  <data name="Button1.Text" xml:space="preserve">
-    <value>Open SQL</value>
-  </data>
-  <data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
-    <value>7, 17</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorSeparator.Type" xml:space="preserve">
-    <value>System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <data name="&gt;&gt;XtraTabControl1.Type" xml:space="preserve">
-    <value>DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigatorMoveLastItem.Name" xml:space="preserve">
-    <value>BindingNavigatorMoveLastItem</value>
-  </data>
-  <data name="btnrunSQL.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
-    <value>MiddleRight</value>
-  </data>
-  <data name="GridView1.Appearance.OddRow.GradientMode" type="System.Drawing.Drawing2D.LinearGradientMode, System.Drawing">
-    <value>Horizontal</value>
-  </data>
-  <data name="GridView1.Appearance.EvenRow.FontStyleDelta" type="System.Drawing.FontStyle, System.Drawing">
-    <value>Regular</value>
-  </data>
-  <data name="GridControl1.EmbeddedNavigator.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
-    <value>Top, Left</value>
-  </data>
-  <data name="&gt;&gt;btnrunSQL.Parent" xml:space="preserve">
-    <value>$this</value>
-  </data>
-  <data name="&gt;&gt;BindingNavigator1.Type" xml:space="preserve">
-    <value>System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </data>
-  <metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 17</value>
-  </metadata>
-  <metadata name="BindingSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>313, 17</value>
-  </metadata>
-  <metadata name="$this.Language" type="System.Globalization.CultureInfo, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>en-US</value>
-  </metadata>
-  <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>True</value>
-  </metadata>
-  <metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>159, 17</value>
-  </metadata>
-</root>

Global_Indexer/frmStart.Designer.vb

@@ -1,6 +1,6 @@
 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
 Partial Class frmStart
-    Inherits System.Windows.Forms.Form
+    Inherits DevExpress.XtraEditors.XtraForm
 
     'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
     <System.Diagnostics.DebuggerNonUserCode()> _
@@ -54,6 +54,8 @@ Partial Class frmStart
         Me.btnChoosefiles = New System.Windows.Forms.Button()
         Me.MenuStrip1.SuspendLayout()
         Me.StatusStrip1.SuspendLayout()
+        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TBHOTKEY_USER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'MenuStrip1
@@ -148,6 +150,7 @@ Partial Class frmStart
         '
         Me.LabelControl1.AllowDrop = True
         Me.LabelControl1.Appearance.Font = CType(resources.GetObject("LabelControl1.Appearance.Font"), System.Drawing.Font)
+        Me.LabelControl1.Appearance.Options.UseFont = True
         resources.ApplyResources(Me.LabelControl1, "LabelControl1")
         Me.LabelControl1.Name = "LabelControl1"
         '
@@ -161,28 +164,29 @@ Partial Class frmStart
         resources.ApplyResources(Me.LabelMachine, "LabelMachine")
         Me.LabelMachine.Id = 3
         Me.LabelMachine.Name = "LabelMachine"
-        Me.LabelMachine.TextAlignment = System.Drawing.StringAlignment.Near
         '
         'LabelUser
         '
         resources.ApplyResources(Me.LabelUser, "LabelUser")
         Me.LabelUser.Id = 4
         Me.LabelUser.Name = "LabelUser"
-        Me.LabelUser.TextAlignment = System.Drawing.StringAlignment.Near
         '
         'LabelLoggedIn
         '
         resources.ApplyResources(Me.LabelLoggedIn, "LabelLoggedIn")
         Me.LabelLoggedIn.Id = 5
         Me.LabelLoggedIn.Name = "LabelLoggedIn"
-        Me.LabelLoggedIn.TextAlignment = System.Drawing.StringAlignment.Near
         '
         'LabelVersion
         '
         resources.ApplyResources(Me.LabelVersion, "LabelVersion")
         Me.LabelVersion.Id = 6
         Me.LabelVersion.Name = "LabelVersion"
-        Me.LabelVersion.TextAlignment = System.Drawing.StringAlignment.Near
+        '
+        'MyDataset
+        '
+        Me.MyDataset.DataSetName = "MyDataset"
+        Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
         '
         'TBHOTKEY_USER_PROFILETableAdapter
         '
@@ -195,13 +199,13 @@ Partial Class frmStart
         Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
-        Me.TableAdapterManager.TBDD_GROUPSTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MAN_POSTPROCESSINGTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_INDEX_MANTableAdapter = Nothing
         Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_CONFIGURATIONTableAdapter = Nothing
         Me.TableAdapterManager.TBGI_OBJECTTYPE_EMAIL_INDEXTableAdapter = Nothing
+        Me.TableAdapterManager.TBGI_REGEX_DOCTYPETableAdapter = Nothing
         Me.TableAdapterManager.TBHOTKEY_PATTERNS_REWORKTableAdapter = Nothing
         Me.TableAdapterManager.TBHOTKEY_PATTERNSTableAdapter = Nothing
         Me.TableAdapterManager.TBHOTKEY_PROFILETableAdapter = Nothing
@@ -235,6 +239,8 @@ Partial Class frmStart
         Me.MenuStrip1.PerformLayout()
         Me.StatusStrip1.ResumeLayout(False)
         Me.StatusStrip1.PerformLayout()
+        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TBHOTKEY_USER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 

Global_Indexer/frmStart.resx

@@ -118,14 +118,14 @@
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
   <metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 17</value>
+    <value>400, 17</value>
   </metadata>
   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
   <data name="MenuStrip1.Location" type="System.Drawing.Point, System.Drawing">
     <value>0, 0</value>
   </data>
   <data name="MenuStrip1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>294, 24</value>
+    <value>295, 24</value>
   </data>
   <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="MenuStrip1.TabIndex" type="System.Int32, mscorlib">
@@ -153,58 +153,58 @@
     <value>Konfiguration</value>
   </data>
   <data name="AdministrationToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>220, 22</value>
+    <value>221, 22</value>
   </data>
   <data name="AdministrationToolStripMenuItem.Text" xml:space="preserve">
     <value>Administration</value>
   </data>
   <data name="GlobalIndexerEinstellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>231, 22</value>
+    <value>232, 22</value>
   </data>
   <data name="GlobalIndexerEinstellungenToolStripMenuItem.Text" xml:space="preserve">
     <value>Global Indexer - Einstellungen</value>
   </data>
   <data name="HotkeyEisntellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>231, 22</value>
+    <value>232, 22</value>
   </data>
   <data name="HotkeyEisntellungenToolStripMenuItem.Text" xml:space="preserve">
     <value>Hotkey - Einstellungen</value>
   </data>
   <data name="ToolStripSeparator1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>217, 6</value>
+    <value>218, 6</value>
   </data>
   <data name="GrundeinstellungenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>220, 22</value>
+    <value>221, 22</value>
   </data>
   <data name="GrundeinstellungenToolStripMenuItem.Text" xml:space="preserve">
     <value>User Basis Einstellungen</value>
   </data>
   <data name="FrmHotkeyAddToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>220, 22</value>
+    <value>221, 22</value>
   </data>
   <data name="FrmHotkeyAddToolStripMenuItem.Text" xml:space="preserve">
     <value>Hotkeys User</value>
   </data>
   <data name="HistoryIndexierteDateienToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>220, 22</value>
+    <value>221, 22</value>
   </data>
   <data name="HistoryIndexierteDateienToolStripMenuItem.Text" xml:space="preserve">
     <value>Historie - Indexierte Dateien</value>
   </data>
   <data name="InfoToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
-    <value>220, 22</value>
+    <value>221, 22</value>
   </data>
   <data name="InfoToolStripMenuItem.Text" xml:space="preserve">
     <value>Info</value>
   </data>
   <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>132, 17</value>
+    <value>515, 17</value>
   </metadata>
   <data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
-    <value>0, 128</value>
+    <value>0, 137</value>
   </data>
   <data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>294, 22</value>
+    <value>295, 22</value>
   </data>
   <data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib">
     <value>6</value>
@@ -240,7 +240,7 @@
     <value>1223, 17</value>
   </metadata>
   <metadata name="NotifyIcon1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>1386, 17</value>
+    <value>17, 56</value>
   </metadata>
   <data name="NotifyIcon1.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
@@ -533,7 +533,7 @@
     <value>GlobalIndexer</value>
   </data>
   <metadata name="TimerCheckDroppedFiles.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>1501, 17</value>
+    <value>132, 56</value>
   </metadata>
   <data name="LabelControl1.Appearance.Font" type="System.Drawing.Font, System.Drawing">
     <value>Tahoma, 12pt</value>
@@ -564,7 +564,7 @@ auf dieses Fenster oder...</value>
     <value>1</value>
   </data>
   <metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>1689, 17</value>
+    <value>320, 56</value>
   </metadata>
   <data name="LabelMachine.Caption" xml:space="preserve">
     <value>StatusMachine</value>
@@ -579,7 +579,13 @@ auf dieses Fenster oder...</value>
     <value>StatusVersion</value>
   </data>
   <metadata name="RibbonMiniToolbar1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 56</value>
+    <value>462, 56</value>
+  </metadata>
+  <metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+  <metadata name="TBHOTKEY_USER_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>127, 17</value>
   </metadata>
   <metadata name="TBHOTKEY_USER_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>632, 17</value>
@@ -628,7 +634,7 @@ auf dieses Fenster oder...</value>
     <value>6, 13</value>
   </data>
   <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
-    <value>294, 150</value>
+    <value>295, 159</value>
   </data>
   <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
     <value>Segoe UI, 8.25pt</value>

Global_Indexer/frmStart.vb

@@ -11,38 +11,13 @@ Public Class frmStart
     Public _lizenzManager As ClassLicenseManager
     Dim loaded As Boolean = False
     Dim WithEvents HotKey As New clsHotkey(Me)
-    'Public Sub SetLanguage()
-    '    Dim de = System.Globalization.CultureInfo.CurrentUICulture
-    '    'Neue Sprache festlegen und entfernen aller Controls
-
-
-    '    Thread.CurrentThread.CurrentUICulture = New CultureInfo(USER_LANGUAGE)
-    '    Me.Controls.Clear()
-
-    '    'Me.Events.Dispose()
-
-    '    InitializeComponent()
-    '    tslblCultureInfo.Text = "Culture/Language: " & USER_LANGUAGE
-    '    Try
-    '        Dim Ic As Icon = New Icon(Application.StartupPath & "\DD_Icons_ICO_GLOBIX_128.ico")
-    '        If Not IsNothing(Ic) Then
-    '            Me.Icon = Ic
-    '        End If
-
-    '    Catch ex As Exception
-    '        ClassLogger.Add(">> Icon file could not be read: " & ex.Message, False)
-    '    End Try
-
-    '    'Me.i()
-    '    'Wiederherstellen der Fensterposition
-    '    'Me.Size = sz
-    '    'Me.Location = pt
-    'End Sub
 
     Private Const mSnapOffset As Integer = 35
     Private Const WM_WINDOWPOSCHANGING As Integer = &H46
 
-    <StructLayout(LayoutKind.Sequential)> _
+    Private IndexForm As frmIndex
+
+    <StructLayout(LayoutKind.Sequential)>
     Public Structure WINDOWPOS
         Public hwnd As IntPtr
         Public hwndInsertAfter As IntPtr
@@ -75,7 +50,7 @@ Public Class frmStart
         Try
             ' Marshal the LPARAM value which is a WINDOWPOS struct
             Dim NewPosition As New WINDOWPOS
-            NewPosition = CType(Runtime.InteropServices.Marshal.PtrToStructure( _
+            NewPosition = CType(Runtime.InteropServices.Marshal.PtrToStructure(
                 LParam, GetType(WINDOWPOS)), WINDOWPOS)
 
             If NewPosition.y = 0 OrElse NewPosition.x = 0 Then
@@ -83,36 +58,36 @@ Public Class frmStart
             End If
 
             ' Adjust the client size for borders and caption bar
-            Dim ClientRect As Rectangle = _
+            Dim ClientRect As Rectangle =
                 clientForm.RectangleToScreen(clientForm.ClientRectangle)
-            ClientRect.Width += _
+            ClientRect.Width +=
                 SystemInformation.FrameBorderSize.Width - widthAdjustment
-            ClientRect.Height += (SystemInformation.FrameBorderSize.Height + _
+            ClientRect.Height += (SystemInformation.FrameBorderSize.Height +
                                   SystemInformation.CaptionHeight)
 
             ' Now get the screen working area (without taskbar)
-            Dim WorkingRect As Rectangle = _
+            Dim WorkingRect As Rectangle =
                 Screen.GetWorkingArea(clientForm.ClientRectangle)
 
             ' Left border
-            If NewPosition.x >= WorkingRect.X - mSnapOffset AndAlso _
+            If NewPosition.x >= WorkingRect.X - mSnapOffset AndAlso
                 NewPosition.x <= WorkingRect.X + mSnapOffset Then
                 NewPosition.x = WorkingRect.X
             End If
 
             ' Get screen bounds and taskbar height
             ' (when taskbar is horizontal)
-            Dim ScreenRect As Rectangle = _
+            Dim ScreenRect As Rectangle =
                 Screen.GetBounds(Screen.PrimaryScreen.Bounds)
-            Dim TaskbarHeight As Integer = _
+            Dim TaskbarHeight As Integer =
                 ScreenRect.Height - WorkingRect.Height
 
             ' Top border (check if taskbar is on top
             ' or bottom via WorkingRect.Y)
-            If NewPosition.y >= -mSnapOffset AndAlso _
-                 (WorkingRect.Y > 0 AndAlso NewPosition.y <= _
-                 (TaskbarHeight + mSnapOffset)) OrElse _
-                 (WorkingRect.Y <= 0 AndAlso NewPosition.y <= _
+            If NewPosition.y >= -mSnapOffset AndAlso
+                 (WorkingRect.Y > 0 AndAlso NewPosition.y <=
+                 (TaskbarHeight + mSnapOffset)) OrElse
+                 (WorkingRect.Y <= 0 AndAlso NewPosition.y <=
                  (mSnapOffset)) Then
                 If TaskbarHeight > 0 Then
                     NewPosition.y = WorkingRect.Y ' Horizontal Taskbar
@@ -122,25 +97,25 @@ Public Class frmStart
             End If
 
             ' Right border
-            If NewPosition.x + ClientRect.Width <= _
-                 WorkingRect.Right + mSnapOffset AndAlso _
-                 NewPosition.x + ClientRect.Width >= _
+            If NewPosition.x + ClientRect.Width <=
+                 WorkingRect.Right + mSnapOffset AndAlso
+                 NewPosition.x + ClientRect.Width >=
                  WorkingRect.Right - mSnapOffset Then
-                NewPosition.x = WorkingRect.Right - (ClientRect.Width + _
+                NewPosition.x = WorkingRect.Right - (ClientRect.Width +
                                 SystemInformation.FrameBorderSize.Width)
             End If
 
             ' Bottom border
-            If NewPosition.y + ClientRect.Height <= _
-                   WorkingRect.Bottom + mSnapOffset AndAlso _
-                   NewPosition.y + ClientRect.Height >= _
+            If NewPosition.y + ClientRect.Height <=
+                   WorkingRect.Bottom + mSnapOffset AndAlso
+                   NewPosition.y + ClientRect.Height >=
                    WorkingRect.Bottom - mSnapOffset Then
-                NewPosition.y = WorkingRect.Bottom - (ClientRect.Height + _
+                NewPosition.y = WorkingRect.Bottom - (ClientRect.Height +
                                 SystemInformation.FrameBorderSize.Height)
             End If
 
             ' Marshal it back
-            Runtime.InteropServices.Marshal.StructureToPtr(NewPosition, _
+            Runtime.InteropServices.Marshal.StructureToPtr(NewPosition,
                                                            LParam, True)
         Catch ex As ArgumentException
         End Try
@@ -158,7 +133,7 @@ Public Class frmStart
         End If
         'Erstmal alles löschen
         ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FILES_USER WHERE UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')")
-        If ClassDragDrop.Drop_File(e) = True Then
+        If ClassFileDrop.Drop_File(e) = True Then
             TimerCheckDroppedFiles.Start()
         End If
     End Sub
@@ -166,7 +141,7 @@ Public Class frmStart
         Dim CapTxt As String = ClassHotkey_Windream.GetCaption()
         CURRENT_FOCUSES_WINDOWNAME = CapTxt
         If CURRENT_FOCUSES_WINDOWNAME.ToUpper.StartsWith("GLOB") Then Exit Sub
-        If LogErrorsOnly = False Then ClassLogger.Add(" ...Focused window result: '" & CURRENT_FOCUSES_WINDOWNAME & "'", False)
+        LOGGER.Info(" ...Focused window result: '" & CURRENT_FOCUSES_WINDOWNAME & "'")
 
         Me.Cursor = Cursors.WaitCursor
         Me.NotifyIcon1.Visible = True
@@ -238,12 +213,11 @@ Public Class frmStart
 
     Sub Check_Dropped_Files()
         Try
-            Me.TopMost = False
             ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FILES_USER WHERE WORKED = 1 AND UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')")
             Dim i As Integer
-            For Each Str As Object In ClassDragDrop.files_dropped
+            For Each Str As Object In ClassFileDrop.files_dropped
                 If Not Str Is Nothing Then
-                    If LogErrorsOnly = False Then ClassLogger.Add(">> Check Drop-File: " & Str.ToString, False)
+                    LOGGER.Info(">> Check Drop-File: " & Str.ToString)
                     Dim handleType As String = Str.Substring(0, Str.LastIndexOf("|") + 1)
                     Dim filename As String = Str.Substring(Str.LastIndexOf("|") + 1)
                     If ClassIndexFunctions.FileExistsinDropTable(filename) = False Then
@@ -271,28 +245,29 @@ Public Class frmStart
                 CURRENT_FILENAME = Filerow.Item("FILENAME2WORK")
                 CURRENT_WORKFILE_GUID = Filerow.Item(0)
                 CURRENT_WORKFILE = Filerow.Item("FILENAME2WORK")
-                If LogErrorsOnly = False Then ClassLogger.Add(">> CURRENT_WORKFILE: " & CURRENT_WORKFILE, False)
+                LOGGER.Info(">> CURRENT_WORKFILE: " & CURRENT_WORKFILE)
                 If File.Exists(CURRENT_WORKFILE) = True And DTACTUAL_FILES.Rows.Count > 0 Then
                     Open_IndexDialog()
                 End If
-
             Next
+            Show()
         Catch ex As Exception
             If Not ex.Message.StartsWith("Die Auflistung wurde geändert") Then
                 MsgBox("Unexpected Error in Check_Dropped_Files:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
             End If
         End Try
-        Me.TopMost = True
     End Sub
 
     Sub Open_IndexDialog()
         Try
-            Me.Hide()
-            Me.TopMost = False
-            frmIndex.Show()
-            Me.Visible = True
-            Me.TopMost = True
-            Me.BringToFront()
+            Hide()
+            IndexForm.ShowDialog()
+
+            'AddHandler frmIndex.FormClosed, Sub()
+            '                                    Show()
+            '                                    BringToFront()
+            '                                End Sub
+
         Catch ex As Exception
             LOGGER.Error(ex)
             MsgBox(ex.Message, MsgBoxStyle.Critical)
@@ -300,30 +275,35 @@ Public Class frmStart
     End Sub
 
     Private Sub frmStart_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
-        If My.Settings.AppTerminate = False Then
-            Try
+        Try
 
-                ClassLogger.Add("", False)
-                If START_INCOMPLETE = False Then
-                    Dim Sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND UPPER(MODULE) = UPPER('Global-Indexer')"
-                    ClassDatabase.Execute_non_Query(Sql, True)
-                End If
-                ClassWindowLocation.SaveFormLocationSize(Me)
-            Catch ex As Exception
-                MsgBox("Unexpected Error in Closing Application: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            End Try
-            If USER_ID > 0 Then
-                Unregister_Hotkeys()
+            LOGGER.Info("")
+            If START_INCOMPLETE = False Then
+                Dim Sql = "DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = " & USER_ID & " AND UPPER(MODULE) = UPPER('Global-Indexer')"
+                ClassDatabase.Execute_non_Query(Sql, True)
             End If
-            'TempDateien löschen
-            Try
-                For Each _file In TEMP_FILES
-                    System.IO.File.Delete(_file)
-                Next
-            Catch ex As Exception
-
-            End Try
+            ClassWindowLocation.SaveFormLocationSize(Me)
+        Catch ex As Exception
+            MsgBox("Unexpected Error in Closing Application: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+        End Try
+        If USER_ID > 0 Then
+            Unregister_Hotkeys()
         End If
+        'TempDateien löschen
+        Try
+            For Each _file In TEMP_FILES
+                System.IO.File.Delete(_file)
+            Next
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
+
+        Try
+            IndexForm.DisposeViewer()
+            IndexForm.Dispose()
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
     End Sub
 
     Public Sub New()
@@ -338,28 +318,15 @@ Public Class frmStart
     End Sub
 
     Private Sub frmStart_Load(sender As Object, e As EventArgs) Handles Me.Load
-        If My.Settings.AppTerminate = True Then
-            Exit Sub
-        End If
-        'Me.TransparencyKey = Color.Transparent
-        ' Me.BackColor = Color.Transparent
         Cursor = Cursors.WaitCursor
-        ' My.Application.ChangeUICulture("en")
-        'My.Application.ChangeCulture("en")
-        Dim i = My.Application.UICulture.ToString()
 
         Try
-
-
-            'Dim sql = sql_UserID
-
-            'Dim splash As New frmSplash()
-            'splash.ShowDialog()
+            IndexForm = New frmIndex()
 
             'Lizenz abgellaufen, überprüfen ob User Admin ist
             If LICENSE_COUNT < UserLoggedin Then
                 If USER_IS_ADMIN = True Then
-                    ClassLogger.Add(">> User is Admin - Timer will be started", False)
+                    LOGGER.Info(">> User is Admin - Timer will be started")
                     If USER_LANGUAGE = "de-DE" Then
                         MsgBox("Sie haben nun 3 Minuten Zeit eine neue Lizenz zu vergeben!", MsgBoxStyle.Information)
                     Else
@@ -374,7 +341,7 @@ Public Class frmStart
             End If
             If DOCTYPE_COUNT_ACTUAL > LICENSE_DOCTYPE_COUNT Then
                 If USER_IS_ADMIN = True Then
-                    ClassLogger.Add(">> User is Admin - Timer will be started", False)
+                    LOGGER.Info(">> User is Admin - Timer will be started")
                     If USER_LANGUAGE = "de-DE" Then
                         MsgBox("Sie haben nun 3 Minuten Zeit eine neue Lizenz zu vergeben!", MsgBoxStyle.Information)
                     Else
@@ -424,12 +391,12 @@ Public Class frmStart
 
             Try
                 If CONFIG.Config.FolderWatchScanStarted = True Then
-                    If LogErrorsOnly = False Then ClassLogger.Add(">> FWSCAN started - Checking file:" & CURRENT_SCAN_FOLDERWATCH, False)
+                    LOGGER.Info(">> FWSCAN started - Checking file:" & CURRENT_SCAN_FOLDERWATCH)
                     Dim fileEntries As String() = Directory.GetFiles(CURRENT_SCAN_FOLDERWATCH)
                     ' Process the list of files found in the directory.
                     Dim fileName As String
                     For Each fileName In fileEntries
-                        If LogErrorsOnly = False Then ClassLogger.Add(">> Scanfolder after startup: Checking file:" & fileName, False)
+                        LOGGER.Info(">> Scanfolder after startup: Checking file:" & fileName)
                         For Each row As DataRow In DTEXCLUDE_FILES.Rows
                             Dim content As String = row.Item(0).ToString.ToLower
                             If fileName.ToLower.Contains(content) Then
@@ -443,29 +410,30 @@ Public Class frmStart
                             handleType = "|FW_SIMPLEINDEXER|"
                         End If
                         'Die Datei übergeben
-                        If LogErrorsOnly = False Then ClassLogger.Add(">> Adding file from Scanfolder after startup:" & fileName, False)
+                        LOGGER.Info(">> Adding file from Scanfolder after startup:" & fileName)
                         If ClassIndexFunctions.FileExistsinDropTable(fileName) = False Then
                             ClassFilehandle.Decide_FileHandle(fileName, handleType)
                         Else
-                            ClassLogger.Add(">> Scanfolder Startup: File already exists:" & fileName, False)
+                            LOGGER.Info(">> Scanfolder Startup: File already exists:" & fileName)
                         End If
                     Next fileName
 
                 Else
-                    If LogErrorsOnly = False Then ClassLogger.Add(">> FWSCAN not started", False)
+                    LOGGER.Info(">> FWSCAN not started")
                 End If
             Catch ex As Exception
-                ClassLogger.Add(">> Error while starting folderwatch scan: " & ex.Message, False)
+                LOGGER.Info(">> Error while starting folderwatch scan: " & ex.Message)
+                LOGGER.Error(ex.Message)
             End Try
 
             Try
                 If FW_started = True Then
-                    If LogErrorsOnly = False Then ClassLogger.Add(">> FW_started started - Checking file:" & CURRENT_FOLDERWATCH, False)
+                    LOGGER.Info(">> FW_started started - Checking file:" & CURRENT_FOLDERWATCH)
                     Dim fileEntries As String() = Directory.GetFiles(CURRENT_FOLDERWATCH)
                     ' Process the list of files found in the directory.
                     Dim fileName As String
                     For Each fileName In fileEntries
-                        If LogErrorsOnly = False Then ClassLogger.Add(">> Folderwach after startup: Checking file:" & fileName, False)
+                        LOGGER.Info(">> Folderwach after startup: Checking file:" & fileName)
                         For Each row As DataRow In DTEXCLUDE_FILES.Rows
                             Dim content As String = row.Item(0).ToString.ToLower
                             If fileName.ToLower.Contains(content) Then
@@ -479,19 +447,20 @@ Public Class frmStart
                             handleType = "|FW_SIMPLEINDEXER|"
                         End If
                         'Die Datei übergeben
-                        If LogErrorsOnly = False Then ClassLogger.Add(">> Adding file from Folderwatch after startup:" & fileName, False)
+                        LOGGER.Info(">> Adding file from Folderwatch after startup:" & fileName)
                         If ClassIndexFunctions.FileExistsinDropTable(fileName) = False Then
                             ClassFilehandle.Decide_FileHandle(fileName, handleType)
                         Else
-                            ClassLogger.Add(">> Folderwatch Startup: File already exists:" & fileName, False)
+                            LOGGER.Info(">> Folderwatch Startup: File already exists:" & fileName)
                         End If
                     Next fileName
 
                 Else
-                    If LogErrorsOnly = False Then ClassLogger.Add(">> FW_started not started", False)
+                    LOGGER.Info(">> FW_started not started")
                 End If
             Catch ex As Exception
-                ClassLogger.Add(">> Error while starting folderwatch: " & ex.Message, False)
+                LOGGER.Info(">> Error while starting folderwatch: " & ex.Message)
+                LOGGER.Error(ex.Message)
             End Try
 
             If TimerFolderWatch.Enabled = False Then
@@ -520,7 +489,7 @@ Public Class frmStart
         Try
             Dim DT As DataTable = ClassDatabase.Return_Datatable("SELECT HOTKEY1, HOTKEY2, ABS(CONVERT(INT, CONVERT(binary(4), NEWID()))) AS HOTKEY_ID FROM  TBHOTKEY_USER_PROFILE WHERE USER_ID = " & USER_ID & " GROUP BY HOTKEY1, HOTKEY2", True)
             If DT.Rows.Count > 0 Then
-                If LogErrorsOnly = False Then ClassLogger.Add(" >> " & DT.Rows.Count & " Hotkey-Profile", False)
+                LOGGER.Info(" >> " & DT.Rows.Count & " Hotkey-Profile")
                 Dim i As Integer = 0
                 For Each row As DataRow In DT.Rows
                     i += 1
@@ -539,21 +508,21 @@ Public Class frmStart
 
                     Select Case row.Item("HOTKEY1")
                         Case "Strg"
-                            If LogErrorsOnly = False Then ClassLogger.Add(" >>" & i.ToString + "|Strg " & row.Item("HOTKEY2").ToString.ToUpper, False)
+                            LOGGER.Info(" >>" & i.ToString + "|Strg " & row.Item("HOTKEY2").ToString.ToUpper)
                             HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_CONTROL, row.Item("HOTKEY_ID"))
                         Case "Shift"
-                            If LogErrorsOnly = False Then ClassLogger.Add(" >>" & i.ToString + "|Shift " & row.Item("HOTKEY2").ToString.ToUpper, False)
+                            LOGGER.Info(" >>" & i.ToString + "|Shift " & row.Item("HOTKEY2").ToString.ToUpper)
                             HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_SHIFT, row.Item("HOTKEY_ID"))
                         Case "Alt"
-                            If LogErrorsOnly = False Then ClassLogger.Add(" >>" & i.ToString + "|Alt " & row.Item("HOTKEY2").ToString.ToUpper, False)
+                            LOGGER.Info(" >>" & i.ToString + "|Alt " & row.Item("HOTKEY2").ToString.ToUpper)
                             HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_ALT, row.Item("HOTKEY_ID"))
                         Case "win"
-                            If LogErrorsOnly = False Then ClassLogger.Add(" >>" & i.ToString + "|Win " & row.Item("HOTKEY2").ToString.ToUpper, False)
+                            LOGGER.Info(" >>" & i.ToString + "|Win " & row.Item("HOTKEY2").ToString.ToUpper)
                             HotKey.AddHotKey(keyCode, clsHotkey.MODKEY.MOD_WIN, row.Item("HOTKEY_ID"))
                     End Select
                 Next
             Else
-                If LogErrorsOnly = False Then ClassLogger.Add(" >> Keine Hotkeys!", False)
+                LOGGER.Info(" >> Keine Hotkeys!")
             End If
         Catch ex As Exception
             MsgBox("Error in Load_Hotkeys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
@@ -567,14 +536,17 @@ Public Class frmStart
             Load_Hotkeys()
             Me.Visible = True
         End If
-
-
     End Sub
 
     Private Sub GlobalIndexerEinstellungenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GlobalIndexerEinstellungenToolStripMenuItem.Click
-        Me.Hide()
-        frmAdministration.ShowDialog()
-        Me.Visible = True
+        Try
+            Me.Hide()
+            frmAdministration.ShowDialog()
+            Me.Show()
+        Catch ex As Exception
+            MsgBox("Fehler in der Administration:" & vbCrLf & vbCrLf & ex.Message, MsgBoxStyle.Critical, Text)
+            LOGGER.Error(ex)
+        End Try
     End Sub
 
     Private Sub GrundeinstellungenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GrundeinstellungenToolStripMenuItem.Click
@@ -588,16 +560,6 @@ Public Class frmStart
                 MsgBox("For the final changing of language, a restart is required!", MsgBoxStyle.Information)
             End If
             Application.Restart()
-            ''Sprache anpassen
-            'SetLanguage()
-            'LANGUAGE_CHANGED = False
-            'If USER_IS_ADMIN = True Then
-            '    ToolStripSeparator1.Visible = True
-            '    AdministrationToolStripMenuItem.Visible = True
-            'Else
-            '    ToolStripSeparator1.Visible = False
-            '    AdministrationToolStripMenuItem.Visible = False
-            'End If
         End If
         Start_Folderwatch()
         Me.TopMost = True
@@ -611,7 +573,6 @@ Public Class frmStart
             Load_Hotkeys()
             Me.Visible = True
         End If
-
     End Sub
 
     Private Sub TimerFolderWatch_Tick(sender As Object, e As EventArgs) Handles TimerFolderWatch.Tick
@@ -656,7 +617,7 @@ Public Class frmStart
                                 Exit For
                             End If
                             Dim FileForWork As String = row.Item(1)
-                            If LogErrorsOnly = False Then ClassLogger.Add(">> In Timer Folderwatch - File: " & FileForWork, False)
+                            LOGGER.Info(">> In Timer Folderwatch - File: " & FileForWork)
                             Dim fileInUse As Boolean = ClassFilehandle.IsFileInUse(FileForWork)
                             Dim fileexists As Boolean = System.IO.File.Exists(FileForWork)
                             If fileInUse = False Then
@@ -666,12 +627,12 @@ Public Class frmStart
                                     CURRENT_WORKFILE_GUID = row.Item("GUID")
                                     Open_IndexDialog()
                                 Else
-                                    ClassLogger.Add(">> File not existing - Row will be deleted!", False)
+                                    LOGGER.Info(">> File not existing - Row will be deleted!")
                                     Dim del = String.Format("DELETE FROM TBGI_FILES_USER WHERE GUID = {0}", FILEGUID)
                                     ClassDatabase.Execute_non_Query(del)
                                 End If
                             Else
-                                ClassLogger.Add(">> file '" & row.Item(1) & "' could not be opened exclusively - fileInUse!", False)
+                                LOGGER.Info(">> file '" & row.Item(1) & "' could not be opened exclusively - fileInUse!")
                             End If
 
                         Next
@@ -690,8 +651,6 @@ Public Class frmStart
 
             End Try
         End If
-
-
     End Sub
     Private Sub TimerClose3Minutes_Tick(sender As Object, e As EventArgs) Handles TimerClose3Minutes.Tick
         If LICENSE_EXPIRED = True Or LICENSE_COUNT < UserLoggedin Then
@@ -707,9 +666,6 @@ Public Class frmStart
         End If
     End Sub
     Private Sub frmStart_Shown(sender As Object, e As EventArgs) Handles Me.Shown
-        If My.Settings.AppTerminate = True Then
-            Me.Close()
-        End If
         ' SetLanguage()
         If START_INCOMPLETE = True Then
             If LICENSE_COUNT = 0 And LICENSE_EXPIRED = True Then
@@ -732,8 +688,8 @@ Public Class frmStart
         Catch ex As Exception
             Me.btnChoosefiles.Location = New Point(269, 37)
         End Try
-
     End Sub
+
     Private Sub HistoryIndexierteDateienToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles HistoryIndexierteDateienToolStripMenuItem.Click
         frmHistory.ShowDialog()
     End Sub
@@ -744,10 +700,6 @@ Public Class frmStart
         Me.TopMost = True
     End Sub
 
-    Private Sub frmStart_SizeChanged(sender As Object, e As EventArgs) Handles Me.SizeChanged
-
-    End Sub
-
     Private Sub TimerCheckDroppedFiles_Tick(sender As Object, e As EventArgs) Handles TimerCheckDroppedFiles.Tick
         TimerCheckDroppedFiles.Stop()
         Check_Dropped_Files()
@@ -762,23 +714,19 @@ Public Class frmStart
 
     Private Sub btnChoosefiles_Click(sender As Object, e As EventArgs) Handles btnChoosefiles.Click
         Try
-            Dim openFileDialog1 As New OpenFileDialog
-            Dim fName As String
-            'openFileDialog1.InitialDirectory = "c:\"
-            'openFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
-            'openFileDialog1.FilterIndex = 2
+            Dim oFileName As String
+            Dim oOpenFileDialog As New OpenFileDialog With {
+                .RestoreDirectory = True,
+                .Multiselect = True
+            }
 
-            openFileDialog1.RestoreDirectory = True
-
-            openFileDialog1.Multiselect = True
-
-            If openFileDialog1.ShowDialog() = DialogResult.OK Then
+            If oOpenFileDialog.ShowDialog() = DialogResult.OK Then
                 Dim i As Integer = 0
-                ClassDragDrop.files_dropped = Nothing
-                For Each fName In openFileDialog1.FileNames
-                    ReDim Preserve ClassDragDrop.files_dropped(i)
-                    ClassLogger.Add(">> Chosen File: " & fName, False)
-                    ClassDragDrop.files_dropped(i) = "|DROPFROMFSYSTEM|" & fName
+                ClassFileDrop.files_dropped = Nothing
+                For Each oFileName In oOpenFileDialog.FileNames
+                    ReDim Preserve ClassFileDrop.files_dropped(i)
+                    LOGGER.Info(">> Chosen File: " & oFileName)
+                    ClassFileDrop.files_dropped(i) = "|DROPFROMFSYSTEM|" & oFileName
                     i += 1
                 Next
                 TimerCheckDroppedFiles.Start()
@@ -786,7 +734,6 @@ Public Class frmStart
         Catch ex As Exception
             MsgBox("Unexpected Error in Choose Files for Indexing:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
         End Try
-
     End Sub
 
 End Class

Global_Indexer/frmUserKonfig_AddUsers.designer.vb

@@ -1,307 +0,0 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
-Partial Class frmUserKonfig_AddUsers
-    Inherits System.Windows.Forms.Form
-
-    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
-    <System.Diagnostics.DebuggerNonUserCode()> _
-    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
-        Try
-            If disposing AndAlso components IsNot Nothing Then
-                components.Dispose()
-            End If
-        Finally
-            MyBase.Dispose(disposing)
-        End Try
-    End Sub
-
-    'Wird vom Windows Form-Designer benötigt.
-    Private components As System.ComponentModel.IContainer
-
-    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
-    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
-    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
-    <System.Diagnostics.DebuggerStepThrough()> _
-    Private Sub InitializeComponent()
-        Me.components = New System.ComponentModel.Container()
-        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmUserKonfig_AddUsers))
-        Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
-        Me.lbGroups = New System.Windows.Forms.ListBox()
-        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
-        Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
-        Me.GridControlUsers = New DevExpress.XtraGrid.GridControl()
-        Me.TBAD_UsersBindingSource = New System.Windows.Forms.BindingSource(Me.components)
-        Me.MyDataset = New Global_Indexer.MyDataset()
-        Me.GridViewUsers = New DevExpress.XtraGrid.Views.Grid.GridView()
-        Me.colSelect = New DevExpress.XtraGrid.Columns.GridColumn()
-        Me.colUsername = New DevExpress.XtraGrid.Columns.GridColumn()
-        Me.colPrename = New DevExpress.XtraGrid.Columns.GridColumn()
-        Me.colSurname = New DevExpress.XtraGrid.Columns.GridColumn()
-        Me.colEmail = New DevExpress.XtraGrid.Columns.GridColumn()
-        Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
-        Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
-        Me.tbSelectEverything = New System.Windows.Forms.ToolStripButton()
-        Me.tbSelectNone = New System.Windows.Forms.ToolStripButton()
-        Me.btnCancel = New System.Windows.Forms.Button()
-        Me.btnAddUsers = New System.Windows.Forms.Button()
-        Me.ToolTipController1 = New DevExpress.Utils.ToolTipController(Me.components)
-        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.SplitContainer1.Panel1.SuspendLayout()
-        Me.SplitContainer1.Panel2.SuspendLayout()
-        Me.SplitContainer1.SuspendLayout()
-        Me.ToolStrip1.SuspendLayout()
-        CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).BeginInit()
-        Me.ToolStrip2.SuspendLayout()
-        Me.SuspendLayout()
-        '
-        'SplitContainer1
-        '
-        resources.ApplyResources(Me.SplitContainer1, "SplitContainer1")
-        Me.ToolTipController1.SetAllowHtmlText(Me.SplitContainer1, CType(resources.GetObject("SplitContainer1.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.SplitContainer1.Name = "SplitContainer1"
-        '
-        'SplitContainer1.Panel1
-        '
-        resources.ApplyResources(Me.SplitContainer1.Panel1, "SplitContainer1.Panel1")
-        Me.ToolTipController1.SetAllowHtmlText(Me.SplitContainer1.Panel1, CType(resources.GetObject("SplitContainer1.Panel1.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.SplitContainer1.Panel1.Controls.Add(Me.lbGroups)
-        Me.SplitContainer1.Panel1.Controls.Add(Me.ToolStrip1)
-        Me.ToolTipController1.SetTitle(Me.SplitContainer1.Panel1, resources.GetString("SplitContainer1.Panel1.Title"))
-        Me.ToolTipController1.SetToolTip(Me.SplitContainer1.Panel1, resources.GetString("SplitContainer1.Panel1.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.SplitContainer1.Panel1, CType(resources.GetObject("SplitContainer1.Panel1.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        '
-        'SplitContainer1.Panel2
-        '
-        resources.ApplyResources(Me.SplitContainer1.Panel2, "SplitContainer1.Panel2")
-        Me.ToolTipController1.SetAllowHtmlText(Me.SplitContainer1.Panel2, CType(resources.GetObject("SplitContainer1.Panel2.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.SplitContainer1.Panel2.Controls.Add(Me.GridControlUsers)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.ToolStrip2)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.btnCancel)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.btnAddUsers)
-        Me.ToolTipController1.SetTitle(Me.SplitContainer1.Panel2, resources.GetString("SplitContainer1.Panel2.Title"))
-        Me.ToolTipController1.SetToolTip(Me.SplitContainer1.Panel2, resources.GetString("SplitContainer1.Panel2.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.SplitContainer1.Panel2, CType(resources.GetObject("SplitContainer1.Panel2.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        Me.ToolTipController1.SetTitle(Me.SplitContainer1, resources.GetString("SplitContainer1.Title"))
-        Me.ToolTipController1.SetToolTip(Me.SplitContainer1, resources.GetString("SplitContainer1.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.SplitContainer1, CType(resources.GetObject("SplitContainer1.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        '
-        'lbGroups
-        '
-        resources.ApplyResources(Me.lbGroups, "lbGroups")
-        Me.ToolTipController1.SetAllowHtmlText(Me.lbGroups, CType(resources.GetObject("lbGroups.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.lbGroups.FormattingEnabled = True
-        Me.lbGroups.Name = "lbGroups"
-        Me.ToolTipController1.SetTitle(Me.lbGroups, resources.GetString("lbGroups.Title"))
-        Me.ToolTipController1.SetToolTip(Me.lbGroups, resources.GetString("lbGroups.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.lbGroups, CType(resources.GetObject("lbGroups.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        '
-        'ToolStrip1
-        '
-        resources.ApplyResources(Me.ToolStrip1, "ToolStrip1")
-        Me.ToolTipController1.SetAllowHtmlText(Me.ToolStrip1, CType(resources.GetObject("ToolStrip1.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
-        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripLabel1})
-        Me.ToolStrip1.Name = "ToolStrip1"
-        Me.ToolTipController1.SetTitle(Me.ToolStrip1, resources.GetString("ToolStrip1.Title"))
-        Me.ToolTipController1.SetToolTip(Me.ToolStrip1, resources.GetString("ToolStrip1.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.ToolStrip1, CType(resources.GetObject("ToolStrip1.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        '
-        'ToolStripLabel1
-        '
-        resources.ApplyResources(Me.ToolStripLabel1, "ToolStripLabel1")
-        Me.ToolStripLabel1.Name = "ToolStripLabel1"
-        '
-        'GridControlUsers
-        '
-        resources.ApplyResources(Me.GridControlUsers, "GridControlUsers")
-        Me.GridControlUsers.DataSource = Me.TBAD_UsersBindingSource
-        Me.GridControlUsers.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridControlUsers.EmbeddedNavigator.AccessibleDescription")
-        Me.GridControlUsers.EmbeddedNavigator.AccessibleName = resources.GetString("GridControlUsers.EmbeddedNavigator.AccessibleName")
-        Me.GridControlUsers.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
-        Me.GridControlUsers.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
-        Me.GridControlUsers.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
-        Me.GridControlUsers.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
-        Me.GridControlUsers.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
-        Me.GridControlUsers.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
-        Me.GridControlUsers.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
-        Me.GridControlUsers.EmbeddedNavigator.ToolTip = resources.GetString("GridControlUsers.EmbeddedNavigator.ToolTip")
-        Me.GridControlUsers.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridControlUsers.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
-        Me.GridControlUsers.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridControlUsers.EmbeddedNavigator.ToolTipTitle")
-        Me.GridControlUsers.MainView = Me.GridViewUsers
-        Me.GridControlUsers.Name = "GridControlUsers"
-        Me.GridControlUsers.ShowOnlyPredefinedDetails = True
-        Me.GridControlUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewUsers})
-        '
-        'TBAD_UsersBindingSource
-        '
-        Me.TBAD_UsersBindingSource.DataMember = "TBAD_Users"
-        Me.TBAD_UsersBindingSource.DataSource = Me.MyDataset
-        '
-        'MyDataset
-        '
-        Me.MyDataset.DataSetName = "MyDataset"
-        Me.MyDataset.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
-        '
-        'GridViewUsers
-        '
-        Me.GridViewUsers.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewUsers.Appearance.EvenRow.BackColor"), System.Drawing.Color)
-        Me.GridViewUsers.Appearance.EvenRow.FontSizeDelta = CType(resources.GetObject("GridViewUsers.Appearance.EvenRow.FontSizeDelta"), Integer)
-        Me.GridViewUsers.Appearance.EvenRow.FontStyleDelta = CType(resources.GetObject("GridViewUsers.Appearance.EvenRow.FontStyleDelta"), System.Drawing.FontStyle)
-        Me.GridViewUsers.Appearance.EvenRow.GradientMode = CType(resources.GetObject("GridViewUsers.Appearance.EvenRow.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
-        Me.GridViewUsers.Appearance.EvenRow.Image = CType(resources.GetObject("GridViewUsers.Appearance.EvenRow.Image"), System.Drawing.Image)
-        Me.GridViewUsers.Appearance.EvenRow.Options.UseBackColor = True
-        Me.GridViewUsers.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridViewUsers.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
-        Me.GridViewUsers.Appearance.FocusedRow.FontSizeDelta = CType(resources.GetObject("GridViewUsers.Appearance.FocusedRow.FontSizeDelta"), Integer)
-        Me.GridViewUsers.Appearance.FocusedRow.FontStyleDelta = CType(resources.GetObject("GridViewUsers.Appearance.FocusedRow.FontStyleDelta"), System.Drawing.FontStyle)
-        Me.GridViewUsers.Appearance.FocusedRow.GradientMode = CType(resources.GetObject("GridViewUsers.Appearance.FocusedRow.GradientMode"), System.Drawing.Drawing2D.LinearGradientMode)
-        Me.GridViewUsers.Appearance.FocusedRow.Image = CType(resources.GetObject("GridViewUsers.Appearance.FocusedRow.Image"), System.Drawing.Image)
-        Me.GridViewUsers.Appearance.FocusedRow.Options.UseBackColor = True
-        resources.ApplyResources(Me.GridViewUsers, "GridViewUsers")
-        Me.GridViewUsers.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colSelect, Me.colUsername, Me.colPrename, Me.colSurname, Me.colEmail})
-        Me.GridViewUsers.GridControl = Me.GridControlUsers
-        Me.GridViewUsers.Name = "GridViewUsers"
-        Me.GridViewUsers.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
-        Me.GridViewUsers.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
-        Me.GridViewUsers.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False]
-        Me.GridViewUsers.OptionsSelection.EnableAppearanceFocusedCell = False
-        Me.GridViewUsers.OptionsView.ColumnAutoWidth = False
-        Me.GridViewUsers.OptionsView.EnableAppearanceEvenRow = True
-        Me.GridViewUsers.OptionsView.ShowAutoFilterRow = True
-        Me.GridViewUsers.OptionsView.ShowGroupPanel = False
-        '
-        'colSelect
-        '
-        resources.ApplyResources(Me.colSelect, "colSelect")
-        Me.colSelect.FieldName = "Select"
-        Me.colSelect.Name = "colSelect"
-        Me.colSelect.Summary.AddRange(New DevExpress.XtraGrid.GridSummaryItem() {New DevExpress.XtraGrid.GridColumnSummaryItem()})
-        '
-        'colUsername
-        '
-        resources.ApplyResources(Me.colUsername, "colUsername")
-        Me.colUsername.FieldName = "Username"
-        Me.colUsername.Name = "colUsername"
-        Me.colUsername.OptionsColumn.AllowEdit = False
-        Me.colUsername.Summary.AddRange(New DevExpress.XtraGrid.GridSummaryItem() {New DevExpress.XtraGrid.GridColumnSummaryItem()})
-        '
-        'colPrename
-        '
-        resources.ApplyResources(Me.colPrename, "colPrename")
-        Me.colPrename.FieldName = "Prename"
-        Me.colPrename.Name = "colPrename"
-        Me.colPrename.OptionsColumn.AllowEdit = False
-        '
-        'colSurname
-        '
-        resources.ApplyResources(Me.colSurname, "colSurname")
-        Me.colSurname.FieldName = "Surname"
-        Me.colSurname.Name = "colSurname"
-        Me.colSurname.OptionsColumn.AllowEdit = False
-        '
-        'colEmail
-        '
-        resources.ApplyResources(Me.colEmail, "colEmail")
-        Me.colEmail.FieldName = "Email"
-        Me.colEmail.Name = "colEmail"
-        Me.colEmail.OptionsColumn.AllowEdit = False
-        Me.colEmail.Summary.AddRange(New DevExpress.XtraGrid.GridSummaryItem() {New DevExpress.XtraGrid.GridColumnSummaryItem()})
-        '
-        'ToolStrip2
-        '
-        resources.ApplyResources(Me.ToolStrip2, "ToolStrip2")
-        Me.ToolTipController1.SetAllowHtmlText(Me.ToolStrip2, CType(resources.GetObject("ToolStrip2.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.ToolStrip2.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
-        Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripLabel2, Me.tbSelectEverything, Me.tbSelectNone})
-        Me.ToolStrip2.Name = "ToolStrip2"
-        Me.ToolTipController1.SetTitle(Me.ToolStrip2, resources.GetString("ToolStrip2.Title"))
-        Me.ToolTipController1.SetToolTip(Me.ToolStrip2, resources.GetString("ToolStrip2.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.ToolStrip2, CType(resources.GetObject("ToolStrip2.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        '
-        'ToolStripLabel2
-        '
-        resources.ApplyResources(Me.ToolStripLabel2, "ToolStripLabel2")
-        Me.ToolStripLabel2.Name = "ToolStripLabel2"
-        '
-        'tbSelectEverything
-        '
-        resources.ApplyResources(Me.tbSelectEverything, "tbSelectEverything")
-        Me.tbSelectEverything.Image = Global.Global_Indexer.My.Resources.Resources.CheckOutforEdit_13187_32x
-        Me.tbSelectEverything.Name = "tbSelectEverything"
-        '
-        'tbSelectNone
-        '
-        resources.ApplyResources(Me.tbSelectNone, "tbSelectNone")
-        Me.tbSelectNone.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
-        Me.tbSelectNone.Name = "tbSelectNone"
-        '
-        'btnCancel
-        '
-        resources.ApplyResources(Me.btnCancel, "btnCancel")
-        Me.ToolTipController1.SetAllowHtmlText(Me.btnCancel, CType(resources.GetObject("btnCancel.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.btnCancel.Name = "btnCancel"
-        Me.ToolTipController1.SetTitle(Me.btnCancel, resources.GetString("btnCancel.Title"))
-        Me.ToolTipController1.SetToolTip(Me.btnCancel, resources.GetString("btnCancel.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.btnCancel, CType(resources.GetObject("btnCancel.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        Me.btnCancel.UseVisualStyleBackColor = True
-        '
-        'btnAddUsers
-        '
-        resources.ApplyResources(Me.btnAddUsers, "btnAddUsers")
-        Me.ToolTipController1.SetAllowHtmlText(Me.btnAddUsers, CType(resources.GetObject("btnAddUsers.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.btnAddUsers.Image = Global.Global_Indexer.My.Resources.Resources.add
-        Me.btnAddUsers.Name = "btnAddUsers"
-        Me.ToolTipController1.SetTitle(Me.btnAddUsers, resources.GetString("btnAddUsers.Title"))
-        Me.ToolTipController1.SetToolTip(Me.btnAddUsers, resources.GetString("btnAddUsers.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me.btnAddUsers, CType(resources.GetObject("btnAddUsers.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        Me.btnAddUsers.UseVisualStyleBackColor = True
-        '
-        'frmUserKonfig_AddUsers
-        '
-        resources.ApplyResources(Me, "$this")
-        Me.ToolTipController1.SetAllowHtmlText(Me, CType(resources.GetObject("$this.AllowHtmlText"), DevExpress.Utils.DefaultBoolean))
-        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.Controls.Add(Me.SplitContainer1)
-        Me.Name = "frmUserKonfig_AddUsers"
-        Me.ToolTipController1.SetTitle(Me, resources.GetString("$this.Title"))
-        Me.ToolTipController1.SetToolTip(Me, resources.GetString("$this.ToolTip"))
-        Me.ToolTipController1.SetToolTipIconType(Me, CType(resources.GetObject("$this.ToolTipIconType"), DevExpress.Utils.ToolTipIconType))
-        Me.SplitContainer1.Panel1.ResumeLayout(False)
-        Me.SplitContainer1.Panel1.PerformLayout()
-        Me.SplitContainer1.Panel2.ResumeLayout(False)
-        Me.SplitContainer1.Panel2.PerformLayout()
-        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
-        Me.SplitContainer1.ResumeLayout(False)
-        Me.ToolStrip1.ResumeLayout(False)
-        Me.ToolStrip1.PerformLayout()
-        CType(Me.GridControlUsers, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.GridViewUsers, System.ComponentModel.ISupportInitialize).EndInit()
-        Me.ToolStrip2.ResumeLayout(False)
-        Me.ToolStrip2.PerformLayout()
-        Me.ResumeLayout(False)
-
-    End Sub
-    Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer
-    Friend WithEvents btnCancel As System.Windows.Forms.Button
-    Friend WithEvents btnAddUsers As System.Windows.Forms.Button
-    Friend WithEvents lbGroups As System.Windows.Forms.ListBox
-    Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
-    Friend WithEvents ToolStripLabel1 As System.Windows.Forms.ToolStripLabel
-    Friend WithEvents ToolStrip2 As System.Windows.Forms.ToolStrip
-    Friend WithEvents tbSelectEverything As System.Windows.Forms.ToolStripButton
-    Friend WithEvents tbSelectNone As System.Windows.Forms.ToolStripButton
-    Friend WithEvents ToolStripLabel2 As System.Windows.Forms.ToolStripLabel
-    Friend WithEvents ToolTipController1 As DevExpress.Utils.ToolTipController
-    Friend WithEvents GridControlUsers As DevExpress.XtraGrid.GridControl
-    Friend WithEvents TBAD_UsersBindingSource As System.Windows.Forms.BindingSource
-    Friend WithEvents MyDataset As Global_Indexer.MyDataset
-    Friend WithEvents GridViewUsers As DevExpress.XtraGrid.Views.Grid.GridView
-    Friend WithEvents colSelect As DevExpress.XtraGrid.Columns.GridColumn
-    Friend WithEvents colUsername As DevExpress.XtraGrid.Columns.GridColumn
-    Friend WithEvents colPrename As DevExpress.XtraGrid.Columns.GridColumn
-    Friend WithEvents colSurname As DevExpress.XtraGrid.Columns.GridColumn
-    Friend WithEvents colEmail As DevExpress.XtraGrid.Columns.GridColumn
-End Class

Global_Indexer/frmUserKonfig_AddUsers.en-US.resx

@@ -1,594 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<root>
-  <!-- 
-    Microsoft ResX Schema 
-    
-    Version 2.0
-    
-    The primary goals of this format is to allow a simple XML format 
-    that is mostly human readable. The generation and parsing of the 
-    various data types are done through the TypeConverter classes 
-    associated with the data types.
-    
-    Example:
-    
-    ... ado.net/XML headers & schema ...
-    <resheader name="resmimetype">text/microsoft-resx</resheader>
-    <resheader name="version">2.0</resheader>
-    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
-    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
-    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
-    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
-    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
-        <value>[base64 mime encoded serialized .NET Framework object]</value>
-    </data>
-    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
-        <comment>This is a comment</comment>
-    </data>
-                
-    There are any number of "resheader" rows that contain simple 
-    name/value pairs.
-    
-    Each data row contains a name, and value. The row also contains a 
-    type or mimetype. Type corresponds to a .NET class that support 
-    text/value conversion through the TypeConverter architecture. 
-    Classes that don't support this are serialized and stored with the 
-    mimetype set.
-    
-    The mimetype is used for serialized objects, and tells the 
-    ResXResourceReader how to depersist the object. This is currently not 
-    extensible. For a given mimetype the value must be set accordingly:
-    
-    Note - application/x-microsoft.net.object.binary.base64 is the format 
-    that the ResXResourceWriter will generate, however the reader can 
-    read any of the formats listed below.
-    
-    mimetype: application/x-microsoft.net.object.binary.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
-            : and then encoded with base64 encoding.
-    
-    mimetype: application/x-microsoft.net.object.soap.base64
-    value   : The object must be serialized with 
-            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
-            : and then encoded with base64 encoding.
-
-    mimetype: application/x-microsoft.net.object.bytearray.base64
-    value   : The object must be serialized into a byte array 
-            : using a System.ComponentModel.TypeConverter
-            : and then encoded with base64 encoding.
-    -->
-  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
-    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
-    <xsd:element name="root" msdata:IsDataSet="true">
-      <xsd:complexType>
-        <xsd:choice maxOccurs="unbounded">
-          <xsd:element name="metadata">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" />
-              </xsd:sequence>
-              <xsd:attribute name="name" use="required" type="xsd:string" />
-              <xsd:attribute name="type" type="xsd:string" />
-              <xsd:attribute name="mimetype" type="xsd:string" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="assembly">
-            <xsd:complexType>
-              <xsd:attribute name="alias" type="xsd:string" />
-              <xsd:attribute name="name" type="xsd:string" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="data">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
-              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
-              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
-              <xsd:attribute ref="xml:space" />
-            </xsd:complexType>
-          </xsd:element>
-          <xsd:element name="resheader">
-            <xsd:complexType>
-              <xsd:sequence>
-                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
-              </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" use="required" />
-            </xsd:complexType>
-          </xsd:element>
-        </xsd:choice>
-      </xsd:complexType>
-    </xsd:element>
-  </xsd:schema>
-  <resheader name="resmimetype">
-    <value>text/microsoft-resx</value>
-  </resheader>
-  <resheader name="version">
-    <value>2.0</value>
-  </resheader>
-  <resheader name="reader">
-    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <resheader name="writer">
-    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
-  </resheader>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="ToolStripLabel1.Size" type="System.Drawing.Size, System.Drawing">
-    <value>101, 22</value>
-  </data>
-  <data name="ToolStripLabel1.Text" xml:space="preserve">
-    <value>Available groups:</value>
-  </data>
-  <data name="colSelect.Caption" xml:space="preserve">
-    <value>Selection</value>
-  </data>
-  <data name="ToolStripLabel2.Size" type="System.Drawing.Size, System.Drawing">
-    <value>92, 22</value>
-  </data>
-  <data name="ToolStripLabel2.Text" xml:space="preserve">
-    <value>Available users:</value>
-  </data>
-  <data name="tbSelectEverything.Size" type="System.Drawing.Size, System.Drawing">
-    <value>73, 22</value>
-  </data>
-  <data name="tbSelectEverything.Text" xml:space="preserve">
-    <value>Select all</value>
-  </data>
-  <data name="tbSelectNone.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
-        YKxG6WBogkMZKgPNCEVJFBGdGETEvgwyO9DJE5syZw3PIlPEE9pgBCLZ5XvdMB8Ew8gXbl54nuf63dd9
-        0OGSnwCahxbPRNPAPMw9Xpg6ZmF46kZZ0xSKzJPIrhpDWsVnpBhGkKx3nAX8Pv7z1zg8OoY/cITdn4fw
-        bf/C0kYAN3Ma/w3gWfZL5kzTKBxjWyK2DftwI9tyMYCZKXbNHaD91bLYJrDXsYbrWfUKwJrPE9M2M1Oc
-        VzOOpHI7Jr376Hi9ogHqFIANO0/MmmmbmSmm9a8ze+I4MrNWAdjtoJgWcx+PSzg166yZZ8xM8XvXDix9
-        c4jIqFYAjoriBV9AhEPv1mH/sonogha0afbZMMZz+yreTGyhpusHwtNNCsA5U1zS4BLxzJIfg299qO32
-        Ir7UJtZfftyATqeT+8o2D8JSjQrAJblrncYL7ZJ2+bfaFnC/1S1NjL3diRat7qrO7wLRP3HjWsojBeCo
-        mDEo5mNjuweFGvjWg2EBhCbpkW78htSHHwRyNdmgAFzPEee2iFkzayy2OLXzT4gr6UdUnlXrullsxxQ+
-        kx0g8BTA3aZlButjSTyjODq/WcQcW/B/Je4OQhLvKQDnzN1mp0nnkvAhR8VuMzNrpm1mpjgkoVwB/v8D
-        TgDQASA1MVpwzwAAAABJRU5ErkJggg==
-</value>
-  </data>
-  <data name="tbSelectNone.Size" type="System.Drawing.Size, System.Drawing">
-    <value>72, 22</value>
-  </data>
-  <data name="tbSelectNone.Text" xml:space="preserve">
-    <value>Select none</value>
-  </data>
-  <data name="btnCancel.Text" xml:space="preserve">
-    <value>Cancel</value>
-  </data>
-  <data name="btnAddUsers.Text" xml:space="preserve">
-    <value>Add</value>
-  </data>
-  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        AAABAAkAMDAQAAEABABoBgAAlgAAACAgEAABAAQA6AIAAP4GAAAQEBAAAQAEACgBAADmCQAAMDAAAAEA
-        CACoDgAADgsAACAgAAABAAgAqAgAALYZAAAQEAAAAQAIAGgFAABeIgAAMDAAAAEAIACoJQAAxicAACAg
-        AAABACAAqBAAAG5NAAAQEAAAAQAgAGgEAAAWXgAAKAAAADAAAABgAAAAAQAEAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAIAAAAAAAACAgACAAAAAgACAAICAAADAwMAAgICAAAAA/wAA/wAAAP//AP8A
-        AAD/AP8A//8AAP///wAiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIi
-        IiIiIiIiIiIiIiIiIiAAAyIiIiIiIiIiIiIiIiIiIiIiIiIiIgAAADIiIiIiIiIiIiIiIiIiIiIiIiIi
-        IAC7sAMiIiIiIiIiIiIiIiIiIiIiIiIiIAsHuwAyIiIiIiIiIiIiIiIiIiIiIiIiILuAe7ADIiIiIiIi
-        IiIiIiIiLMAAAAAAALO4B7sAMiIiIiIiIiIiIiLAAADMZmZmwLs7gHuwAyIiIiIiIiIiLAAAxmZmzMzM
-        wACzuAe7ADIiIiIiIiIsAAZmzMzMzMzMAAC7u4B7sAMzMzMzIiLABszMzMzMzMzAAAAAC7gHuwAAAAAA
-        MiIAbMzMzMAAAAwAAAAACzuAe7gzMzMwAyIGzMzMAAODcwAAABEAC7u4C7u7u7uzADIAzMwAODc3NzAB
-        GRkQAAC7uwuwi7u7MAMgDMCDc3Nzc4ARERERAAALsLsIu3i7swMiAMA3Nzc3NwABODg4AiILC7CLtxe7
-        swMiIABzc3NzgwODg4OAIiILuwi7cHu7swMiIgA3Nzc3OAg4ODgCIiILsIu3F7u7swMiIiADc3OAAAAA
-        g4AiIiILCLtwe3d3swMiIiAINzg4Nzc3CDAiIiI7i7cXswADswMiIiADg3Nzc3N3A4AiIiI7u3B7MIIg
-        swMiIgAACDc3Nzc3AAAAACI7txe7MIIDswMiIAAAAHNzc3ODA4ODgwI7uHu7MIA7sDIiAAAAADc4Nzc3
-        CDg4OAIju7u7MwO7AyIiAAAAA3ODc3NzAIODgwIiO7u7u7uwMiIgAAAIdzc3N3c3Nwg4MAIiI7u7u7sD
-        IiIAAAADc4Nzd3NzcwODgwIiIjMzMzMyIiIAAAAHdzc3d3c3MDg4OAAiIiIiIiIiIiIAAAADc3Nzc3Nz
-        cIODg4MCIiIiIiIiIiIAAAAANzg3NzA3MDg4ODgCIiIiIiIiIiIAAAAAAACDc3AAAIODg4AiIiIiIiIi
-        IiIAAAAAAAA4Nzc3ADg4ODAiIiIiIiIiIiIAAAAAAAADc3NzcIOAg4AiIiIiIiIiIiIAAAAAAAAANzc3
-        cDgwAAgiIiIiIiIiIiIAAAAAAAAAA3NzcIODgwgiIiIiIiIiIiIAAAAAAAAAADc3MDg4OAgiIiIiIiIi
-        IiIgAAAAAAAAAAAAAIODg4AiIiIiIiIiIiIgAAAAAAAAAAAAADg4ODAiIiIiIiIiIiIiAAAAAAAAAAAA
-        AACDg4ACIiIiIiIiIiIiIAAAAAAAAAAAAAAAAAACIiIiIiIiIiIiIgAAAAAAAAAAAAAAAAACIiIiIiIi
-        IiIiIiIAAAAAAAAAAAAAAAACIiIiIiIiIiIiIiIiIiAAAAAAAAAAAAAiIiIiIiIiIiIiIiIiIiIAAAAA
-        AAAAACIiIiIiIiIiIiIiIiIiIiIiAAAAAAAAIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIi
-        IiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiL///////8AAP///////wAA///+D///AAD///wH//8AAP//
-        +AP//wAA///4Af//AAD///gA//8AAP+AAAB//wAA/AAAAD//AADgAAAAH/8AAIAAAAAADwAAAAAAAAAH
-        AAAAAAAAAAMAAAAAAAAAAQAAAAAAAAAAAACAAAAAAAAAAMAAABwAAAAA4AAAPAAAAADwAAB8AAAAAPgA
-        APwAAAAA+AAA/AAAAAD4AAD8AGAAAPAAAAwAQAAA4AAABAABAADAAAAGAAMAAMAAAAcABwAAgAAAB4AP
-        AAAAAAAHwB8AAAAAAAP//wAAAAAAAf//AAAAAAAB//8AAAAAAAP//wAAAAAAA///AAAAAAAD//8AAAAA
-        AAP//wAAAAAAA///AAAAAAAD//8AAIAAAAP//wAAgAAAA///AADAAAAB//8AAOAAAAH//wAA8AAAAf//
-        AAD8AAAB//8AAP/gAAP//wAA//AAD///AAD//AA///8AAP///////wAA////////AAAoAAAAIAAAAEAA
-        AAABAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAAAICAAIAAAACAAIAAgIAAAMDA
-        wACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////ACIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIAAy
-        IiIiIiIiIiIiIiIiIgCIAyIiIiIiIiIiIiIiIiIHC4AyIiIiIiIiIiiAAAAAC3C4AyIiIiIiIoAAAAzM
-        zAC3C4AyIiIiIoAADMzMzMABAHC4AzMzMiIADMzAAMwAERC3C4AAAAMiDMzAA4MAARGRALC7u7uAMiDM
-        CDc3MAhziRALsws7uAMgAHdzeAGDhzAiCzCzC7sDIgA3N4MAOHMCIgsLMLu7AyIgA3MBAQOAIiI7swgA
-        iwMiIAc3g4dwMCIiOzCwggsDIgAAd3d38AAAIjt7sIC7gyAAAAd3dzE4NwIju7gLuDIgAAB3c3dwA4cC
-        Iju7u4MiAAAHdzd/d3A4EiIjMzMyIgAAB3d3938DgwAiIiIiIiIAAAA3d3B3CHdzAiIiIiIiAAAAADdx
-        AAd3MCIiIiIiIgAAAAADd3ADCHAiIiIiIiIAAAAAADf3CBADIiIiIiIiAAAAAAADdwN3CCIiIiIiIiAA
-        AAAAAAAIc3AiIiIiIiIgAAAAAAAAADcwAiIiIiIiIgAAAAAAAAAAAAIiIiIiIiIiAAAAAAAAAAACIiIi
-        IiIiIiIgAAAAAAAAIiIiIiIiIiIiIiAAAAAAIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIiIi
-        IiIiIiIi///////+H////A////wH//gAA//AAAH/AAAABwAAAAMAAAABgAAAAIAAMADAAHAA4ADwAOAA
-        8BDAADAAgAAYAYAAHAMAAB4HAAAP/wAAB/8AAA//AAAP/wAAD/8AAA//gAAP/4AAB//AAAf/8AAH//4A
-        D///gD////////////8oAAAAEAAAACAAAAABAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        gAAAAAAAAICAAIAAAACAAIAAgIAAAMDAwACAgIAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////ACIi
-        IiIAMiIiIiIiIDsDIiIiDMRAsLAyIgzMzMwLCwAyDMAAABCwuwMAB3ARkjuzsCB3gAAiOzCwIgh3cAA7
-        uzMgBzdwhwMzMgB3f3cIAiIiAHd3AHOIIiIAAHfwMAIiIgAAB3CHAiIiAAAAADgAIiIgAAAAAAAiIiIg
-        AAAAAiIi/x/AA/4PARHAB7C7AAGAMgAACDcAQAhzgMALs8AAuAOAAXdzAB+DhwAPCzAAH7sDAB83NwAP
-        OHOADwsL4B+7AygAAAAwAAAAYAAAAAEACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////ABEM
-        aQAAAAAANBpLAAAAAAB/TG4AYF5eAP1lVAD8ZFMA/WZVAPljUAD9alcA/WtYAL+LhADnWD4A711GAP1y
-        XAD9dV4A/XhgAPFoTgDzbVMA/XxkANxRMQD4e18A/YRpANJMJwDvdlYA/IttAP2OcADNSCEA4GZCALFl
-        TQD+knIAwEATAKU/GQDSXDIA1WI3AOuAWQD5km8At0YbAMVXKwDMXS8At1cxAH5AJwCFRy4A6Zp6AGxV
-        TACMUDYA13RFAGpjXwDViFUAbUkxAP+/kQCsZSsA7riKAJpYGQD/798A/8+cAP/ZpgDf0bwAhWAaAP3j
-        sAD/9+gAkXkwAP//8gD///wAv9msAICrZwDP4sUAcKlfAEiQNwBtxGIAespvAEyZRgBqqWYAL5gtAAqF
-        CgAWihYAGpYaAB6PHgAZdxkAKa0pACOQIwAbaBsAPLc8AEO7QwBAs0AAJWYlADmaOQBKvkoAT8FPAESm
-        RABSwlIATbNNAFC4UABWxFYAW8VbAGPKYwBpzWkAb9FvAGfAZwBFfkUAddJ1AHHLcQB813wAj+CPAICz
-        gAA1WTgAn7CkADd9VwACaHYAaZquABNyogAYdqYAF2OKACBggQAsWG8AE1+IACR+rgA5n9kAOou3AD+V
-        wwBHn9AAV6nXAGOr0gCezOYAo9DqAA1zswAkfbYAIm6dAD2i3wBNs/IAU7n5AHq74QCEwOQAlMjnAJfK
-        6ACezekAFXm6ACOFxgBDqO0AUbf/AFW7/wBWvP8AWmBkABuBzQAfhdQAS7H/AE2z/wBOtP8AQnOZACeM
-        4gAtkuYARKn/AESq/wBHrf8ASa//ACyS8QA6oP8APKH/AD2i/wBApv8AQ6j/ADKW/AAylfsAM5n/ADWb
-        /wA3nf8AEliiAC+M8wAxkfkANpT3AAkSHAAXY7oAKnziAC2C6gAndNoAJnHXACl64AAod90AIWK1ACNo
-        zgAkatAAFlOwAB5fwgAgYMYAImXLABBCngAcVrwAI2jdAB5awAAQLFsADhksABtRtwAaTbMADSloAB1W
-        0gAWQZ4AGUiuAAUpgwAUP6QAFDyiABQ6oAASNZsADCV+AA8tkwAQL5UABQcOAAgdbAANJo0ABxVbAAYY
-        ewAuNFcAHyApAAQMcgABAhUAAQRqAKSkpACXl5cAj4+PAISEhAB+fn4AcXFxAG1tbQBmZmYAVFRUAE1N
-        TQBKSkoARkZGAD8/PwA4ODgANjY2AC8vLwAsLCwAKioqACgoKAAkJCQAISEhAB8fHwAcHBwAGhoaABgY
-        GAAXFxcAEhISAA0NDQAKCgoAAgICAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF4ODhMuEy4TIy4TLh4eDg
-        4ODgBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQXg4SMsIiMiIyIjIiMjIywsNC/h4eAFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBeAoIiIeGhcPFxALCwkQDyIiIiIjIzTg4QUFBQUFBeDg4ODg4ODg4ODg
-        4AUFBQUFBSsiIhoaFw8QCwgIDAwNDygiEAsPGiIjNODg4eEH4eJsWGxYbFhsWGxs4+HgBQUFBSseGhoP
-        DwsJDA0RERERIjcpDwoJCxcaIjRYVE1UVE1QU1NTU05OT01NTVRY4AUFBSsoGg8XCwkMERMWFhYaKz4z
-        HhENCAsPFyJRWVZbTU1fWltbVlZVUlJST09N4uAFBTMiFw8LCA0RFhYZGTEoOz47IhYRDQkLDyJKW11Z
-        TFFZYGFdXVtWVlJSUk9NbOAFBTEiDxAJDRETGRkdGSIuPj4+KxQWEQ0IDyJKYGFObUNNYmJiYF1bVlZV
-        UlJNWOAFBQUjFwsMERYZGR0hHio7Ozs7MxcZFhEMECJGYWJUPkFKU2hjY2JgXVZWVVJNbOAFBQUxIgsN
-        ExYZHSEqKTo7Ozs7MykZFhMNCyJiZF9TPz85UV5oZGNiYFtWVVJN4OAFBQUFKx4RFhkdJyYiNzU6OjU6
-        Lh4dGRYRFzhkZ1lrQUFBbU1oaWdjYmFbVlJU4AUFBQUFBSIXFhkdJiImNzo3NTo6LiIdGRMfIkRnZ05D
-        QkJCQmtRaWlkYmFdVk1m4AUFBQUFBQUrKSYbIjEOIAYGDiE3NyIdGR8iQGdpalQ/AQEBAT9TSmlnZGJg
-        UFTgBQUFBQUFBQUFMTEiIwTX2dfZ19kGJiIxKCNGSGdpak0/Pz8/Pz9DVF5pZGJMVOEFBQUFBQUFBQUF
-        4OnvwdPU0tLS0s3ZBCMjIFRcZ2lqaFQ5OTk+OTk+alRlZ0xU4AUFBQUFBQUFBQX1APf3AADTz8/Pz8/S
-        1wIFBQVUTmVqZVM+bXdxcXF320RNUVTgBQUFBQUFBQUF8AD29/YA0NPNzMvLy8vMz9nVBQUFTVROWU13
-        gJKSkpKSgHZUWOAFBQUFBQUFBQXw9/b19fatzMfHx8fHx8fHy87XBQUFBQUFZnaLk5iTmJOTmJJx4+AF
-        BQUFBQUFBQX39fX09ADOx8PDw8PDw8PDw8fU1QUFBQUFl5KYmZmenpmZmJiScePgBQUFBQUFBQD19PTw
-        9K3Dw729vb25vb29vcPSxAUFBQUFgKWmpqampqampqWeknbgBQUFBQUFBfb08PDw9MC9vbm7u7u7u7u5
-        ub3HyAUFBQWAnqenqKioqKiop6empot14AUFBQUFBfXw8O3t9NG6u7q3t7e3t7e3u7q6zcgFBQWAqJ+f
-        oaGhoaGhn5+op6V24AUFBQUFBfTt7err8cG3t7KytLS0tLSysre7yMgFBQWAoaGhoqKioqKioaGhn5+L
-        deAFBQUFBfDt6uvo6q2ytLSvsLCwsK+wtLKyvMgFBZeeoqObm5ycnJubo6OioaGYdeAFBQUFBfTq6+jo
-        5/e7r7CqqqqqqqqwsLC0vHYFBXmNm5ydnZSUlJSdnZybo6KhduAFBQUFBfTo6Ojn5vHIqqqmpqanpqal
-        qrCwvMgFBZebnZWVlpaOjpaWlZWdnKOigOAFBQUFBfbo6ebl5ujQtLCqqqefn6inpqWeyAUFBXmUlY6O
-        j5CQkJCOjo6VlJybkuAFBQUFBfDq5ubl5OTxwcvDt7exsKunpqaYyAUFBZeWjo+QkJCQkJCQkI6OlpWd
-        kuAFBQUFBQX15uXk4uPi6vT2rdHJvcW3t7LA8gUFBXmNkJCQkJCQkJCQkJCPjpaVi+AFBQUFBQX16OTk
-        5uIH4N/f5vHY08TUxK0A6AUFBZeDkJB4jIt4m5WWjo6OlpSMceAFBQUFBQUF9uTi4uLh393a2tsH6fD0
-        8Or3BQUFBXmMjHGLenqMcYuTmKekmItyduAFBQUFBQUF9fXiB+Hg393b2kNt3d8H5PTtBQUFBQVxcXKM
-        eHx8fYZ6eXFyd3dxc+AFBQUFBQUFBfX04uHf3t3d3Nra294H6/YFBQUFBQUFcXp6fHx9h4d/f399cIGA
-        dAUFBQUFBQUFBQX19eLe3dzb3d7f4OLt9gUFBQUFBQUFcXp8fX2Hh35/f4d8end24AUFBQUFBQUFBQUF
-        BfXw4t7b3eDk7vbmBQUFBQUFBQUFBXF8fYeHiYeHfXx8enGXBQUFBQUFBQUFBQUFBQUF9fUAAPXoBQUF
-        BQUFBQUFBQUFBQVxfYd+f4qHh318cnkFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        cXmHf39+fHdyBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBXmXeZd5l3kFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF
-        BQUFBQUFBQUFBQUFBQUFBQUF////////AAD///////8AAP///////wAA////////AAD///////8AAP//
-        /////wAA4AAH////AADAAAH///8AAIAAAH4AHwAAgAAAAAAHAACAAAAAAAMAAIAAAAAAAQAAgAAAAAAB
-        AACAAAAAAAEAAMAAAAAAAQAAwAAAAAABAADgAAAAAAMAAPAAAAAAAwAA+AAAAAAHAAD8AAAAAA8AAPwA
-        AAAAHwAA+AAOAAA/AADgAAcAAH8AAMAAB+AAfwAAwAAD4AA/AACAAAPgAD8AAIAAA8AAHwAAgAABwAAf
-        AACAAAHAAA8AAIAAAYAADwAAgAABgAAPAACAAAGAAA8AAIAAA4AADwAAgAADgAAPAADAAAOAAA8AAMAA
-        A4AADwAA4AAHgAAPAADgAAfAAA8AAPAAD+AAHwAA+AAf4AAfAAD+AD/wAD8AAP+B//gAfwAA/////AH/
-        AAD////+A/8AAP///////wAA////////AAD///////8AAP///////wAAKAAAACAAAABAAAAAAQAIAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AEQxpAAAAAAA0GksATCFPAH9MbgBgXl4A/WVUAPxk
-        UwD9ZlUA+WNQAP1qVwD9a1gAv4uEAOdYPgDvXUYA/XJcAP11XgD9eGAA8WhOAPNtUwD9fGQA3FExAPh7
-        XwD9hGkA0kwnAO92VgD8i20A/Y5wAM1IIQDgZkIAsWVNAP6ScgDAQBMApT8ZANJcMgDVYjcA64BZAPmS
-        bwC3RhsAxVcrAMxdLwC3VzEAfkAnAIVHLgDpmnoAbFVMAIxQNgDXdEUAamNfANWIVQBtSTEA/7+RAKxl
-        KwDuuIoAmlgZAP/v3wD/z5wA/9mmAN/RvACFYBoA/eOwAP/36ACReTAA///yAP///AC/2awAgKtnAM/i
-        xQBwqV8ASJA3AG3EYgB6ym8ATJlGAGqpZgAvmC0ACoUKABaKFgAalhoAHo8eABl3GQAprSkAI5AjABto
-        GwA8tzwAQ7tDAECzQAAlZiUAOZo5AEq+SgBPwU8ARKZEAFLCUgBNs00AULhQAFbEVgBbxVsAY8pjAGnN
-        aQBv0W8AZ8BnAEV+RQB10nUAcctxAHzXfACP4I8AgLOAADVZOACfsKQAN31XAAJodgBpmq4AE3KiABh2
-        pgAXY4oAIGCBACxYbwATX4gAJH6uADmf2QA6i7cAP5XDAEef0ABXqdcAY6vSAJ7M5gCj0OoADXOzACR9
-        tgAibp0APaLfAE2z8gBTufkAervhAITA5ACUyOcAl8roAJ7N6QAVeboAI4XGAEOo7QBRt/8AVbv/AFa8
-        /wBaYGQAG4HNAB+F1ABLsf8ATbP/AE60/wBCc5kAJ4ziAC2S5gBEqf8ARKr/AEet/wBJr/8ALJLxADqg
-        /wA8of8APaL/AECm/wBDqP8AMpb8ADKV+wAzmf8ANZv/ADed/wASWKIAL4zzADGR+QA2lPcACRIcABdj
-        ugAqfOIALYLqACd02gAmcdcAKXrgACh33QAhYrUAI2jOACRq0AAWU7AAHl/CACBgxgAiZcsAEEKeABxW
-        vAAjaN0AHlrAABAsWwAOGSwAG1G3ABpNswANKWgAHVbSABZBngAZSK4ABSmDABQ/pAAUPKIAFDqgABI1
-        mwAMJX4ADy2TABAvlQAFBw4ACB1sAA0mjQAHFVsABhh7AC40VwAfICkABAxyAAECFQABBGoApKSkAJeX
-        lwCPj48AhISEAH5+fgBxcXEAbW1tAGZmZgBUVFQATU1NAEpKSgBGRkYAPz8/ADg4OAA2NjYALy8vACws
-        LAAqKioAKCgoACQkJAAhISEAHx8fABwcHAAaGhoAGBgYABcXFwASEhIADQ0NAAoKCgACAgIAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAODg4ODg4ODg4OAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAODgMC0tLS0tLTQvMuDg4AAAAAAAAAAAAAAAAAAAAAAAKyIaFw8QCwgIHhoaIywv4ODg4ODg
-        4ODg4ODg4OAAAAAiGhcQCQwREhQzKgoLDyI0WFhUUVNQUFBOUVRs4OAAACIXEAoRExYZKT4zFQwJEDhX
-        W0xTXV1aVlVSUk1R4AAAKQ8JERMZHCU3PjcfEwwLNmBhRkReYmFdVlVST1HgAAAqDw0TGSEmMzs7OyQZ
-        Ego2Y1xDP0pnY2JgVlVPUeAAAAAqGxYcJyo6Ojo6MRwTFEBnWUFBRVlpZGJbVVHgAAAAAAAlGxwqLg4O
-        NzUxHRgoSWlLQgEBa2VpY2FMUQAAAAAAAAAgKAXZ19cCBiQkPUhpaks/Pzk5SmhkX2YAAAAAAAAA5PL3
-        2M3Pz87UBAdLWWRqRDxweXBtR1xmAAAAAAAAAPT29tDEzMrKysvU1QAASkpugJKTkotvbOAAAAAAAADy
-        9fT1xMfHw8PDx8nRAAAAAACenp6enpN2B+AAAAAAAPTz8fXCvb+/ub+9vcipAACBpqenp6empph14AAA
-        AADw8e/twbq7tre3t7u7vHUAcZigoKCgoKCfqIuR4AAAAPDu7Orzt7G0s7OztLK41QBxoaOam5ubo6Kh
-        mXXgAAAA8Ovp6O21sKqrpauqr7l1AHGbnJSUlJSdnJqidOAAAADw6+fm5sCqq6efp6akrnUAcZSVjo6O
-        jpaVnZuC4AAAAADw5uXj6sDGxb6wrKupqQBxjo+QkJCQj46WlIvgAAAAAOvm5OQH4ePW09LMxK0AAHGQ
-        hYN4hI6QhY6NceAAAAAAAOvi4uHd29rf5enr5gAAcYtxjHp5jJKTjHdzAAAAAAAAAO4H393c2tre5PEA
-        AACLcXp7fIaJfn16cpcAAAAAAAAAAOzh3Nvd4OXpAAAAAABxeXyGh4p+fXpxAAAAAAAAAAAAAOzs7Ozs
-        7AAAAAAAAABxe4h/iIZ8dwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABxcXFxcXEAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA/////////////////////+AH//+AAP//gAAAA4AA
-        AAGAAAABgAAAAYAAAAHAAAAD4AAAB/AAAA/gAAAfwAMAH4AD4A+AAYAPAAEABwABAAcAAQAHAAEAB4AB
-        AAeAAwAHwAMAD+AHAA/wD4Af+B/AP///4H////////////////8oAAAAEAAAACAAAAABAAgAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAP///wARDGkAAAAAADQaSwBMIU8Af0xuAGBeXgD9ZVQA/GRTAP1m
-        VQD5Y1AA/WpXAP1rWAC/i4QA51g+AO9dRgD9clwA/XVeAP14YADxaE4A821TAP18ZADcUTEA+HtfAP2E
-        aQDSTCcA73ZWAPyLbQD9jnAAzUghAOBmQgCxZU0A/pJyAMBAEwClPxkA0lwyANViNwDrgFkA+ZJvALdG
-        GwDFVysAzF0vALdXMQB+QCcAhUcuAOmaegBsVUwAjFA2ANd0RQBqY18A1YhVAG1JMQD/v5EArGUrAO64
-        igCaWBkA/+/fAP/PnAD/2aYA39G8AIVgGgD947AA//foAJF5MAD///IA///8AL/ZrACAq2cAz+LFAHCp
-        XwBIkDcAbcRiAHrKbwBMmUYAaqlmAC+YLQAKhQoAFooWABqWGgAejx4AGXcZACmtKQAjkCMAG2gbADy3
-        PABDu0MAQLNAACVmJQA5mjkASr5KAE/BTwBEpkQAUsJSAE2zTQBQuFAAVsRWAFvFWwBjymMAac1pAG/R
-        bwBnwGcARX5FAHXSdQBxy3EAfNd8AI/gjwCAs4AANVk4AJ+wpAA3fVcAAmh2AGmargATcqIAGHamABdj
-        igAgYIEALFhvABNfiAAkfq4AOZ/ZADqLtwA/lcMAR5/QAFep1wBjq9IAnszmAKPQ6gANc7MAJH22ACJu
-        nQA9ot8ATbPyAFO5+QB6u+EAhMDkAJTI5wCXyugAns3pABV5ugAjhcYAQ6jtAFG3/wBVu/8AVrz/AFpg
-        ZAAbgc0AH4XUAEux/wBNs/8ATrT/AEJzmQAnjOIALZLmAESp/wBEqv8AR63/AEmv/wAskvEAOqD/ADyh
-        /wA9ov8AQKb/AEOo/wAylvwAMpX7ADOZ/wA1m/8AN53/ABJYogAvjPMAMZH5ADaU9wAJEhwAF2O6ACp8
-        4gAtguoAJ3TaACZx1wApeuAAKHfdACFitQAjaM4AJGrQABZTsAAeX8IAIGDGACJlywAQQp4AHFa8ACNo
-        3QAeWsAAECxbAA4ZLAAbUbcAGk2zAA0paAAdVtIAFkGeABlIrgAFKYMAFD+kABQ8ogAUOqAAEjWbAAwl
-        fgAPLZMAEC+VAAUHDgAIHWwADSaNAAcVWwAGGHsALjRXAB8gKQAEDHIAAQIVAAEEagCkpKQAl5eXAI+P
-        jwCEhIQAfn5+AHFxcQBtbW0AZmZmAFRUVABNTU0ASkpKAEZGRgA/Pz8AODg4ADY2NgAvLy8ALCwsACoq
-        KgAoKCgAJCQkACEhIQAfHx8AHBwcABoaGgAYGBgAFxcXABISEgANDQ0ACgoKAAICAgAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA39/f4ODg4OAAAAAAAAAA4CAwMDAw
-        LzLf4ODg4N/f4B8XCxEUMRQabGxMR0xYbOAzCxYcMzoVDEBeS2JdVVPgAB8ZJjo6Gw1EazleZ1tH4AAA
-        IAXVBiBAaWo/Q2FcAAAA89DEy8/R4kuXi4Fu4wAA5vHAw73Cz+JwnqamnnXdAPTszrGysr+ReqKioqGM
-        4ADq6HWrpqy3kXuUlJWdmeEA4OTm5cm6dt58hISPjo3gAADn4dza4+UAfYF8fXtxcAAAAOAHB+EAAAB5
-        h397cAAAAAAAAAAAAAAAAHl5eQAAAAAAAAAAAAAAAAAAAAAAAAD//xcQgH8TFgAAPjMAAAkQAABbTIAA
-        XVrAA1JSgAPgAAABDwkAARkcAAE+NwABDAuBAWFGw4NiYf/HVVL//+AAKAAAADAAAABgAAAAAQAgAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAcAAAATAAAAHgAAACUAAAAsAAAALwAA
-        AC8AAAAvAAAALwAAAC8AAAAvAAAALgAAACkAAAAkAAAAHwAAABgAAAARAAAACQAAAAIAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAEAAAADEAAABVAAAAbQAA
-        AHwAAACJAAAAjwAAAI8AAACPAAAAjwAAAI8AAACPAAAAjAAAAIMAAAB5AAAAbgAAAGEAAABSAAAAQAAA
-        AC4AAAAfAAAAEAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALKA0BRm0i
-        ArWIKgLijy0C67A3A/+wNwP/sDcD/7A3A/+wNwP/sDcD/7A3A/+wNwP/nzID944sAu2FKgLnaSEC11Qa
-        AckwDwGyAAAAlwAAAIcAAABwAAAAUAAAAC0AAAARAAAABAAAAAAAAAAAAAAAAQAAAAQAAAAKAAAADwAA
-        ABUAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAFQAAAA0AAAAGAAAAAQAAAAAAAAAAAAAAAAAA
-        AAB8JwJErDYD9bk8DP/AQBT/ykcf/9RNKf/dUjL/4lU4/+hYPv/uXET/9WBL//diTv/6Y1H/7lxE/+pa
-        QP++PxH/uTwM/8VDGf+0OQf/qDQD+4UpAulSGgHNAAAAnQAAAH0AAABPAAAAKAAAABwAAAAiAAAALAAA
-        ADcAAABDAAAATQAAAFkAAABfAAAAXwAAAF8AAABfAAAAXwAAAF8AAABfAAAAWQAAAEoAAAA6AAAAJwAA
-        ABEAAAAEAAAAAAAAAACjMwOsuj0N/8lGHv/RSyb/104s/+FUNv/lVzv/8F1G//hiT//9ZVT//WZV//1p
-        V//9alj//WpY/+pdQv+1Qw//tToI//hiT//4Yk//6lk//9BKJf+2Owr/nzID90UWAcwAAACYAAAAdQAA
-        AGgAAAB2AAwAjwAmAK0AJACzAD8AzwA+ANIAPgDTAD4A0wA+ANMAPgDTAD4A0wA+ANMAPgDTACMAuwAT
-        AKkAAACSAAAAegAAAEkAAAAWAAAAAQAAAACoNQPIw0IX/9BLJf/XTiz/4VQ2/+hYPv/1YEv//GVT//1o
-        Vv/9bVn//XBc//1zXv/9dF//+HBZ/7o+Dv/muYb/v1sn/+BYOf/9aFb//GVT//VgS//oWD7/1k4s/7M5
-        Bv9iLAHlADwA2ABTAOoAYgD6AGYA/wVsBf8KcQr/H4wf/yORI/8ikCL/IJAg/yCQIP8cjhz/Go0a/xaL
-        Fv8OgA7/CHcI/wJqAv8AXAD3ACgAzAAAAIUAAAA3AAAACAAAAACqNQPGx0Ub/9ZOK//hVDb/6Fg+//Vg
-        S//9ZlT//WtY//1xXP/9d2D//Xpi//18ZP/9f2b/0lUt/8RkMf//7rv/3J5r/8hKH//9cVz//WxZ//1m
-        VP/1YEv/6Fg+/9xRMf+wNwP/I4IY/zGhMf9DtEP/Tb9N/wVsBf8Odw7/UMFQ/0/AT/9Nv03/S75L/0e8
-        R/9CukL/PLc8/zSzNP8tsC3/Jawl/xynHP8SlRL/AWoB/wATAK0AAABTAAAAEgAAAACrNQO0xUQa/91S
-        Mv/lVzv/9WBL//1mVP/9bVr//XNe//16Yv/9f2b//YNp//2Gav/lbkv/tUIO//rbqf//6Lb/9dKf/7A3
-        A//9emL//XNe//1tWv/9ZlT/9WBL/+ZXPP+9PxH/ZZ06/06/Tv9Tw1P/NaE1/zCDKP8geRv/Mpwy/1nG
-        Wf9Yxlj/VcRV/1HBUf9Mv0z/R7xH/z+5P/81tDX/LrAu/yWsJf8cpxz/Cn4K/wA4AM0AAABcAAAAFgAA
-        AACpNQNkuj0O/+NVOf/wXUb//GVT//1sWf/9c17//Xpi//2CaP/9h2v//o1v//mJav+1PAr/5qt4///h
-        rv//4q///+Kw/79XI//qb07//Xpi//1zXv/9bVn//GVT//BdRv+9PxH/aqA//1jGWP9eyF7/HoUe/5/G
-        iv+/2ab/BmwG/2DGYP9ky2T/YMlg/1vHW/9WxFb/T8BP/0i9SP9BuUH/N7U3/y2wLf8kqyT/DoYO/wA+
-        ANEAAABVAAAAEwAAAACmNAMRrzcD8dtRMP/4Yk///WhW//1xXP/9emL//YJo//2IbP/+j3D//pR0/8RP
-        IP/OdED//9uo///bqP//3Kn//9yp/9N/S//XXjb//YJo//16Yv/9cl3//WlX//hiT/+8PhD/caNG/2TL
-        ZP9ix2L/AGYA/+/11f///+T/YJ9W/ySIJP9v0G//a85r/2XMZf9fyV//WMZY/1HBUf9JvUn/P7k//zW0
-        Nf8qrir/DoAO/wA6AMQAAABBAAAACgAAAAAAAAAArDYDg7w+EP/9ZVT//W5a//13YP/9f2b//Ydr//6P
-        cP/+lnX/12g9/79UIP/6ypf//9Sh///Uof//1qP//9aj/9yQXf/IUiX//Ydr//1/Zv/9d2D//W5a//hi
-        T/+wNwP/Z8xn/27Qbv9PsE//MIMs////6f///+v/7/Xc/xBwD/9TslP/dtR2/3HRcf9ozWj/Ycph/1jG
-        WP9PwE//R7xH/z64Pv8xsjH/BW8F/wAhAJUAAAApAAAAAgAAAAAAAAAAAAAAAK83A9HNSiL//XBc//16
-        Yv/9g2n//o1v//6UdP/melL/tUAM//Cwff//zpv//86b///Om///z5z//8+c/+updv/ETR///o1v//2E
-        af/9emL//XFc/+BWN/+eXR3/cdFx/3fUd/83mDf/gLN4////8P////L////y/6/Pp/8IbQj/cMtw/3rW
-        ev9y0nL/aM1o/2DJYP9YxVj/Tr9O/0K6Qv8onSj/AF4A8wAAAFQAAAATAAAAAAAAAAAAAAAAAAAAAKY0
-        AxGvNwPw11Yx//18ZP/9hmr//o9x/++GYP+1PQr/5o9h//68jv//v5H//7+R///Ck///xpX//8aV/+ul
-        cv+/SRn//o9x//2Ha//9fWX/72lO/7U7Cf+AqlX/d9R3/4HZgf8ihCL/v9m6////+P////n////6////
-        +v9wqW//IoQi/4Lagv971nv/cdFx/2fMZ/9bx1v/U8NT/0i9SP8Mdgz/ADoAqgAAACoAAAAEAAAAAAAA
-        AAAAAAAAAAAAAAAAAACpNQMyrTYD0shOIv/0f2D/74Bd/7U9Cv/hdEv/3ox5/59mdf9/U3P/f1l3/79/
-        e//+p4D//qyE//6shP+wNwP//pJz//6Jbf/qbU3/tTsJ/5F5MP900nT/f9l//4jdiP8AZgD/7/Xv////
-        ///////////////////v9e//MIMw/0WiRf+B2YH/dtR2/23Pbf9hymH/WMVY/yeTJ/8AWwDoAAAAQAAA
-        AA0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUxoBIpkwA6W1PAr/tTwK/48tFv86HWD/AAFn/wEF
-        av8DCG7/Awhu/wABZ/8QC2j/f0xt/+p6Vf+6QxH/4XFJ/8NMHv+rQAj/gZRA/23Pbf951Xn/g9uD/43f
-        jf8AZgD///ny///58v//9+////Xs///17P//9Oj/z9e5/xBuDf9ct1z/fdd9/3HRcf9mzGb/OKI4/wBj
-        APcALwBpAAAAEwAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAoAAAAoAAAAVAAAAJUaCAHYTRgI/wAD
-        NP8CCFP/Ch6D/w0njf8NJ43/DSeN/wwli/8IGn7/AQhr/yYUXP+lNAr/mzED6240ArMRaQb/RatF/3DR
-        cP99133/iN2I/3TJdP8gdhr//+zZ///o0v//6NL//+jS///lzP//48f//+LG/6+6hv8IbQj/aMNo/3PS
-        c/86oDr/AGMA9wAwAGYAAAATAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAABAAAADAAAADYAAACnAAAA8wEB
-        Af8DAwP/BAQE/wICAv8AAAD/CRlT/xAxl/8RMpj/ETKY/xEymP8QMJb/DSiN/wMQc/8MDFXzAAAAogAA
-        AFwAVwBxAGYA8CuPK/9uyW7/id6J/2zCbP9AhC7//9y5/5+xsP9AhKP/BWuj/wdtpv8GbKX/MHye/4+m
-        pv+PomX/CG0I/x6CHv8AYADtADYAWgAAABAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHAAAAPQAA
-        AOUBAQH/BQUF/wcHB/8JCQn/AwMD/wEDCv8IGEX/Dy+C/xM6oP8UPKL/FD2j/xQ7of8TOqD/Ezie/w8v
-        lP8BEnD/AAlA3AAAAIcAAAA1AFQAJwBkAKMAZgD/Gn0a/0GdQf8AZgr/QIKe/wtxr/8Xfcb/GoDM/xqA
-        zP8agMz/GH7J/w1zs/8CaIn/AGEe+wA/ANAAEABlAAAAGQAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAEAAAAqAAAA4gMDA/8KCgr/DAwM/w4ODv8HBwf/BAwg/xQ7m/8WQqj/FkOp/xdFq/8XRav/F0Wr/xdF
-        q/8XRav/FkKo/xZBp/8MLY//ABNr+wACC6kAAABYAAAAFAAAAAAAYAARAGAAZgBeDb8AZnz/FXvC/yKI
-        3P8iiN3/Iojd/yKI3f8iiN3/IYfb/yCG2f8Zf8v/AmOX+wAaJsAAAACEAAAAPAAAAAsAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAgAAACoBAQE/w0NDf8QEBD/EhIS/xQUFP8BAQH/EziL/xhIrv8aTLL/Gk2z/xpO
-        tP8bULb/G1C2/xtQtv8aTrT/Gk2z/xlLsf8YR63/Ax56/wANPNUAAAB5AAAAJAAAAAAAAAAAAAAADgBa
-        h8YZfsr/J43n/ymO6v8rkO7/LZLy/y2S8v8rkO7/KY7q/yeN5/8li+L/HILR/wJjl/sAEhu3AAAAcgAA
-        ACgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAADEAAAD/Dg4O/xMTE/8VFRX/GBgY/xQUFP8FDiL/Gk60/xtR
-        t/8cVbv/HVe9/x1Xvf8eWb//HlrA/x5Yvv8dV73/HVa8/xxUuv8bUbf/CzKQ/wAZZPMAAACOAAAAMwAA
-        AAMAAAABAEhtWg91uP8wlvn/Mpj9/zOZ//8zmf//M5n//zOZ//8zmf//M5n//zKY/f8wlvn/LpP0/x+F
-        1/8AUnvuAAAAnQAAAFMAAAATAAAAAAAAAAAAAAAAAAAAAAAAAIAGBgb/FRUV/xgYGP8bGxv/Hx8f/xIS
-        Ev8LIEb/HVa8/x5awP8gXsT/IWHH/yFiyP8hYsj/IWLI/yFiyP8hYsj/IGDG/x9dw/8eWb//Fkqr/wAh
-        d/8AAACYAAAAQQAAAAkAAAAHAF6Ozi6U8v82nP//N53//zie//84nv//OJ7//zie//84nv//OJ7//zac
-        //81m///NJr//zOY/v8Teb7/AC9G0QAAAH0AAAArAAAAAwAAAAAAAAAAAAAAAAAAAKwNDQ3/Gxsb/x8f
-        H/8iIiL/JSUl/xMTE/8PLmH/IWHH/yFjyf8iZ83/I2rQ/yRt0/8kbdP/JG3T/yRt0/8kbNL/I2rQ/yJm
-        zP8hY8n/IF/F/wAmev8ADSu2AAAATQAAAA8AR2ouC3Gs/zie//86oP//O6H//zyi//89o///PaP//z2j
-        //89o///PKL//zuh//86oP//OJ7//zac//8xl/n/AFyK9wAAAJoAAABJAAAADQAAAAAAAAAAAAAAAAAA
-        AMgVFRX/ICAg/yQkJP8oKCj/Kioq/x8fH/8IGTP/I2nP/yRt0/8mcdf/J3Ta/yd23P8oeN7/KHje/yh4
-        3v8ndtz/JnPZ/yVw1v8kbNL/I2jO/wQzhv8ADyq7AAAAWQAAABUAWINwIYfS/z2j//8+pP//P6X//0Cm
-        //9Bp///Qaf//0Gn//9Bp///QKb//z+l//8+pP//PaP//zuh//84nv//FXu//wAiM8EAAABoAAAAHAAA
-        AAAAAAAAAAAAAAAAAMcZGRn/JSUl/ykpKf8tLS3/MDAw/ykpKf8FDhr/JnHX/yh33f8ped//Kn7k/yuA
-        5v8sguj/LIPp/yuB5/8rgOb/Kn3j/yl53/8nddv/JXDW/wlAlP8AHk3SAAAAWwAAABYAXYudL5Xm/0Gn
-        //9CqP//RKr//0Wr//9GrP//Rqz//0as//9Fq///Rav//0Op//9CqP//Qaf//z6k//89o///KI7f/wBH
-        a+QAAACBAAAAKQAAAAEAAAAAAAAAAAAAALYWFhb/Kioq/y8vL/8yMjL/NjY2/zk5Of8EBAT/JGrE/yuA
-        5v8shOr/LYft/y6L8f8vjvT/L470/y+O9P8uivD/LYbs/yyD6f8qfuT/KHnf/wpFmP8AIU/QAAAAUAAA
-        ABAAYpLIPqT5/0Wr//9Hrf//SK7//0mv//9KsP//SrD//0qw//9KsP//Sa///0iu//9GrP//Rav//0Ko
-        //9Apv//PaP//wRgkPcAAACRAAAANwAAAAQAAAAAAAAAAAAAAIUTExP/MDAw/zQ0NP83Nzf/Ozs7/z4+
-        Pv8ZGRn/FkJ1/y2I7v8wkff/Mpf9/zOZ//8zmf//NZv//zOZ//8zmf//Mpb8/zCP9f8thuz/LILo/whG
-        lf8AGTm6AAAARAAAAAoAYpLIR63//0mv//9Msv//TbP//060//9Ptf//ULb//1C2//9Ptf//TrT//02z
-        //9Msv//Sa///0as//9Dqf//Qaf//xB2s/8AChCfAAAAQwAAAAoAAAAAAAAAAAAAADIGBgb/MzMz/zc3
-        N/89PT3/QUFB/0RERP82Njb/AwkP/yl84f8thvL/LYfy/zOT+f83nP3/OqD//zqg//85n///N53//zOZ
-        //8xlPr/Lonv/wA/hf8AFzKrAAAANgAAAAQAYpLISrD//02z//9Qtv//Ubf//1K4//9Tuf//U7n//1O5
-        //9Tuf//Urj//1G3//9Qtv//TbP//0qw//9Hrf//RKr//x2Dxv8AJDe0AAAARwAAAAwAAAAAAAAAAAAA
-        AAAAAADiKSkp/z09Pf9BQUH/RUVF/0pKSv9NTU3/Ghoa/wUOJv8UPJv/Gk25/yBg2f8iZdz/JW7i/zGH
-        7/83lff/Op/9/zmf//80mv//KIbm/wBEiP8ACBCDAAAAJgAAAAEAYpPHTrT//1G3//9Tuf//Vrz//1e9
-        //9Yvv//WL7//1i+//9Yvv//V73//1W7//9Tuf//Ubf//060//9Msv//R63//yOJzP8AJDe0AAAARwAA
-        AAwAAAAAAAAAAAAAAAAAAACDDw8P/0BAQP9FRUX/S0tL/09PT/9TU1P/UVFR/ywsLP8XFxf/BgYG/wMK
-        Gv8MJG7/FDq2/xdDxv8dV9L/H17X/yJl3P8lbuL/Di1T/wAKEu4AAABeAAAAFgAAAAAAYpO2SK7y/1W7
-        //9Xvf//WsD//13D//9gxv//Ycf//2HH//9fxf//W8H//1m///9Xvf//Vbv//1K4//9Ptf//TbP//x5/
-        uP8AJDezAAAARAAAAAoAAAAAAAAAAAAAAAAAAAARAAAA8DMzM/9KSkr/S0tL/0RERP9PT0//X19f/2tr
-        a/91dXX/c3Nz/0RERP8YGBj/AQIL/wUOQ/8IGHD/CyGA/wsiY/8DChr/AAAA/wAAAMgAAAA9AAAACQAA
-        AAAAYpKGPKLf/1i+//9WvPn/NpzZ/yqQzP8bgbn/LpTS/0mv+f9Ns///TrT//1K4//9Uuv//Ubf//060
-        //9Lsf//K43F/wZqnP8AJjitAAAAOgAAAAYAAAAAAAAAAAAAAAAAAAAAAAAAYgkJCf9ISEj/UlJS/1RU
-        VP9YWFj/ZGRk/3V1df+Kior/m5ub/6Ojo/+ZmZn/YGBg/y0tLf8bGxv/FBQU/yAgIP8oKCj/BAQE/wAA
-        AH0AAAAfAAAAAQAAAAAAY5RCJ43G/y6UzP8Sdqn/H3+x/zWQwv89l8n/MIy+/wtuoP8WfL//I4nZ/yqQ
-        5v82nP//M5n5/yaM3/8Ye7f/Gnel/wBmmf8AFyKQAAAAKgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AKIPDw//UFBQ/1tbW/9kZGT/bW1t/3V1df+CgoL/k5OT/6qqqv+5ubn/s7Oz/4eHh/9zc3P/XV1d/0hI
-        SP8VFRX/AAAA2AAAADcAAAAJAAAAAAAAAAAAAAAAAGWY8QVqnf8bfK7/L4y+/z+Yyv9Ppdb/VanY/221
-        3v9hqtP/QZTB/ySBsf8Qc6b/G3em/zKGsf8sgq7/DG6f/wFejfQAAABiAAAAGQAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAABEAAADRERER/1lZWf9oaGj/dXV1/39/f/+Ghob/iIiI/4iIiP+jo6P/r6+v/5SU
-        lP94eHj/XV1d/y8vL/8AAAD3AAAATwAAABAAAAABAAAAAAAAAAAAAAAAAGSVoxN1qP83ksT/Rp7Q/1Cm
-        1/9Yqtn/Y7Dc/3q74f+Sx+f/q9Ts/7zd8P+fyuL/drHP/0yXvP8oga7/D3Kl/wBIa8wAAAA8AAAACQAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARAAAAogwMDP9RUVH/eXl5/4WFhf+QkJD/k5OT/4iI
-        iP99fX3/cHBw/2tra/9aWlr/ICAg/wAAAPYAAABfAAAAEgAAAAIAAAAAAAAAAAAAAAAAAAAAAGOUIQNp
-        mvA4k8X/UKbX/2Sx3P9ttd7/d7rh/4TA5P+czOn/t9rv/7bZ7f+FvNr/WaPK/zqRwP8ohrj/BGmc/wAe
-        LG4AAAAZAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGIAAADwHx8f/1RU
-        VP99fX3/kZGR/4iIiP9ubm7/TU1N/yYmJv8GBgb/AAAAwgAAADwAAAAKAAAAAQAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAABklmIPcqX/WanX/2213v+Dv+P/icPl/43F5v+Jw+X/gb/j/2213v9erdv/T6XW/z2X
-        yf8SdKf/AERnpwAAACUAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAARAAAAZAAAALQAAADxAAAA/wAAAP8AAADyAAAAygAAAJEAAAAzAAAACQAAAAEAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZJaiDXCi/2at1P+LxOX/n87q/6HP6v+fzur/icPl/3q7
-        4f9ost3/S6LT/xZ4qv8AVoG9AAAAIgAAAAcAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGKUUwBmmPA5jLf/hr3c/7zd
-        8P+o0+z/lMjn/1mjzP8og7P/BmeX6ABKb24AAAARAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABg
-        kBEAYpNkAGKUpQBilMYAYpLIAGKSyABdi50AVH5hAAAADQAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP//
-        /////wAA////////AAD///////8AAP///////wAA////////AADAAAP///8AAIAAAH///wAAgAAAGAAH
-        AACAAAAAAAEAAIAAAAAAAAAAgAAAAAAAAACAAAAAAAAAAIAAAAAAAAAAgAAAAAAAAACAAAAAAAAAAMAA
-        AAAAAAAA4AAAAAABAADgAAAAAAEAAPAAAAAAAwAA8AAAAAADAADAAAAAAAcAAIAAAAAADwAAgAAAAAAf
-        AAAAAACAAB8AAAAAAMAADwAAAAAAAAAPAAAAAAAAAAcAAAAAAAAABwAAAAAAAAAHAAAAAAAAAAMAAAAA
-        AAAAAwAAAAAAAAADAAAAAAAAAAMAAIAAAAAAAwAAgAAAgAADAACAAACAAAMAAMAAAIAAAwAA4AABwAAH
-        AADgAAHAAAcAAPAAA8AABwAA/AAH4AAPAAD+AB/wAB8AAP////gAPwAA/////AD/AAD///////8AAP//
-        /////wAA////////AAD///////8AACgAAAAgAAAAQAAAAAEAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMAAAAMAAAAFQAAABgAAAAYAAAAGAAA
-        ABgAAAAYAAAAFgAAABIAAAALAAAABAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJAAAAJQAAAEUAAABZAAAAXwAA
-        AF8AAABfAAAAXwAAAF8AAABcAAAAUwAAAEYAAAA2AAAAJgAAABYAAAAJAAAAAQAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB9RGQGMbyMCy2sh
-        AtJrIQLTayEC02shAtNrIQLTayEC01QaAcg9EwG5EgYAoAAAAI8AAAB7AAAAXQAAADkAAAAdAAAAFgAA
-        ABwAAAAjAAAAKQAAAC4AAAAvAAAALwAAAC8AAAAuAAAAKAAAAB4AAAAPAAAABAAAAAAAAAAArTcG18FB
-        Ff/RSyb/21Ew/+hYP//zX0r/+WNQ//1lVP/9ZVT/zUgh/9JLJv/UTSn/oTYO82ggAtogCgGwAAAAiAAA
-        AGcAAABeAAAAagAAAHcAAACDAAAAjAAAAI8AAACPAAAAjwAAAIwAAACCAAAAbQAAAEQAAAAWAAAAAQAA
-        AAC7PQ7/0kwn/91SM//vXUb//GRT//1pV//9cVz//XRe/+9qTv/Ti1f/zVsw//1nVf/5Y1D/5lc8/7c+
-        FPtCIwHXADcAzwRPBN0IXwjqFHQU9SKRIv8fjx//H48f/x2OHf8Wihb/C24L9wNVA+kAKQDHAAAAgQAA
-        ADMAAAAGAAAAAMNDF//bUTD/711G//1mVf/9clz//Xdg//19ZP/9g2j/yFos//rir//ThlP/821T//1r
-        WP/8ZFP/7FtC/5pYGf9As0D/T8FP/y+SLP8kjiT/UsJS/1LCUv9Kvkr/QLlA/zu3O/8try3/Iakh/wqF
-        Cv8AFACmAAAAQwAAAAoAAAAAuT0O4uhYP//8ZFP//XJc//15Yf/9hWr//Yxu/9djOv/rt4T//+Ow//DE
-        kf/gZkL//Xdg//1qV//5Y1D/p2Im/1bEVv9Zw1n/cKlf/4Czbf9Ns03/ZMtk/1zHXP9Tw1P/RbxF/zy3
-        PP8try3/Gpka/wAlAK8AAAA9AAAABwAAAACsNgOD5Vc7//1rWP/9d2D//YZq//6Scv/rgFn/2IdU///Z
-        pv//2ab//9qn/9JaMf/9g2j//XVe//1mVf+wZy//Z81n/0SoRP+/2az////l/0eYQv9003T/as5q/2LK
-        Yv9WxFb/RbxF/zm2Of8akhr/ACEAlAAAACgAAAACAAAAAAAAAAC7Pg/R+G9X//19ZP/9i27/+ZJv/8li
-        MP//zpv//8+c///PnP//0J3/13ZH//2JbP/9e2P/82ZO/5F5MP921Hb/Ppo9////8v////L/z+LF/ziY
-        OP9713v/btBu/2LKYv9RwVH/Prk+/w9zD/IAAABPAAAAEQAAAAAAAAAAAAAAAKY0AxG+RRjT73ZW//mM
-        a//NWy7/6Zp6/7+Kg/+/jIT/7q2K//+/kf/XcUP//Y5w//h7X/+6TBr/espv/4HZgf9kq2P////8////
-        ////////gLOA/2fAZ/961nr/ac1p/1vGW/8unS7/ADcAlQAAACIAAAAEAAAAAAAAAAAAAAACAAAAEC4O
-        AT6JKwK4tEUe/0whT/8BBGr/BA1z/wMLcf8RDGn/f0xu/9JgNP/SXjP/hWAa/23EYv961nr/jN+M/3Cm
-        af//9u3///Pn///y5f//79//WZdM/3HLcf9w0XD/ULhQ/wZaBsQAAAAoAAAABwAAAAAAAAAAAAAAAQAA
-        ABAAAABMAAAAtQAAAOcCAgL/AQIV/wwlfv8QL5X/EC+V/w8tk/8GFnv/LRNF9xEFAKYAQACZN5s3/3XQ
-        df+S4ZL/gKNg/9/RvP9wnq//RYuv/2GWrP+fsKT/SJA3/0OkQ/8IVAjAAAAAKQAAAAYAAAAAAAAAAAAA
-        AAAAAAAGAAAAVQICAu4ICAj/CwsL/wUHDv8MJGT/EziY/xQ8ov8UPKL/FDyi/xQ6oP8FGnr/AAcy0QAA
-        AHwAOwBTDm4OpDuWO/Iwe1n/DXOz/xuBz/8dg9L/HILP/xB2uf8CaHb/ACgMyQAAAHkAAAAtAAAABgAA
-        AAAAAAAAAAAAAAAAACACAgLpDQ0N/xMTE/8ODg7/Ditq/xhGrP8ZSa//Gk2z/xpNs/8aTbP/GUmv/xQ/
-        pP8AFmf3AAAAlQAAAEAAAAANAEpvbhh+yf8skvD/LZPy/y2T8v8tk/L/K5Hv/x+F1/8CVIDuAAAAoAAA
-        AFsAAAAYAAAAAQAAAAAAAAAAAAAAchEREf8XFxf/Ghoa/wwMDP8bUbf/HFW7/x5Zv/8fXML/H17E/x5a
-        wP8dV73/HFW7/wUpg/8ACCCyAAAAUgAAAB8OcK/oM5n//zWb//81m///NZv//zWb//80mv//M5n//yWL
-        5P8AO1ncAAAAhgAAADQAAAAGAAAAAAAAAAACAgK6GRkZ/x8fH/8jIyP/Dhks/yBgxv8iZcv/I2jO/yRq
-        0P8katD/JGrQ/yJmzP8hY8n/EEKe/wATOsgAAABcAEltcCiN3/87of//PKH//zyh//88of//PKH//zyh
-        //86oP//N53//xN0ufsACg+lAAAAUQAAABAAAAAAAAAAAAoKCschISH/Jycn/ywsLP8XFxf/JGvR/yd0
-        2v8od93/KXrg/yl74f8ped//KHfd/yZx1/8WU7D/ABxM0wAAAF8AVH2cPqP//0Kn//9Eqf//RKr//0Sq
-        //9Eqv//Q6j//0Cm//89ov//LZLm/wAwScsAAABoAAAAHAAAAAAAAAAABgYGtikpKf8vLy//NjY2/yQk
-        JP8hYrX/LIPp/y+N8/8xk/n/MpX7/zCS+P8ui/H/Kn3j/xxjwP8AIE7SAAAAWRBvp81Eqv//R63//0qw
-        //9Lsf//S7H//0ux//9Jr///Rqz//0Sp//9Apf//BExy4wAAAHoAAAAlAAAAAAAAAAAAAACEKioq/zg4
-        OP8+Pj7/Pz8//xQ1XP8vjfb/MJD5/zWb//86oP//Npz//zOZ//8ylvz/F2O6/wAlUs0AAABGF3ewy0yy
-        //9Ns///ULb//1G3//9Rt///ULb//060//9Ns///Sa///0Wr//8SZJbuAAAAiAAAACsAAAAAAAAAAAAA
-        ACEcHBz/Pz8//0VFRf9MTEz/LCws/wsiWf8WQZ7/HVbS/yNo3f8ugOr/NpT3/zGQ+f8SWKL/ABs1pAAA
-        AC4Ze7THULb//1W7//9WvP//V73//1e9//9WvP//Vbv//1K4//9OtP//S7H//xl+uv8AAACGAAAAKwAA
-        AAAAAAAAAAAAAAUFBcJAQED/S0tL/0lJSf9dXV3/ZmZm/01NTf8fICn/BxVb/w0mjf8RMp7/Ditp/wMM
-        F/kAAABhAAAAGQBilKVWvP//U7n5/z2i3/85n9n/TbPy/1W7//9WvP//U7n//1G3//9DqO3/EW6f+gAA
-        AHQAAAAiAAAAAAAAAAAAAAAAAAAAIR0dHfBRUVH/V1dX/2ZmZv+EhIT/m5ub/6Wlpf9xcXH/RkZG/y4u
-        Lv8qKir/AAcMxQAAADMAAAAHAGKTZByCuf8Qc6b/LYq8/z+Yyv8wirr/IYPB/x2DzP8ghtL/JYfL/yR/
-        r/8AVH7oAAAAVwAAABMAAAAAAAAAAAAAAAAAAAAAAAAAYiEhIf9hYWH/c3Nz/4SEhP+Pj4//oqKi/6Wl
-        pf9+fn7/SUlJ/woKCu4AAABJAAAAEAAAAAEAYJARBGib8TeSxP9Hn9D/VqnY/3W54P+Xyuj/nczo/2Sl
-        x/9Ml7z/GHam/wA+XrcAAAAxAAAABwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQhsbG/BjY2P/jo6O/5OT
-        k/+Dg4P/bW1t/0dHR/8RERHeAAAAUgAAAA0AAAACAAAAAAAAAAAAZJWDLou9/2Gv2/96u+H/hMDk/5/O
-        6v+ezOb/ZKzT/zmSwv8NbZ73ABUfTwAAABAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEQAA
-        AHQWFhbELS0txykpKcgLCwusAAAAcQAAABAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAZJaiS5vG/5TI
-        5/+j0Or/lMjn/3694v9XqNb/G3mr9QA0Tl4AAAASAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAZJWDJHyp01yhxP9PmsH/M4i18gplkq4AOlg4AAAACgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAAAAAAA////////////////wAH//4AAP/+AAAABgAAAAIAAAACAAAAAgAAAAIAA
-        AADAAAABwAAAAYAAAAMAAAAHAAAABwAAAAMAAAADAAAAAwAAAAMAAAADAAAAAwAAAAOAAAADgAAAA8AA
-        AAPgAYAD8AfAB///4A////////////////8oAAAAEAAAACAAAAABACAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAQAAAAkAAAATAAAAGAAAABgAAAAXAAAAEwAAAAsAAAADAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAAAAAsAAAAvAAAAUwAAAF8AAABfAAAAXgAAAFYAAABFAAAALQAAABwAAAAbAAAAIQAA
-        ACMAAAAiAAAAHAAAAA9mIAI3ii0Mr3wrEMyDLxvTgy8b02YiCM09EwG6AAAAmQAAAIIAAABoAAAAZwAA
-        AHMAAAB3AAAAdgAAAGcAAAA9tz0Pxd1SM//5Y1D//XBb//NsUv/SbkH/+GVR/8xKKfstMgfXElcS2yF5
-        IeothC3rIX4h7BFrEecDMAPAAAAAZ7c9D6P5Y1D//Xpi//6Mbv/chVb/9c2b/+9wUv/9alf/koc8/1Ov
-        T/9nrlz/Ycph/1XDVf84tTj/FnoW6QAAAGahMgMj4V0/8f2Ia//hfVH/+seU///ToP/ld1D/+HRb/5Gc
-        UP+GwoD/7/Xg/1WvVf9z0nP/UsJS/xh1GNkAAAA9AAAADVYbAWKhTELvQiNa/0M2eP9gSHf/u1s4+5N6
-        Nf+C2oL/pMaX///17P+6z6j/Y8Fj/0GjQfkAKQB3AAAAFwAAAEkEBATtAwYN/w8rcf8UOqD/EDGX/wIP
-        XO4AJQCvQJBAy0OIjv8Qdrn/IH27/xpxW/sAGwC0AAAAVwAAABMKCgrKGhoa/xIvaP8aTbP/HVe9/xtP
-        tf8NMpP/AAggrQU9XpQtk/L/M5n//zOZ//8rke//BCxEzAAAAHkAAAAlFRUV/ygoKP8YQoH/JnPZ/yZz
-        2f8mc9n/G1y9/wAPLLMdc7DQP6X//0Cm//9Apv//PqT//x97vvcAAACRAAAANyAgIPE1NTX/JUVr/zCQ
-        9v80mv//M5b6/yFz0v8AFjGtK4bG1kyy//9Ns///TbP//0mv//8xl+b/AAoQnQAAAD0UFBSiSkpK/0JC
-        Qv82RmX/G0WQ/yJixv8VR33/ABgxhjKQzc5MsvL/SrDs/1e9//9Qtv//QqXq/wAnO6YAAAAwAAAAES4u
-        LvBpaWn/jY2N/6SkpP9PT0//ER0m1wAAAC8LbJ2XKYe5/1Kk0v9hqNP/UZ/Q/xh1pP8AAABaAAAAGQAA
-        AAAAAAAhLCwsslxcXP9LS0vkISEhrgAAACcAAAAIAGCQIimDs/CLxOX/oc/q/1ekz/8NXomtAAAAIAAA
-        AAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAY5QhLoCqhEyRtYkAVoFfAAAADQAA
-        AAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
-        AAAAAAAAAAAAAAB/AAAAABf/AAAw/wAARv8AAFX/AABc/wAAYP8AAGT/AABo/wAALP8AAK//AABT/wAA
-        U/+AAFj//4FT////Qv8=
-</value>
-  </data>
-</root>

Global_Indexer/frmUserKonfig_AddUsers.vb

@@ -1,411 +0,0 @@
-Imports System.DirectoryServices
-Imports System.DirectoryServices.ActiveDirectory
-Imports System.DirectoryServices.AccountManagement
-
-Public Class frmUserKonfig_AddUsers
-    Public Function GetAllADGroups() As List(Of String)
-        Try
-            Dim enTry As DirectoryEntry = New DirectoryEntry("LDAP://" & Environment.UserDomainName) 'digitaldata.local
-            Dim mySearcher As DirectorySearcher = New DirectorySearcher(enTry)
-            mySearcher.Filter = ("(&(objectClass=group))")
-            Dim result As New List(Of String)
-            For Each resEnt As SearchResult In mySearcher.FindAll()
-                Dim myEntry As DirectoryEntry = resEnt.GetDirectoryEntry
-                Dim groupName As String = myEntry.Name.Replace("CN=", "")
-                If Not groupName.StartsWith("WinRMR") Or Not groupName.StartsWith("Gäst") Or Not groupName.StartsWith("Druck") Or Not groupName.StartsWith("Sicherungs") Or Not groupName.StartsWith("Replikations") Or Not groupName.StartsWith("Netzwerkskon") _
-                     Or Not groupName.StartsWith("Leistungs") Or Not groupName.StartsWith("Distributed COM") Or Not groupName.StartsWith("IIS_") Or Not groupName.StartsWith("Kryptografie") Or Not groupName.StartsWith("Ereignis") Or Not groupName.StartsWith("Zertifikat") _
-                      Or Not groupName.StartsWith("RDS-") Or Not groupName.StartsWith("Hyper-V") Or Not groupName.StartsWith("Zugriffssteuerungs") Or Not groupName.StartsWith("Remoteverwaltungs") Or Not groupName.StartsWith("Domänencomput") Or Not groupName.StartsWith("Domänen-Gäste") _
-                      Or Not groupName.StartsWith("Richtlinien-Ersteller") Or Not groupName.StartsWith("RAS- und IAS-Server") Or Not groupName.StartsWith("Server-Operatore") Or Not groupName.StartsWith("Konten-Oper") Or Not groupName.StartsWith("Prä-Windows") _
-                      Or Not groupName.StartsWith("Einstellungen eingehender") Or Not groupName.StartsWith("Windows-Auth") Or Not groupName.StartsWith("Terminalserver-Liz") Or Not groupName.StartsWith("Zulässige") Or Not groupName.StartsWith("Abgelehnte") Or Not groupName.StartsWith("Schreibgeschützte Domänen") _
-                      Or Not groupName.StartsWith("Klonbare") Or Not groupName.StartsWith("Protected User") Or Not groupName.StartsWith("Dns") Or Not groupName.StartsWith("DHCP") Or Not groupName.StartsWith("IIS_IUSR") Or Not groupName.StartsWith("Richtlinien-Ersteller") _
-                      Or Not groupName.StartsWith("Abgelehnte RODC-Kenn") Then
-                    Dim users As List(Of String) = GetGroupUsers(groupName)
-                    If Not IsNothing(users) Then
-                        result.Add(groupName)
-                    End If
-                End If
-
-                
-
-                'MsgBox(myEntry.Name)
-                'Dim MyLVI As ListViewItem = ListView2.Items.Add(Rc(myEntry.Name))
-                'MyLVI.SubItems.Add("Global Secutiry Group")
-                'MyLVI.SubItems.Add(Replace(myEntry.Parent.Path, "LDAP://", ""))
-                'MyLVI.ImageKey = "ad_icon_group"
-            Next
-
-            'Dim sPath As String = "LDAP://digitaldata.local"
-            'Dim myDirectory As New DirectoryEntry(sPath)
-            'Dim mySearcher1 As New DirectorySearcher(myDirectory)
-            'Dim mySearchResultColl As SearchResultCollection
-            'Dim mySearchResult As SearchResult
-            'Dim result As New List(Of String)
-            'Dim objGroupEntry As DirectoryEntry
-
-            'mySearcher1.Filter = "(&(objectClass=Group))"
-            'mySearchResultColl = mySearcher1.FindAll()
-
-            'If (mySearchResultColl.Count <> 0) Then
-            '    For Each mySearchResult In mySearchResultColl
-            '        objGroupEntry = mySearchResult.GetDirectoryEntry()
-            '        result.Add(objGroupEntry.Name)
-            '    Next
-            'End If
-
-            Return result
-
-        Catch ex As System.Exception
-            Return Nothing
-        End Try
-    End Function
-    Private Sub formUserConfig_AddUsers_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-        Try
-            Me.Cursor = Cursors.WaitCursor
-            Dim groups As List(Of String) = GetAllADGroups()
-
-            ' Sort alphabetically.
-            groups.Sort()
-            Me.Cursor = Cursors.Default
-            For Each group In groups
-                lbGroups.Items.Add(group)
-            Next
-        Catch ex As Exception
-            MsgBox("Error in Load Groups: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-        End Try
-        Me.Cursor = Cursors.Default
-    End Sub
-    Public Function GetUsername_FromDisplayname(ByVal strUserString As String)
-        Try
-            Dim enTry As DirectoryEntry = New DirectoryEntry("LDAP://" & Environment.UserDomainName) 'digitaldata.local
-            Dim mySearcher As DirectorySearcher = New DirectorySearcher(enTry)
-            mySearcher.Filter = ("(&(objectCategory=person)(objectClass=user)(cn=" & strUserString & "))")
-            'Retrieve results
-            Dim dsResult As SearchResult = mySearcher.FindOne
-
-            If dsResult Is Nothing Then
-                'No results returned
-                Return ""
-            End If
-            'For Each Str As DictionaryEntry In dsResult.Properties
-            '    Console.WriteLine(Str.Key.ToString & " - " & Str.Value.ToString)
-            'Next
-            Dim usrname = dsResult.Properties("samaccountname")(0)
-            Return usrname
-        Catch ex As Exception
-            ClassLogger.Add("Error in GetUsername_FromDisplayname: " & ex.Message, True)
-            Return ""
-        End Try
-      
-
-    End Function
-    Public Function GetProperty_LDAP(ByVal strUserString As String, _property As String)
-        Try
-            Dim enTry As DirectoryEntry = New DirectoryEntry("LDAP://" & Environment.UserDomainName) 'digitaldata.local
-            Dim mySearcher As DirectorySearcher = New DirectorySearcher(enTry)
-            mySearcher.Filter = ("(&(objectCategory=person)(objectClass=user)(cn=" & strUserString & "))")
-            'Retrieve results
-            Dim dsResult As SearchResult = mySearcher.FindOne
-
-            If dsResult Is Nothing Then
-                'No results returned
-                Return ""
-            End If
-            'For Each Str As DictionaryEntry In dsResult.Properties
-            '    Console.WriteLine(Str.Key.ToString & " - " & Str.Value.ToString)
-            'Next
-            Dim usrname = dsResult.Properties(_property)(0)
-            Return usrname
-        Catch ex As Exception
-            ClassLogger.Add("Error in GetProperty_LDAP: " & ex.Message, True)
-            Return ""
-        End Try
-
-
-    End Function
-
-    Public Function GetEmail_FromDisplayname(ByVal strUserString As String)
-        Try
-            Dim enTry As DirectoryEntry = New DirectoryEntry("LDAP://" & Environment.UserDomainName) 'digitaldata.local
-            Dim mySearcher As DirectorySearcher = New DirectorySearcher(enTry)
-            mySearcher.Filter = ("(&(objectCategory=person)(objectClass=user)(cn=" & strUserString & "))")
-            'Retrieve results
-            Dim dsResult As SearchResult = mySearcher.FindOne
-
-            If dsResult Is Nothing Then
-                'No results returned
-                Return ""
-            End If
-            'For Each Str As DictionaryEntry In dsResult.Properties
-            '    Console.WriteLine(Str.Key.ToString & " - " & Str.Value.ToString)
-            'Next
-            Dim email = dsResult.Properties("mail")(0)
-            Return email
-        Catch ex As Exception
-            ClassLogger.Add("Error in GetEmail_FromDisplayname: " & ex.Message, True)
-            Return ""
-        End Try
-
-
-    End Function
-    Public Shared Function FindEmailsFromSamAccountName(ByVal samAccountName As String) As String
-
-        Dim ctx As New PrincipalContext(ContextType.Domain)
-
-        Dim qbeUser As New UserPrincipal(ctx)
-        qbeUser.SamAccountName = samAccountName
-        qbeUser.Enabled = True
-
-        Dim srch As New PrincipalSearcher(qbeUser)
-        For Each foundUser In srch.FindAll
-            Dim up As UserPrincipal = CType(foundUser, UserPrincipal)
-            Return up.EmailAddress
-        Next
-        Return ""
-    End Function
-    Function GetActiveDirectoryGroups() As List(Of String)
-        Me.Cursor = Cursors.WaitCursor
-        Try
-            Dim groups As List(Of String) = New List(Of String)
-            Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
-            Dim group As GroupPrincipal = New GroupPrincipal(ctx)
-            Dim srch As PrincipalSearcher = New PrincipalSearcher(group)
-            For Each g In srch.FindAll()
-                If GetUsersForGroup(g.ToString()).Count <> 0 Then
-                    If Not g.ToString.StartsWith("WinRMR") And Not g.ToString.StartsWith("Priv") And Not g.ToString.StartsWith("Gäst") And Not g.ToString.StartsWith("Druck") And Not g.ToString.StartsWith("Sicherungs") And Not g.ToString.StartsWith("Replikations") And Not g.ToString.StartsWith("Netzwerkskon") _
-                    And Not g.ToString.StartsWith("Reporting") And Not g.ToString.StartsWith("Leistungs") And Not g.ToString.StartsWith("Distributed COM") And Not g.ToString.StartsWith("IIS_") And Not g.ToString.StartsWith("Kryptografie") And Not g.ToString.StartsWith("Ereignis") And Not g.ToString.StartsWith("Zertifikat") _
-                     And Not g.ToString.StartsWith("RDS-") And Not g.ToString.StartsWith("Hyper-V") And Not g.ToString.StartsWith("Zugriffssteuerungs") And Not g.ToString.StartsWith("Remoteverwaltungs") And Not g.ToString.StartsWith("Domänencomput") And Not g.ToString.StartsWith("Domänen-Gäste") _
-                     And Not g.ToString.StartsWith("Richtlinien-Ersteller") And Not g.ToString.StartsWith("RAS- und IAS-Server") And Not g.ToString.StartsWith("Server-Operatore") And Not g.ToString.StartsWith("Konten-Oper") And Not g.ToString.StartsWith("Prä-Windows") _
-                     And Not g.ToString.StartsWith("SQLAcce") And Not g.ToString.StartsWith("Einstellungen eingehender") And Not g.ToString.StartsWith("Windows-Auth") And Not g.ToString.StartsWith("Terminalserver-Liz") And Not g.ToString.StartsWith("Zulässige") And Not g.ToString.StartsWith("Abgelehnte") And Not g.ToString.StartsWith("Schreibgeschützte Domänen") _
-                     And Not g.ToString.StartsWith("Klonbare") And Not g.ToString.StartsWith("Protected User") And Not g.ToString.StartsWith("Dns") And Not g.ToString.StartsWith("DHCP") And Not g.ToString.StartsWith("IIS_IUSR") And Not g.ToString.StartsWith("Richtlinien-Ersteller") _
-                     And Not g.ToString.StartsWith("Abgelehnte RODC-Kenn") Then
-                        groups.Add(g.ToString)
-                    End If
-                End If
-            Next
-            Me.Cursor = Cursors.Default
-            Return groups
-        Catch ex As Exception
-            MsgBox("Error in GetActiveDirectoryGroups:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-            Me.Cursor = Cursors.Default
-            Return Nothing
-        End Try
-    End Function
-    Public Function GetGroupUsers(ByVal strGroupName As String)
-
-        '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-        '
-        '    Returns all the users of a specific group
-        '    Each user on seperate line in the string
-        '    The group name being passed is not case sensitive
-        '
-        '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-
-        Dim dsDirectorySearcher As New DirectorySearcher
-        Dim strUsers As String
-        Dim intEqualsIndex As Integer
-        Dim intCommaIndex As Integer
-        Dim result As New List(Of String)
-
-        'Filter by group name
-        With dsDirectorySearcher
-            .Filter = "sAMAccountName=" & strGroupName
-            .PropertiesToLoad.Add("member")
-
-            Try
-                'Retrieve results
-                Dim dsResult As SearchResult = .FindOne
-                Dim intCounter As Integer
-
-                If dsResult Is Nothing Then
-                    'No results returned
-                    Return Nothing
-                End If
-                Dim d = dsResult.Properties("member").Count
-                For intCounter = 0 To dsResult.Properties("member").Count - 1
-                    strUsers = dsResult.Properties("member")(intCounter).ToString
-                    If LogErrorsOnly = False Then ClassLogger.Add(">> Usermember-String for Group: " & strUsers.ToString, False)
-                    'Get index of equals and comma
-                    intEqualsIndex = strUsers.IndexOf("=", 1)
-                    intCommaIndex = strUsers.IndexOf(",", 1)
-
-                    If intEqualsIndex = -1 Then
-                        Return Nothing
-                    End If
-                    'Console.WriteLine(strUsers)
-                    'Extract name from string and append to List
-                    result.Add(strUsers.Substring((intEqualsIndex + 1), (intCommaIndex - intEqualsIndex) - 1))
-
-                Next intCounter
-
-            Catch ex As Exception
-                MessageBox.Show("Error in GetGroupUsers Function" & vbNewLine & vbNewLine _
-                    & ex.Message, "Active Directory Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
-
-            End Try
-
-        End With
-
-        Return result
-
-    End Function
-
-    Function GetUsersForGroup(g As String) As List(Of UserPrincipal)
-        Dim users As List(Of UserPrincipal) = New List(Of UserPrincipal)
-        Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
-        Dim group As GroupPrincipal = GroupPrincipal.FindByIdentity(ctx, g)
-
-        Dim u = group.GetMembers(True)
-
-        For Each user In u
-            If user.GetType().Name = "UserPrincipal" Then
-                users.Add(user)
-            End If
-        Next
-
-        Return users
-    End Function
-
-    Private Sub lbGroups_SelectedIndexChanged(sender As Object, e As EventArgs) Handles lbGroups.SelectedIndexChanged
-        Me.Cursor = Cursors.WaitCursor
-        Dim group As String = lbGroups.SelectedItem
-        Dim users As List(Of UserPrincipal) = GetUsersForGroup(group)
-        MyDataset.TBAD_Users.Clear()
-        For Each user In users
-            Dim newUserRow As MyDataset.TBAD_UsersRow
-            newUserRow = MyDataset.TBAD_Users.NewTBAD_UsersRow
-            Try
-                Dim userldap As UserPrincipal = user
-                Dim PRENAME As String = userldap.GivenName
-                Dim NAME As String = userldap.Surname
-                Dim USERNAME As String = userldap.SamAccountName
-                Dim _name = userldap.DisplayName
-                Dim _name1 = userldap.Name
-                Dim _name3 = userldap.Name
-                Try
-                    newUserRow.Username = userldap.SamAccountName
-                Catch ex As Exception
-                    newUserRow.Username = user.ToString
-                End Try
-                Dim email As String
-                Try
-                    email = userldap.EmailAddress
-                Catch ex As Exception
-                    email = ""
-                End Try
-                newUserRow.Prename = PRENAME
-                newUserRow.Surname = NAME
-                newUserRow.Email = email
-            Catch ex As Exception
-                ClassLogger.Add("Unexpected Error in Read User LDAP-Configurations: " & vbNewLine)
-            End Try
-            MyDataset.TBAD_Users.Rows.Add(newUserRow)
-        Next
-        Me.Cursor = Cursors.Default
-
-    End Sub
-
-    Private Sub btnAddUsers_Click(sender As Object, e As EventArgs) Handles btnAddUsers.Click
-        Try
-            Dim usersAdded As Integer = 0
-
-            For Each row As DataRow In MyDataset.TBAD_Users.Rows
-                If CBool(row.Item(0)) = CBool(True) Then
-                    Dim USERNAME As String = row.Item(1)
-
-                    Dim PRENAME As String = row.Item(2)
-                    Dim NAME As String = row.Item(3)
-                    Dim email As String
-                    Try
-                        email = row.Item(4)
-                    Catch ex As Exception
-                        email = ""
-                    End Try
-                    Dim SQL
-                    If Not UserExists(USERNAME) Then
-                        SQL = "INSERT INTO TBDD_USER(PRENAME, NAME, USERNAME, EMAIL, MODULE_GI,LANGUAGE) VALUES('" & PRENAME & "', '" & NAME & "', '" & USERNAME & "','" & email & "'," & 1 & ",'" & USER_LANGUAGE & "')"
-                        If ClassDatabase.Execute_non_Query(SQL) = True Then
-                            usersAdded = usersAdded + 1
-                        End If
-                    Else
-                        SQL = "UPDATE TBDD_USER SET MODULE_GI = 1 WHERE UPPER(USERNAME) = UPPER('" & USERNAME & "')"
-                        If ClassDatabase.Execute_non_Query(SQL) = True Then
-                            usersAdded = usersAdded + 1
-                        End If
-                    End If
-                End If
-
-            Next
-
-            If USER_LANGUAGE = "de-DE" Then
-                If usersAdded = 1 Then
-                    MsgBox(usersAdded & " neuer Benutzer hinzugefügt", MsgBoxStyle.Information)
-                Else
-                    MsgBox(usersAdded & " neue Benutzer hinzugefügt", MsgBoxStyle.Information)
-                End If
-            Else
-                If usersAdded = 1 Then
-                    MsgBox(usersAdded & " new user added", MsgBoxStyle.Information)
-                Else
-                    MsgBox(usersAdded & " new users added", MsgBoxStyle.Information)
-                End If
-            End If
-
-        Catch ex As Exception
-            MsgBox("Error in Adding Users from LDAP: " & vbNewLine & ex.Message)
-        End Try
-      
-
-    End Sub
-
-    Private Function UserExists(username As String) As Boolean
-        Try
-            Dim SQL = "SELECT GUID FROM TBDD_USER WHERE UPPER(USERNAME) = UPPER('" & username & "')"
-            If ClassDatabase.Execute_Scalar(SQL, MyConnectionString) = Nothing Then
-                Return False
-            Else
-                Return True
-            End If
-        Catch ex As Exception
-            MsgBox("Error in UserExists: " & vbNewLine & ex.Message)
-            Return False
-        End Try
-    End Function
-
-    Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
-        Me.Close()
-    End Sub
-
-    Private Sub tbSelectEverything_Click(sender As Object, e As EventArgs) Handles tbSelectEverything.Click
-        For Each Row As DataRow In MyDataset.TBAD_Users.Rows
-            Row.Item(0) = True
-        Next
-    End Sub
-
-    Private Sub tbSelectNone_Click(sender As Object, e As EventArgs) Handles tbSelectNone.Click
-        For Each Row As DataRow In MyDataset.TBAD_Users.Rows
-            Row.Item(0) = False
-        Next
-    End Sub
-
-   
-
-    'Private Sub clbUsers_MouseClick(sender As Object, e As MouseEventArgs)
-    '    Try
-    '        ToolTipController1.HideHint()
-    '        Dim userstring As String = clbUsers.SelectedItem.ToString
-    '        Dim ctx As PrincipalContext = New PrincipalContext(ContextType.Domain)
-    '        Dim usr As UserPrincipal = UserPrincipal.FindByIdentity(ctx, IdentityType.Name, userstring)
-    '        If Not IsNothing(usr) Then
-    '            Dim PRENAME As String = usr.GivenName
-    '            Dim NAME As String = usr.Surname
-    '            Dim USERNAME As String = usr.SamAccountName
-    '            Dim email As String = usr.EmailAddress
-    '            ToolTipController1.ShowHint("SamAccountName: " & USERNAME & vbNewLine & "GivenName: " & PRENAME & vbNewLine & "Surname: " & NAME & vbNewLine & "EmailAddress: " & email, "Preview LDAP-Parameter:", DevExpress.Utils.ToolTipLocation.RightCenter)
-    '        End If
-    '        ctx.Dispose()
-    '    Catch ex As Exception
-    '        MsgBox("Error in getting Userinfo LDAP:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
-    '    End Try
-
-    'End Sub
-End Class

SetupVS19/Product.wxs

@@ -126,7 +126,7 @@
 
       <!--Verschiedene Bibliotheken-->
       <Component Id="MiscLibs" Guid="56bb39d9-101a-411d-8b11-5d4e3a602275">
-        <File Id="MSGLib" Name="Independentsoft.Msg.dll" Source="P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\Independentsoft.Msg.dll" KeyPath="yes" />
+        <File Id="MSGLib" Name="Independentsoft.Msg.dll" Source="P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\Independentsoft.Msg.2.0.570.21482.dll" KeyPath="yes" />
         <File Id="NLog" Name="NLog.dll" Source="NLog.dll" KeyPath="no" />
       </Component>