Login auf Testsystem.

AVISOUPDATER/AVISOUPDATER.vbproj

@@ -11,12 +11,12 @@
     <AssemblyName>AVISOUPDATER</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>WindowsForms</MyType>
-    <TargetFrameworkVersion>v4.5</TargetFrameworkVersion>
+    <TargetFrameworkVersion>v4.7</TargetFrameworkVersion>
     <TargetFrameworkProfile>
     </TargetFrameworkProfile>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <PlatformTarget>AnyCPU</PlatformTarget>
+    <PlatformTarget>x64</PlatformTarget>
     <DebugSymbols>true</DebugSymbols>
     <DebugType>full</DebugType>
     <DefineDebug>true</DefineDebug>
@@ -75,7 +75,8 @@
     <Import Include="System.Threading.Tasks" />
   </ItemGroup>
   <ItemGroup>
-    <Compile Include="Update.vb" />
+    <Compile Include="cProgrammeUpdate.vb" />
+    <Compile Include="OLDUpdate.vb" />
     <Compile Include="My Project\AssemblyInfo.vb" />
     <Compile Include="My Project\Application.Designer.vb">
       <AutoGen>True</AutoGen>

AVISOUPDATER/AVISOUPDATER_Settings.txt

@@ -1 +1,9 @@
 F:\Programme\AVISO\
+192.168.0.**|\\share01.verag.ost.dmn\Programme\AVISO
+172.16.0.**|\\172.16.0.99\Daten\PROGRAMME\AVISO
+192.168.1.**|\\192.168.1.20\daten\VERAG Programme\AVISO
+192.168.133.**|\\192.168.133.98\f\Programme\AVISO
+172.16.1.**|\\172.16.1.100\f\PROGRAMME\AVISO
+192.168.32.**|\\192.168.32.253\Files\Programme\AVISO
+192.168.100.**|\\192.168.100.11\Daten\Programme\AVISO
+10.4.**|\\10.4.3.17\VERAG gemeinsam\AVISO

AVISOUPDATER/AVISOUPDATER_Version.txt

@@ -1 +1 @@
-4.0
+7.0

AVISOUPDATER/App.config

@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="utf-8"?>
 <configuration>
     <startup> 
-        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5"/>
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7"/>
     </startup>
 </configuration>

AVISOUPDATER/My Project/Application.Designer.vb

@@ -14,8 +14,8 @@ Option Explicit On
 
 Namespace My
     
-    'HINWEIS: Diese Datei wird automatisch generiert. Ändern Sie sie nicht direkt. Zum Ändern
+    'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden.  Wenn Sie Änderungen vornehmen möchten
-    ' oder bei in dieser Datei auftretenden Buildfehlern wechseln Sie zum Projekt-Designer.
+    ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
     ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
     ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
     '

AVISOUPDATER/My Project/Resources.Designer.vb

@@ -22,7 +22,7 @@ Namespace My.Resources
     '''<summary>
     '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
     '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"),  _
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"),  _
      Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
      Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
      Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _

AVISOUPDATER/My Project/Settings.Designer.vb

@@ -15,21 +15,21 @@ Option Explicit On
 Namespace My
     
     <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.9.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
         
         Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
         
-#Region "Funktion zum automatischen Speichern von My.Settings"
+#Region "Automatische My.Settings-Speicherfunktion"
 #If _MyType = "WindowsForms" Then
     Private Shared addedHandler As Boolean
 
     Private Shared addedHandlerLockObject As New Object
 
     <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-    Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+    Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
         If My.Application.SaveMySettingsOnExit Then
             My.Settings.Save()
         End If

AVISOUPDATER/OLDUpdate.vb

@@ -6,6 +6,7 @@
     Sub Main()
         'Falls Settings existiert, wird der Pfad daraus verwendet.
         F = System.IO.File.ReadAllText(AppDomain.CurrentDomain.BaseDirectory & "AVISOUPDATER_Settings.txt")
+
         If Not System.IO.Directory.Exists(F) Then
             MsgBox("ERROR_UPDATE_05: Es konnte keine Verbindung mit dem F:\ Laufwerk hergestellt werden." & vbNewLine & "Wenn Sie eine Remote-Sitzung verwenden, melden Sie sich mit dieser erneut an.", MsgBoxStyle.Critical, "ERROR")
             Environment.Exit(0)
@@ -13,6 +14,7 @@
         System.Console.WriteLine("3 Sekunden warten, um sicherzustellen, dass das Programm beendet wurde...")
         Threading.Thread.Sleep(3000) 'Falls Programm gerade am Beenden
         System.Console.WriteLine("Starte Update...")
+        System.Console.WriteLine("UPDATEPFAD: " & F)
         ' If Not My.Computer.FileSystem.DirectoryExists(F) Then
         'MsgBox("ERROR_UPDATE_02: Update-Daten existieren nicht.", MsgBoxStyle.Critical, "ERROR")
         ' Else
@@ -47,6 +49,8 @@
         'End If
         Environment.Exit(0)
     End Sub
+
+
     Private Sub FileCopier()
         For Each file As String In IO.Directory.GetFiles(F) ' Ermittelt alle Dateien des Ordners 
             IO.File.Copy(file, AppDomain.CurrentDomain.BaseDirectory & cut_file(file), True) ' Kopiert die Dateien Next 

AVISOUPDATER/UPDATERfrm.vb

@@ -3,7 +3,7 @@ Imports System.Security.Cryptography
 
 Public Class UPDATERfrm
 
-    Dim CopyIdentical = False ' selbe Dateien nicht kopieren
+    Dim CopyIncremental = True ' selbe Dateien nicht kopieren
 
     Private Sub UPDATERfrm_Load(sender As Object, e As EventArgs) Handles Me.Load
 
@@ -18,11 +18,24 @@ Public Class UPDATERfrm
 
 
     Dim F As String = "F:\Programme\AVISO\" ' WDH TERM
-    Dim F_PROD As String = "\\192.168.0.91\f\Programme\AVISO\" ' VERAG
+    ' Dim F_PROD As String = "\\192.168.0.91\f\Programme\AVISO\" ' VERAG
+    Dim F_PROD As String = "\\share01.verag.ost.dmn\Programme\AVISO\" ' VERAG
     ' Dim F As String = "\\192.168.0.90\f\Programme\AVISO\" 'DEVELOPER
     Dim F_ATILLA As String = "\\172.16.0.99\Daten\Programme\AVISO\" ' ATILLA
     Public Sub Main()
 
+        'STARTPARAMETER - DP
+        Dim PARAM = ""
+        Dim parameter() As String = Environment.GetCommandLineArgs().ToArray
+        If (parameter.Count - 1) >= 1 Then 'Höher als 1 weil der index 0 der Pfad zum programm ist
+            PARAM = parameter(1)
+        End If
+
+        If PARAM = "full" Then
+            CopyIncremental = False
+        End If
+
+
         Dim FIRMA = "VERAG"
         Dim pfadDatei As String = System.AppDomain.CurrentDomain.BaseDirectory & "\Standort.txt"
         FIRMA = "VERAG"
@@ -38,23 +51,34 @@ Public Class UPDATERfrm
         If FIRMA = "ATILLA" Then F = F_ATILLA 'Sichere Verbindung
 
 
-        'Falls Settings existiert, wird der Pfad daraus verwendet.
+        If F.Contains("10.4.3.17") Then buildConnectionUNISPED()
-        F = System.IO.File.ReadAllText(AppDomain.CurrentDomain.BaseDirectory & "AVISOUPDATER_Settings.txt")
-        If Not System.IO.Directory.Exists(F) Then
 
+        'Falls Settings existiert, wird der Pfad daraus verwendet.
+        ' F = System.IO.File.ReadAllLines(AppDomain.CurrentDomain.BaseDirectory & "AVISOUPDATER_Settings.txt")(0)
+        '   F = System.IO.File.ReadAllText(AppDomain.CurrentDomain.BaseDirectory & "AVISOUPDATER_Settings.txt")
+
+        If Not System.IO.Directory.Exists(F) Then
+            F = getFByIP()
+
+            writeLine(RichTextBox, "Verbinde mit '" & F & "' ...")
+            If Not System.IO.Directory.Exists(F) Then
                 If FIRMA = "ATILLA" Then
                     F = F_ATILLA 'Sichere Verbindung
                 Else
                     F = F_PROD
                 End If
+                writeLine(RichTextBox, "Standard-Freigabelaufwerk nicht gefunden. Verbinde mit '" & F & "' ...")
 
-            writeLine(RichTextBox, "F-Pfad nicht gefunden, verbinde mit '" & F & "' ...")
                 If Not System.IO.Directory.Exists(F) Then
-                MsgBox("ERROR_UPDATE_05: Es konnte keine Verbindung mit dem F:\ Laufwerk hergestellt werden." & vbNewLine & "Wenn Sie eine Remote-Sitzung verwenden, melden Sie sich mit dieser erneut an.", MsgBoxStyle.Critical, "ERROR")
+                    MsgBox("ERROR_UPDATE_05: Es konnte keine Verbindung mit dem Freigabe-Laufwerk hergestellt werden." & vbNewLine & "Wenn Sie eine Remote-Sitzung verwenden, melden Sie sich mit dieser erneut an.", MsgBoxStyle.Critical, "ERROR")
                     Environment.Exit(0)
                 End If
+            End If
 
             writeLine(RichTextBox, "Verbindung erfolgreich...")
+            'Else
+            '  System.Console.WriteLine("UPDATEPFAD: " & F)
+
         End If
 
         writeLine(RichTextBox, "3 Sekunden warten, um sicherzustellen, dass das Programm beendet wurde...")
@@ -73,14 +97,22 @@ Public Class UPDATERfrm
                     End If
 
                     '---------------------------
-                    delFiles()
-                    FileCopier()
                     '---------------------------
                     'Alternative: 
-                    '---------------------------
+                    '-------
                     'copyAndDelFilesAndDir()
                     '---------------------------
 
+                    '     If Not cut_file(File).Contains("AVISOUPDATER") And Not cut_file(File).Contains("NOT_DEL_") Then
+
+
+                    If CopyIncremental Then
+                        cProgrammeUpdate.copyProgramLIST(F, AppDomain.CurrentDomain.BaseDirectory, {"AVISOUPDATER", "NOT_DEL_"})
+                    Else
+                        delFiles()
+                        FileCopier()
+                    End If
+
 
 
                     If Not System.IO.File.Exists(AppDomain.CurrentDomain.BaseDirectory & "AVISO.exe") Then
@@ -105,6 +137,64 @@ Public Class UPDATERfrm
         Environment.Exit(0)
     End Sub
 
+    Function getFByIP() As String
+        Dim default_F = ""
+        getFByIP = ""
+        Try
+            Dim IPADDR As System.Net.IPAddress
+            IPADDR = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName()).AddressList(0)
+            'MsgBox(IPADDR.ToString())
+
+            For Each l In System.IO.File.ReadAllLines(AppDomain.CurrentDomain.BaseDirectory & "AVISOUPDATER_Settings.txt")
+                If l.Contains("|") Then
+                    Dim sp = l.Split("|")
+                    If IPADDR.ToString.Contains(sp(0).Replace("**", "")) Then
+                        getFByIP = sp(1)
+                    End If
+                Else
+                    default_F = l
+                End If
+            Next
+        Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+        End Try
+        If getFByIP = "" Then
+            If default_F <> "" Then
+                getFByIP = default_F
+            Else
+                getFByIP = F
+            End If
+        End If
+    End Function
+
+
+    Sub buildConnectionUNISPED()
+        Try
+
+            writeLine(RichTextBox, "UNISPED Netzwerkzugriff einrichten...")
+            'Dim netuse1 As New System.Diagnostics.ProcessStartInfo()
+
+            'netuse1.FileName = "C:\Windows\system32\net"
+            'netuse1.Arguments = "use \\10.4.3.17 /User:VERAG 1VerSub9#"
+            'netuse1.CreateNoWindow = True
+            'netuse1.WindowStyle = ProcessWindowStyle.Hidden
+            'System.Diagnostics.Process.Start(netuse1)
+
+            Dim netuse As New System.Diagnostics.ProcessStartInfo()
+
+            netuse.FileName = "C:\Windows\system32\net"
+            netuse.Arguments = "use \\10.4.3.17 /User:VERAG 1VerSub9#"
+            netuse.CreateNoWindow = True
+            netuse.WindowStyle = ProcessWindowStyle.Hidden
+            System.Diagnostics.Process.Start(netuse)
+
+        Catch ex As Exception
+            writeLine(RichTextBox, "ERR: UNISPED Netzwerkzugriff fehlgeschlagen...")
+
+        End Try
+    End Sub
+
+
     Delegate Sub writeLineCallback(rtb As System.Windows.Forms.RichTextBox, text As String)
     Private Sub writeLine(rtb As System.Windows.Forms.RichTextBox, text As String)
         If Me.InvokeRequired Then

AVISOUPDATER/cProgrammeUpdate.vb

@@ -0,0 +1,215 @@
+
+Imports System.Data.SqlClient
+Imports System.Reflection
+
+Public Class cProgrammeUpdate
+    Property pud_progId As Object = Nothing
+    Property pud_codename As String
+    Property pud_version As String
+    Property pud_fileName As String
+    Property pud_filePathFolder As Object = Nothing
+    Property pud_datum As Date = Now
+
+    Property pud_file_Verion As String
+    Property pud_file_Date As Date
+    Property pud_file_Size As Integer
+
+
+    Shared Function getParameterList(UD As cProgrammeUpdate) As List(Of SQLVariable)
+        Dim list As New List(Of SQLVariable)
+        list.Add(New SQLVariable("pud_progId", UD.pud_progId))
+        list.Add(New SQLVariable("pud_codename", UD.pud_codename))
+        list.Add(New SQLVariable("pud_version", UD.pud_version))
+        list.Add(New SQLVariable("pud_fileName", UD.pud_fileName))
+        list.Add(New SQLVariable("pud_filePathFolder", UD.pud_filePathFolder))
+        list.Add(New SQLVariable("pud_datum", UD.pud_datum))
+        list.Add(New SQLVariable("pud_file_Verion", UD.pud_file_Verion))
+        list.Add(New SQLVariable("pud_file_Date", UD.pud_file_Date))
+        list.Add(New SQLVariable("pud_file_Size", UD.pud_file_Size))
+        Return list
+    End Function
+
+
+
+
+    Public Shared Function isNewFile(ByRef file As cProgrammeUpdate, LIST_DEST As List(Of cProgrammeUpdate)) As Boolean
+        For Each l In LIST_DEST
+            If l.pud_filePathFolder = file.pud_filePathFolder And l.pud_fileName = file.pud_fileName And l.pud_file_Size = file.pud_file_Size And l.pud_file_Date = file.pud_file_Date Then
+                Return False
+            End If
+        Next
+        Return True
+    End Function
+
+    Public Shared Function isOldFile(ByRef file As cProgrammeUpdate, LIST_SOURCE As List(Of cProgrammeUpdate)) As Boolean
+        For Each l In LIST_SOURCE
+            If l.pud_filePathFolder = file.pud_filePathFolder And l.pud_fileName = file.pud_fileName And l.pud_file_Size = file.pud_file_Size And l.pud_file_Date = file.pud_file_Date Then
+                Return False
+            End If
+        Next
+        Return True
+    End Function
+
+
+    Public Shared Function copyProgramLIST(ByRef sourcePfad As String, ByVal destPfad As String, ignoreFilesBeginWith As String()) As Boolean
+        Try
+
+            If destPfad.Trim = "" Then Return False
+            If sourcePfad.Trim = "" Then Return False
+
+            If Not My.Computer.FileSystem.DirectoryExists(sourcePfad) Then
+                MsgBox("ERROR_COPY_01: Quell-Ordner existiert nicht.", MsgBoxStyle.Critical, "ERROR") : Return False
+            End If
+            If Not My.Computer.FileSystem.DirectoryExists(destPfad) Then
+                MsgBox("ERROR_COPY_02: Ziel-Ordner existiert nicht.", MsgBoxStyle.Critical, "ERROR") : Return False
+            End If
+
+            Dim LIST_SOURCE As New List(Of cProgrammeUpdate)
+            Dim dirNameReplace_SOURCE = ""
+            Dim DI_SOURCE As New IO.DirectoryInfo(sourcePfad)
+            RekursivGetFiles(DI_SOURCE, dirNameReplace_SOURCE, LIST_SOURCE, {})
+
+            Dim LIST_DEST As New List(Of cProgrammeUpdate)
+            Dim dirNameReplace_DEST = ""
+            Dim DI_DEST As New IO.DirectoryInfo(destPfad)
+            RekursivGetFiles(DI_DEST, dirNameReplace_DEST, LIST_DEST, ignoreFilesBeginWith)
+
+            If LIST_SOURCE.Count = 0 Then
+                MsgBox("ERROR_COPY_01: Quell-Daten existiert nicht.", MsgBoxStyle.Critical, "ERROR") : Return False
+            End If
+            If LIST_DEST.Count = 0 Then
+                MsgBox("ERROR_COPY_02: Ziel-Daten existiert nicht.", MsgBoxStyle.Critical, "ERROR") : Return False
+            End If
+
+            'ORDNER erstellen:
+            For Each f In LIST_SOURCE
+                If If(f.pud_filePathFolder, "") <> "" Then
+                    If Not IO.Directory.Exists(dirNameReplace_DEST & "\" & f.pud_filePathFolder.Replace("\\", "\")) Then
+                        IO.Directory.CreateDirectory(dirNameReplace_DEST & "\" & f.pud_filePathFolder.Replace("\\", "\"))
+                    End If
+                End If
+            Next
+
+            'Löschen der unbenötigten Files:
+            For Each f In LIST_DEST
+                If isOldFile(f, LIST_SOURCE) Then
+                    IO.File.Delete(dirNameReplace_DEST & "\" & If(f.pud_filePathFolder, "") & "\" & f.pud_fileName.Replace("\\", "\"))
+                End If
+            Next
+
+            'Kopieren/Überschreiben der neuen Files:
+            For Each f In LIST_SOURCE
+                If isNewFile(f, LIST_DEST) Then
+                    Dim s_path = dirNameReplace_SOURCE & "\" & If(f.pud_filePathFolder, "") & "\" & f.pud_fileName.Replace("\\", "\")
+                    Dim d_path = dirNameReplace_DEST & "\" & If(f.pud_filePathFolder, "") & "\" & f.pud_fileName.Replace("\\", "\")
+                    IO.File.Copy(s_path, d_path)
+                End If
+            Next
+
+        Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+            Return False
+        End Try
+        '  If isNewFile(destPfad) Then Return FileCopier(sourcePfad, destPfad)
+        Return True
+    End Function
+
+    Public Shared Function fileStartsWith(fileName As String, ignoreFilesBeginWith As String())
+        For Each s In ignoreFilesBeginWith
+            If fileName.StartsWith(s) Then Return True
+        Next
+        Return False
+    End Function
+    Public Shared Sub RekursivGetFiles(ByVal oDir As IO.DirectoryInfo, ByRef dirNameReplace As String, ByRef LIST As List(Of cProgrammeUpdate), ignoreFilesBeginWith As String())
+        Dim oSubDir As IO.DirectoryInfo
+        Dim FI As IO.FileInfo
+
+        ' zunächst alle Dateien des Ordners aufspüren
+        For Each FI In oDir.GetFiles()
+            If Not fileStartsWith(FI.Name, ignoreFilesBeginWith) Then 'DATEIEN beginnen mit betimmten Namen, z.B. UPDATER
+
+
+                ' Dim FI As New IO.FileInfo(oFile)
+                If dirNameReplace = "" Then
+                    dirNameReplace = FI.DirectoryName
+                End If
+
+                Dim UD As New cProgrammeUpdate
+                UD.pud_fileName = FI.Name
+                UD.pud_filePathFolder = FI.DirectoryName.Replace(dirNameReplace, "")
+                If UD.pud_filePathFolder = "" Then UD.pud_filePathFolder = Nothing
+                UD.pud_file_Size = FI.Length
+                UD.pud_file_Date = FI.LastWriteTime
+                UD.pud_file_Verion = "" 'FI.
+                LIST.Add(UD)
+
+            End If
+            'With oFile
+            '    ListBox1.Items.Add(.DirectoryName & "\" & .Name & vbTab &
+            '      .Length & vbTab & .LastWriteTime)
+            'End With
+        Next
+
+        ' Jetzt alle Unterverzeichnis durchlaufen
+        ' und die Prozedur rekursiv selbst aufrufen
+        For Each oSubDir In oDir.GetDirectories()
+            RekursivGetFiles(oSubDir, dirNameReplace, LIST, {})
+        Next
+    End Sub
+
+End Class
+
+Public Class SQLVariable
+    Private TextSQLName As String
+    Private ValueSQLVALUE As Object
+    Private Scalarvariablename As String
+    Private primaryParam As Boolean
+    Private onlyForLoad As Boolean
+
+    Public Sub New(ByVal Text As String, ByVal Value As Object, Optional Scalarvariablename As String = "", Optional primaryParam As Boolean = False, Optional onlyForLoad As Boolean = False)
+        Me.TextSQLName = Text
+        Me.ValueSQLVALUE = Value
+        Me.primaryParam = primaryParam
+        Me.onlyForLoad = onlyForLoad
+
+        If Scalarvariablename <> "" Then Me.Scalarvariablename = Scalarvariablename Else Me.Scalarvariablename = Text
+    End Sub
+
+    Public ReadOnly Property Text() As String
+        Get
+            Return TextSQLName
+        End Get
+    End Property
+
+    Public ReadOnly Property Value() As Object
+        Get
+            Return ValueSQLVALUE
+        End Get
+    End Property
+
+    Public ReadOnly Property Scalarvariable() As Object
+        Get
+            Return Scalarvariablename
+        End Get
+    End Property
+
+    Public ReadOnly Property isPrimaryParam() As Boolean
+        Get
+            Return primaryParam
+        End Get
+    End Property
+
+    Public ReadOnly Property isonlyForLoad() As Boolean
+        Get
+            Return onlyForLoad
+        End Get
+    End Property
+
+
+    '  Public Overrides Function ToString() As Object
+    '      Return mText
+    '  End Function
+
+
+
+End Class

AVISO_CHECKIN/AVISO_CHECKIN.vbproj

@@ -0,0 +1,300 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="15.0" 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>{CB95CC0E-D73A-4D11-9FF8-197A392D831F}</ProjectGuid>
+    <OutputType>WinExe</OutputType>
+    <StartupObject>AVISO_CHECKIN.My.MyApplication</StartupObject>
+    <RootNamespace>AVISO_CHECKIN</RootNamespace>
+    <AssemblyName>AVISO_CHECKIN</AssemblyName>
+    <FileAlignment>512</FileAlignment>
+    <MyType>WindowsForms</MyType>
+    <TargetFrameworkVersion>v4.7</TargetFrameworkVersion>
+    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
+    <Deterministic>true</Deterministic>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <PlatformTarget>x64</PlatformTarget>
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\Debug\</OutputPath>
+    <DocumentationFile>AVISO_CHECKIN.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>AVISO_CHECKIN.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionExplicit>On</OptionExplicit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionCompare>Binary</OptionCompare>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionStrict>Off</OptionStrict>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
+  </PropertyGroup>
+  <ItemGroup>
+    <Reference Include="ClosedXML">
+      <HintPath>..\..\..\dll\ClosedXML.dll</HintPath>
+    </Reference>
+    <Reference Include="DocumentFormat.OpenXml, Version=2.5.5631.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>C:\Program Files (x86)\Common Files\GrapeCity\ActiveReports 12\DocumentFormat.OpenXml.dll</HintPath>
+    </Reference>
+    <Reference Include="Dynamsoft.Forms.Viewer">
+      <HintPath>C:\Program Files (x86)\Dynamsoft\Dynamic .NET TWAIN 8.0\Redistributable\Assembly\For .NETFramework 4.0\Dynamsoft.Forms.Viewer.dll</HintPath>
+    </Reference>
+    <Reference Include="Dynamsoft.ImageCore">
+      <HintPath>C:\Program Files (x86)\Dynamsoft\Dynamic .NET TWAIN 8.0\Redistributable\Assembly\For .NETFramework 4.0\Dynamsoft.ImageCore.dll</HintPath>
+    </Reference>
+    <Reference Include="Dynamsoft.PDF">
+      <HintPath>..\..\SICHERUNG\Aviso_12.02.2018\Aviso\Aviso\bin\Debug\Dynamsoft.PDF.dll</HintPath>
+    </Reference>
+    <Reference Include="Dynamsoft.Twain">
+      <HintPath>C:\Program Files (x86)\Dynamsoft\Dynamic .NET TWAIN 8.0\Redistributable\Assembly\For .NETFramework 4.0\Dynamsoft.Twain.dll</HintPath>
+    </Reference>
+    <Reference Include="Ghostscript.NET">
+      <HintPath>..\..\..\dll\Ghostscript.NET.dll</HintPath>
+    </Reference>
+    <Reference Include="GrapeCity.ActiveReports.Document.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>C:\Program Files (x86)\Common Files\GrapeCity\ActiveReports 12\GrapeCity.ActiveReports.Document.v12.dll</HintPath>
+    </Reference>
+    <Reference Include="GrapeCity.ActiveReports.Export.Document.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>C:\Program Files (x86)\Common Files\GrapeCity\ActiveReports 12\GrapeCity.ActiveReports.Export.Document.v12.dll</HintPath>
+    </Reference>
+    <Reference Include="GrapeCity.ActiveReports.Export.Pdf.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>C:\Program Files (x86)\Common Files\GrapeCity\ActiveReports 12\GrapeCity.ActiveReports.Export.Pdf.v12.dll</HintPath>
+    </Reference>
+    <Reference Include="GrapeCity.ActiveReports.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>C:\Program Files (x86)\Common Files\GrapeCity\ActiveReports 12\GrapeCity.ActiveReports.v12.dll</HintPath>
+    </Reference>
+    <Reference Include="GrapeCity.ActiveReports.Viewer.Win.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>C:\Program Files (x86)\Common Files\GrapeCity\ActiveReports 12\GrapeCity.ActiveReports.Viewer.Win.v12.dll</HintPath>
+    </Reference>
+    <Reference Include="GrapeCity.Documents.Pdf">
+      <HintPath>..\packages\GrapeCity.Documents.Pdf.2.2.0.315\lib\net461\GrapeCity.Documents.Pdf.dll</HintPath>
+    </Reference>
+    <Reference Include="itextsharp">
+      <HintPath>..\..\..\dll\itextsharp.dll</HintPath>
+    </Reference>
+    <Reference Include="NetSpell.SpellChecker">
+      <HintPath>..\..\..\dll\NetSpell.SpellChecker.DLL</HintPath>
+    </Reference>
+    <Reference Include="Newtonsoft.Json, Version=6.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL" />
+    <Reference Include="Spire.Pdf">
+      <HintPath>..\..\..\dll\PDF Spire\6.10\Spire.Pdf.dll</HintPath>
+    </Reference>
+    <Reference Include="System" />
+    <Reference Include="System.Data" />
+    <Reference Include="System.Deployment" />
+    <Reference Include="System.DirectoryServices" />
+    <Reference Include="System.Drawing" />
+    <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="System.Net.Http" />
+  </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="Form1.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="Form1.Designer.vb">
+      <DependentUpon>Form1.vb</DependentUpon>
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmCheckIn.Designer.vb">
+      <DependentUpon>frmCheckIn.vb</DependentUpon>
+    </Compile>
+    <Compile Include="frmCheckIn.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <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="usrCntlFinish.Designer.vb">
+      <DependentUpon>usrCntlFinish.vb</DependentUpon>
+    </Compile>
+    <Compile Include="usrCntlFinish.vb">
+      <SubType>UserControl</SubType>
+    </Compile>
+    <Compile Include="usrCntlFound.Designer.vb">
+      <DependentUpon>usrCntlFound.vb</DependentUpon>
+    </Compile>
+    <Compile Include="usrCntlFound.vb">
+      <SubType>UserControl</SubType>
+    </Compile>
+    <Compile Include="usrCntlSearch.Designer.vb">
+      <DependentUpon>usrCntlSearch.vb</DependentUpon>
+    </Compile>
+    <Compile Include="usrCntlSearch.vb">
+      <SubType>UserControl</SubType>
+    </Compile>
+    <Compile Include="usrCntlWelcome.Designer.vb">
+      <DependentUpon>usrCntlWelcome.vb</DependentUpon>
+    </Compile>
+    <Compile Include="usrCntlWelcome.vb">
+      <SubType>UserControl</SubType>
+    </Compile>
+  </ItemGroup>
+  <ItemGroup>
+    <EmbeddedResource Include="frmCheckIn.resx">
+      <DependentUpon>frmCheckIn.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="usrCntlFinish.resx">
+      <DependentUpon>usrCntlFinish.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="usrCntlFound.resx">
+      <DependentUpon>usrCntlFound.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="usrCntlSearch.resx">
+      <DependentUpon>usrCntlSearch.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="usrCntlWelcome.resx">
+      <DependentUpon>usrCntlWelcome.vb</DependentUpon>
+    </EmbeddedResource>
+  </ItemGroup>
+  <ItemGroup>
+    <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" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\flag_srb.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\flag_srb2.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\flag_tr.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\handy_QR.jpg" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\lan_de.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\lan_eng.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\qr_search.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\timer.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\searchGG.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <ProjectReference Include="..\..\..\SDL\SDL\SDL\SDL.vbproj">
+      <Project>{289bcd77-bc00-4ba1-95ed-a79176d99525}</Project>
+      <Name>SDL</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
+      <Project>{A3B497BD-842C-4A2B-B398-ED1976849DF1}</Project>
+      <Name>VERAG_PROG_ALLGEMEIN</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\Aviso\Aviso.vbproj">
+      <Project>{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}</Project>
+      <Name>Aviso</Name>
+    </ProjectReference>
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\LKW_mit_Aufleger.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\LKW.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Sprinter.jpg" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Sprinter.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Logo_blue_globe_Horizontal.jpg" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\FO_white.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\EMail-Signatur.jpg" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Verag-AG-Logopng.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Unisped_logo.jpg" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\IMEX-LOGO_simple.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\fragezeichen.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\brexit.png" />
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+</Project>

AVISO_CHECKIN/App.config

@@ -0,0 +1,38 @@
+<?xml version="1.0" encoding="utf-8"?>
+<configuration>
+    <startup>
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7" />
+    </startup>
+  <runtime>
+    <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
+      <dependentAssembly>
+        <assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-12.0.0.0" newVersion="12.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="GrapeCity.Documents.Common" publicKeyToken="d55d733d2bfd5065" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-4.2.0.722" newVersion="4.2.0.722" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="Spire.License" publicKeyToken="b1144360237c8b3f" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-1.3.15.46" newVersion="1.3.15.46" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="GrapeCity.Documents.Pdf" publicKeyToken="d55d733d2bfd5065" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-2.2.0.315" newVersion="2.2.0.315" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="Spire.Pdf" publicKeyToken="663f351905198cb3" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-6.10.0.0" newVersion="6.10.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="BouncyCastle.Crypto" publicKeyToken="0e99375e54769942" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-1.8.2.0" newVersion="1.8.2.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="DocumentFormat.OpenXml" publicKeyToken="8fb06cb64d019a17" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-2.7.2.0" newVersion="2.7.2.0" />
+      </dependentAssembly>
+    </assemblyBinding>
+  </runtime>
+</configuration>

AVISO_CHECKIN/Form1.Designer.vb

@@ -0,0 +1,31 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class Form1
+    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()
+        components = New System.ComponentModel.Container()
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(800, 450)
+        Me.Text = "Form1"
+    End Sub
+
+End Class

AVISO_CHECKIN/Form1.vb

@@ -0,0 +1,3 @@
+Public Class Form1
+
+End Class

AVISO_CHECKIN/My Project/Application.Designer.vb

@@ -0,0 +1,38 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden.  Wenn Sie Änderungen vornehmen möchten
+    ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
+    ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
+    ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
+    '
+    Partial Friend Class MyApplication
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Public Sub New()
+            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
+            Me.IsSingleInstance = false
+            Me.EnableVisualStyles = true
+            Me.SaveMySettingsOnExit = true
+            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
+        End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Sub OnCreateMainForm()
+            Me.MainForm = Global.AVISO_CHECKIN.frmCheckIn
+        End Sub
+    End Class
+End Namespace

AVISO_CHECKIN/My Project/Application.myapp

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <MySubMain>true</MySubMain>
+  <MainForm>frmCheckIn</MainForm>
+  <SingleInstance>false</SingleInstance>
+  <ShutdownMode>0</ShutdownMode>
+  <EnableVisualStyles>true</EnableVisualStyles>
+  <AuthenticationMode>0</AuthenticationMode>
+  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
+</MyApplicationData>

AVISO_CHECKIN/My Project/AssemblyInfo.vb

@@ -0,0 +1,35 @@
+Imports System
+Imports System.Reflection
+Imports System.Runtime.InteropServices
+
+' Allgemeine Informationen über eine Assembly werden über die folgenden
+' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
+' die einer Assembly zugeordnet sind.
+
+' Werte der Assemblyattribute überprüfen
+
+<Assembly: AssemblyTitle("AVISO_CHECKIN")>
+<Assembly: AssemblyDescription("")>
+<Assembly: AssemblyCompany("")>
+<Assembly: AssemblyProduct("AVISO_CHECKIN")>
+<Assembly: AssemblyCopyright("Copyright ©  2020")>
+<Assembly: AssemblyTrademark("")>
+
+<Assembly: ComVisible(False)>
+
+'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
+<Assembly: Guid("09cd248d-00b5-4889-95a8-8a01842d88d9")>
+
+' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
+'
+'      Hauptversion
+'      Nebenversion
+'      Buildnummer
+'      Revision
+'
+' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
+' übernehmen, indem Sie "*" eingeben:
+' <Assembly: AssemblyVersion("1.0.*")>
+
+<Assembly: AssemblyVersion("1.0.0.0")>
+<Assembly: AssemblyFileVersion("1.0.0.0")>

AVISO_CHECKIN/My Project/Resources.Designer.vb

@@ -0,0 +1,293 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
+    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
+    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
+    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
+    '''<summary>
+    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("AVISO_CHECKIN.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
+        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
+        '''</summary>
+        Friend ReadOnly Property DGS_Instructions_Export() As Byte()
+            Get
+                Dim obj As Object = ResourceManager.GetObject("DGS_Instructions_Export", resourceCulture)
+                Return CType(obj,Byte())
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
+        '''</summary>
+        Friend ReadOnly Property DGS_Instructions_Export_T1() As Byte()
+            Get
+                Dim obj As Object = ResourceManager.GetObject("DGS_Instructions_Export_T1", resourceCulture)
+                Return CType(obj,Byte())
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Byte[].
+        '''</summary>
+        Friend ReadOnly Property DGS_Instructions_Import() As Byte()
+            Get
+                Dim obj As Object = ResourceManager.GetObject("DGS_Instructions_Import", resourceCulture)
+                Return CType(obj,Byte())
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property EMail_Signatur() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("EMail-Signatur", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property flag_srb() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("flag_srb", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property flag_srb2() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("flag_srb2", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property flag_tr() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("flag_tr", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property FO_white() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("FO_white", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property fragezeichen() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("fragezeichen", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property handy_QR() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("handy_QR", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property IMEX_LOGO_simple() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("IMEX-LOGO_simple", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property lan_de() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("lan_de", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property lan_eng() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("lan_eng", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property LKW() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("LKW", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property LKW_mit_Aufleger() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("LKW_mit_Aufleger", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Logo_blue_globe_Horizontal() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Logo_blue_globe_Horizontal", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property qr_search() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("qr_search", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property searchGG() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("searchGG", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Sprinter() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Sprinter", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Sprinter1() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Sprinter1", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property timer() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("timer", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Unisped_logo() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Unisped_logo", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Verag_AG_Logopng() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Verag-AG-Logopng", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+    End Module
+End Namespace

AVISO_CHECKIN/My Project/Resources.resx

@@ -0,0 +1,190 @@
+<?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.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="Sprinter" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Sprinter.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="EMail-Signatur" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\EMail-Signatur.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="LKW_mit_Aufleger" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\LKW_mit_Aufleger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="lan_de" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\lan_de.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="lan_eng" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\lan_eng.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="handy_QR" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\handy_QR.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Logo_blue_globe_Horizontal" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Logo_blue_globe_Horizontal.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="qr_search" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\qr_search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_tr" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_tr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="searchGG" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\searchGG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Sprinter1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Sprinter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="FO_white" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\FO_white.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_srb" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_srb.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="timer" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\timer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Unisped_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Unisped_logo.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="IMEX-LOGO_simple" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\IMEX-LOGO_simple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="LKW" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\LKW.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_srb2" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_srb2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Verag-AG-Logopng" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\Verag-AG-Logopng.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="fragezeichen" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\fragezeichen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="DGS_Instructions_Export" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\..\aviso\resources\dgs_instructions_export.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="DGS_Instructions_Export_T1" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\..\aviso\resources\dgs_instructions_export_t1.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+  <data name="DGS_Instructions_Import" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\..\aviso\resources\dgs_instructions_import.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </data>
+</root>

AVISO_CHECKIN/My Project/Settings.Designer.vb

@@ -0,0 +1,73 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.42000
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Partial Friend NotInheritable Class MySettings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+
+        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
+
+#Region "My.Settings Auto-Save Functionality"
+#If _MyType = "WindowsForms" Then
+        Private Shared addedHandler As Boolean
+
+        Private Shared addedHandlerLockObject As New Object
+
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+        Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+            If My.Application.SaveMySettingsOnExit Then
+                My.Settings.Save()
+            End If
+        End Sub
+#End If
+#End Region
+
+        Public Shared ReadOnly Property [Default]() As MySettings
+            Get
+
+#If _MyType = "WindowsForms" Then
+                   If Not addedHandler Then
+                        SyncLock addedHandlerLockObject
+                            If Not addedHandler Then
+                                AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                                addedHandler = True
+                            End If
+                        End SyncLock
+                    End If
+#End If
+                Return defaultInstance
+            End Get
+        End Property
+    End Class
+End Namespace
+
+Namespace My
+
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
+    Friend Module MySettingsProperty
+
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
+        Friend ReadOnly Property Settings() As Global.AVISO_CHECKIN.My.MySettings
+            Get
+                Return Global.AVISO_CHECKIN.My.MySettings.Default
+            End Get
+        End Property
+    End Module
+End Namespace

AVISO_CHECKIN/My Project/Settings.settings

@@ -0,0 +1,7 @@
+<?xml version='1.0' encoding='utf-8'?>
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
+  <Profiles>
+    <Profile Name="(Default)" />
+  </Profiles>
+  <Settings />
+</SettingsFile>

AVISO_CHECKIN/My Project/licenses.licx

@@ -0,0 +1,5 @@
+GrapeCity.ActiveReports.SectionReport, GrapeCity.ActiveReports.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff
+GrapeCity.ActiveReports.Viewer.Win.Viewer, GrapeCity.ActiveReports.Viewer.Win.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff
+Spire.PdfViewer.Forms.PdfDocumentViewer, Spire.PdfViewer.Forms, Version=4.5.1.3046, Culture=neutral, PublicKeyToken=663f351905198cb3
+GrapeCity.ActiveReports.Export.Excel.Section.XlsExport, GrapeCity.ActiveReports.Export.Excel.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff
+GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport, GrapeCity.ActiveReports.Export.Pdf.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff

AVISO_CHECKIN/frmCheckIn.Designer.vb

@@ -0,0 +1,329 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmCheckIn
+    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(frmCheckIn))
+        Me.pnl = New System.Windows.Forms.Panel()
+        Me.Panel3 = New System.Windows.Forms.Panel()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.btnResetSearch = New System.Windows.Forms.Button()
+        Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel()
+        Me.Button4 = New System.Windows.Forms.Button()
+        Me.Button5 = New System.Windows.Forms.Button()
+        Me.lbl = New System.Windows.Forms.Label()
+        Me.Panel = New System.Windows.Forms.Panel()
+        Me.Timer = New System.Windows.Forms.Timer(Me.components)
+        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
+        Me.timerResetDefault = New System.Windows.Forms.Timer(Me.components)
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Button3 = New System.Windows.Forms.Button()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.pnl.SuspendLayout()
+        Me.Panel1.SuspendLayout()
+        Me.FlowLayoutPanel.SuspendLayout()
+        Me.Panel.SuspendLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'pnl
+        '
+        Me.pnl.BackColor = System.Drawing.Color.White
+        Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnl.Controls.Add(Me.Panel3)
+        Me.pnl.Controls.Add(Me.Panel1)
+        Me.pnl.Controls.Add(Me.Panel)
+        Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.pnl.Location = New System.Drawing.Point(0, 0)
+        Me.pnl.Name = "pnl"
+        Me.pnl.Size = New System.Drawing.Size(1577, 559)
+        Me.pnl.TabIndex = 1
+        '
+        'Panel3
+        '
+        Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Panel3.Location = New System.Drawing.Point(0, 121)
+        Me.Panel3.Name = "Panel3"
+        Me.Panel3.Size = New System.Drawing.Size(1575, 364)
+        Me.Panel3.TabIndex = 9
+        '
+        'Panel1
+        '
+        Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel1.Controls.Add(Me.Label1)
+        Me.Panel1.Controls.Add(Me.btnResetSearch)
+        Me.Panel1.Controls.Add(Me.FlowLayoutPanel)
+        Me.Panel1.Controls.Add(Me.lbl)
+        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel1.Location = New System.Drawing.Point(0, 0)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(1575, 121)
+        Me.Panel1.TabIndex = 2
+        '
+        'Label1
+        '
+        Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label1.Font = New System.Drawing.Font("Arial", 50.0!, System.Drawing.FontStyle.Bold)
+        Me.Label1.ForeColor = System.Drawing.Color.White
+        Me.Label1.Location = New System.Drawing.Point(467, -1)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(565, 121)
+        Me.Label1.TabIndex = 3
+        Me.Label1.Text = "SELF CHECK-IN"
+        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'btnResetSearch
+        '
+        Me.btnResetSearch.BackColor = System.Drawing.Color.FromArgb(CType(CType(210, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.btnResetSearch.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnResetSearch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnResetSearch.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!)
+        Me.btnResetSearch.ForeColor = System.Drawing.Color.White
+        Me.btnResetSearch.Location = New System.Drawing.Point(14, 3)
+        Me.btnResetSearch.Name = "btnResetSearch"
+        Me.btnResetSearch.Size = New System.Drawing.Size(236, 51)
+        Me.btnResetSearch.TabIndex = 1
+        Me.btnResetSearch.Text = "X    RESET"
+        Me.btnResetSearch.UseVisualStyleBackColor = False
+        Me.btnResetSearch.Visible = False
+        '
+        'FlowLayoutPanel
+        '
+        Me.FlowLayoutPanel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.FlowLayoutPanel.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.FlowLayoutPanel.Controls.Add(Me.btn)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button1)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button2)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button4)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button5)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button3)
+        Me.FlowLayoutPanel.Location = New System.Drawing.Point(1073, 3)
+        Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
+        Me.FlowLayoutPanel.Size = New System.Drawing.Size(491, 75)
+        Me.FlowLayoutPanel.TabIndex = 2
+        '
+        'Button4
+        '
+        Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button4.Location = New System.Drawing.Point(246, 3)
+        Me.Button4.Name = "Button4"
+        Me.Button4.Size = New System.Drawing.Size(75, 63)
+        Me.Button4.TabIndex = 4
+        Me.Button4.Tag = "RUS"
+        Me.Button4.UseVisualStyleBackColor = True
+        Me.Button4.Visible = False
+        '
+        'Button5
+        '
+        Me.Button5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button5.Location = New System.Drawing.Point(327, 3)
+        Me.Button5.Name = "Button5"
+        Me.Button5.Size = New System.Drawing.Size(75, 63)
+        Me.Button5.TabIndex = 5
+        Me.Button5.Tag = "BG"
+        Me.Button5.UseVisualStyleBackColor = True
+        Me.Button5.Visible = False
+        '
+        'lbl
+        '
+        Me.lbl.AutoSize = True
+        Me.lbl.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
+        Me.lbl.ForeColor = System.Drawing.Color.White
+        Me.lbl.Location = New System.Drawing.Point(10, 57)
+        Me.lbl.Name = "lbl"
+        Me.lbl.Size = New System.Drawing.Size(240, 20)
+        Me.lbl.TabIndex = 0
+        Me.lbl.Text = "Bitte scannen Sie den QR-Code:"
+        Me.lbl.Visible = False
+        '
+        'Panel
+        '
+        Me.Panel.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Panel.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel.Controls.Add(Me.Label3)
+        Me.Panel.Controls.Add(Me.Label2)
+        Me.Panel.Controls.Add(Me.PictureBox1)
+        Me.Panel.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.Panel.Location = New System.Drawing.Point(0, 485)
+        Me.Panel.Name = "Panel"
+        Me.Panel.Size = New System.Drawing.Size(1575, 72)
+        Me.Panel.TabIndex = 0
+        '
+        'Timer
+        '
+        Me.Timer.Interval = 1000
+        '
+        'Timer1
+        '
+        Me.Timer1.Enabled = True
+        '
+        'timerResetDefault
+        '
+        Me.timerResetDefault.Enabled = True
+        Me.timerResetDefault.Interval = 5000
+        '
+        'Label2
+        '
+        Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
+        Me.Label2.ForeColor = System.Drawing.Color.White
+        Me.Label2.Location = New System.Drawing.Point(1387, 5)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(179, 60)
+        Me.Label2.TabIndex = 4
+        Me.Label2.Text = "Tel.: +43 7711 / 31636 0" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "suben@front-office.eu" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "www.front-office.eu"
+        Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'Label3
+        '
+        Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
+        Me.Label3.ForeColor = System.Drawing.Color.White
+        Me.Label3.Location = New System.Drawing.Point(7, 6)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(171, 60)
+        Me.Label3.TabIndex = 19
+        Me.Label3.Text = "Front-Office Suben eG" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Suben Nr. 14" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "A 4975 Suben"
+        '
+        'btn
+        '
+        Me.btn.BackgroundImage = CType(resources.GetObject("btn.BackgroundImage"), System.Drawing.Image)
+        Me.btn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.btn.Location = New System.Drawing.Point(3, 3)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(75, 63)
+        Me.btn.TabIndex = 0
+        Me.btn.Tag = "DE"
+        Me.btn.UseVisualStyleBackColor = True
+        '
+        'Button1
+        '
+        Me.Button1.BackgroundImage = CType(resources.GetObject("Button1.BackgroundImage"), System.Drawing.Image)
+        Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button1.Location = New System.Drawing.Point(84, 3)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 63)
+        Me.Button1.TabIndex = 1
+        Me.Button1.Tag = "EN"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.BackgroundImage = CType(resources.GetObject("Button2.BackgroundImage"), System.Drawing.Image)
+        Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button2.Location = New System.Drawing.Point(165, 3)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(75, 63)
+        Me.Button2.TabIndex = 2
+        Me.Button2.Tag = "SRB"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'Button3
+        '
+        Me.Button3.BackgroundImage = CType(resources.GetObject("Button3.BackgroundImage"), System.Drawing.Image)
+        Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button3.Location = New System.Drawing.Point(408, 3)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(75, 63)
+        Me.Button3.TabIndex = 3
+        Me.Button3.Tag = "TR"
+        Me.Button3.UseVisualStyleBackColor = True
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.PictureBox1.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.FO_white
+        Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox1.Location = New System.Drawing.Point(480, 12)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(552, 54)
+        Me.PictureBox1.TabIndex = 18
+        Me.PictureBox1.TabStop = False
+        '
+        'frmCheckIn
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1577, 559)
+        Me.Controls.Add(Me.pnl)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmCheckIn"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Info"
+        Me.TopMost = True
+        Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
+        Me.pnl.ResumeLayout(False)
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel1.PerformLayout()
+        Me.FlowLayoutPanel.ResumeLayout(False)
+        Me.Panel.ResumeLayout(False)
+        Me.Panel.PerformLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents pnl As Panel
+    Friend WithEvents Panel1 As Panel
+    Friend WithEvents lbl As Label
+    Friend WithEvents Panel As Panel
+    Friend WithEvents FlowLayoutPanel As FlowLayoutPanel
+    Friend WithEvents btn As Button
+    Friend WithEvents Timer As Timer
+    Friend WithEvents btnResetSearch As Button
+    Friend WithEvents Timer1 As Timer
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+    Friend WithEvents Button3 As Button
+    Friend WithEvents Button4 As Button
+    Friend WithEvents Button5 As Button
+    Public WithEvents timerResetDefault As Timer
+    Friend WithEvents Panel3 As Panel
+    Friend WithEvents Label1 As Label
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents Label3 As Label
+    Friend WithEvents Label2 As Label
+End Class

AVISO_CHECKIN/frmCheckIn.vb

@@ -0,0 +1,106 @@
+
+Public Class frmCheckIn
+    Dim cAvisoDAL As New VERAG_PROG_ALLGEMEIN.cAvisoDAL
+    Dim LAN = "DE"
+
+    Private Sub frmInfo_Load(sender As Object, e As EventArgs) Handles Me.Load
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
+        Dim cOptionenDAL As New SDL.cOptionenDAL
+        If Not cOptionenDAL.checkLogin("CHECKIN", "CHECKIN", "AVISO") Then 'XXXXXX Or true
+            Me.Close()
+        End If
+
+        'VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "FRONTOFFICE"
+        'VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG = "SUB"
+
+        SET_WELCOME()
+
+    End Sub
+
+
+    Public Sub SET_WELCOME()
+        LAN = "DE"
+        Panel.Visible = True
+        btnResetSearch.Visible = False
+        FlowLayoutPanel.Visible = False
+        '    PictureBox1.Visible = False
+        If Panel3.Controls.Count > 0 Then Panel3.Controls(0).Dispose() : Panel3.Controls.Clear()
+        Dim USRCNTL As New usrCntlWelcome(Me)
+        setPos(USRCNTL)
+        Panel3.Controls.Add(USRCNTL)
+    End Sub
+
+    Public Sub SET_LANGUAGE(LAN)
+        Me.LAN = LAN
+    End Sub
+
+    Public Sub SET_SEARCH()
+        Panel.Visible = False
+        btnResetSearch.Visible = True
+        FlowLayoutPanel.Visible = True
+        ' PictureBox1.Visible = True
+        If Panel3.Controls.Count > 0 Then Panel3.Controls(0).Dispose() : Panel3.Controls.Clear()
+        Dim USRCNTL As New usrCntlSearch(Me)
+        setPos(USRCNTL)
+        Panel3.Controls.Add(USRCNTL)
+    End Sub
+
+    Public Sub SET_FOUND(AvisoId)
+        Panel.Visible = False
+        btnResetSearch.Visible = True
+        FlowLayoutPanel.Visible = True
+        '  PictureBox1.Visible = True
+        If Panel3.Controls.Count > 0 Then Panel3.Controls(0).Dispose() : Panel3.Controls.Clear()
+        Dim USRCNTL As New usrCntlFound(Me, cAvisoDAL.LesenAviso(AvisoId, ""))
+        setPos(USRCNTL)
+        Panel3.Controls.Add(USRCNTL)
+    End Sub
+
+    Public Sub SET_FINISH(AVISO)
+        Panel.Visible = False
+        btnResetSearch.Visible = True
+        FlowLayoutPanel.Visible = True
+        '  PictureBox1.Visible = True
+        If Panel3.Controls.Count > 0 Then Panel3.Controls(0).Dispose() : Panel3.Controls.Clear()
+        Dim USRCNTL As New usrCntlFinish(Me, AVISO)
+        setPos(USRCNTL, True)
+        Panel3.Controls.Add(USRCNTL)
+    End Sub
+
+    Public Sub TRANSLATE(CNTL As Control, Optional forceDETraslation As Boolean = False)
+        If LAN = "DE" And Not forceDETraslation Then Exit Sub
+        Exit Sub 'TEST
+        For Each c As Control In CNTL.Controls
+            If c.Controls.Count > 0 Then
+                TRANSLATE(c)
+            Else
+                Select Case c.GetType.ToString
+                    Case GetType(TextBox).ToString
+                        'NIX
+                    Case GetType(Label).ToString, GetType(CheckBox).ToString, GetType(Button).ToString
+                        c.Text = "OOO"
+                End Select
+            End If
+
+        Next
+    End Sub
+
+    Sub setPos(ByRef USRCNTL As Control, Optional fill As Boolean = False)
+        If fill Then
+            USRCNTL.Dock = DockStyle.Fill
+        Else
+            USRCNTL.Left = (Panel3.Width - USRCNTL.Width) / 2
+            USRCNTL.Top = 0
+            USRCNTL.Height = Panel3.Height
+        End If
+    End Sub
+
+    Private Sub btnResetSearch_Click(sender As Object, e As EventArgs) Handles btnResetSearch.Click
+        SET_WELCOME()
+    End Sub
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click, Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click
+        LAN = sender.tag
+        TRANSLATE(Me)
+    End Sub '
+End Class

AVISO_CHECKIN/usrCntlFinish.Designer.vb

@@ -0,0 +1,160 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class usrCntlFinish
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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()
+        Me.lblKennzeichen = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.Timer = New System.Windows.Forms.Timer(Me.components)
+        Me.PictureBox2 = New System.Windows.Forms.PictureBox()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'lblKennzeichen
+        '
+        Me.lblKennzeichen.BackColor = System.Drawing.Color.SeaGreen
+        Me.lblKennzeichen.Dock = System.Windows.Forms.DockStyle.Top
+        Me.lblKennzeichen.Font = New System.Drawing.Font("Microsoft Sans Serif", 60.0!, System.Drawing.FontStyle.Bold)
+        Me.lblKennzeichen.ForeColor = System.Drawing.Color.White
+        Me.lblKennzeichen.Location = New System.Drawing.Point(0, 0)
+        Me.lblKennzeichen.Name = "lblKennzeichen"
+        Me.lblKennzeichen.Size = New System.Drawing.Size(1562, 165)
+        Me.lblKennzeichen.TabIndex = 4
+        Me.lblKennzeichen.Text = "FERTIG!"
+        Me.lblKennzeichen.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'Label3
+        '
+        Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label3.Location = New System.Drawing.Point(785, 200)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(293, 46)
+        Me.Label3.TabIndex = 10
+        Me.Label3.Text = "2. AKT:"
+        '
+        'btn
+        '
+        Me.btn.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btn.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!)
+        Me.btn.ForeColor = System.Drawing.Color.White
+        Me.btn.Location = New System.Drawing.Point(605, 788)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(347, 87)
+        Me.btn.TabIndex = 19
+        Me.btn.Text = "RESET (30)"
+        Me.btn.UseVisualStyleBackColor = False
+        '
+        'Label1
+        '
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label1.Location = New System.Drawing.Point(72, 200)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(293, 46)
+        Me.Label1.TabIndex = 20
+        Me.Label1.Text = "1. TICKET:"
+        '
+        'Label2
+        '
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label2.Location = New System.Drawing.Point(72, 647)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(682, 46)
+        Me.Label2.TabIndex = 22
+        Me.Label2.Text = "TICKET BITTE BEHALTEN"
+        '
+        'Label4
+        '
+        Me.Label4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label4.Location = New System.Drawing.Point(785, 647)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(688, 121)
+        Me.Label4.TabIndex = 23
+        Me.Label4.Text = "BITTE ALLE UNTERLAGEN IN DEN AKT GEBEN" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "UND INS FRONT-OFFICE BRINGEN"
+        '
+        'Timer
+        '
+        Me.Timer.Enabled = True
+        Me.Timer.Interval = 1000
+        '
+        'PictureBox2
+        '
+        Me.PictureBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.PictureBox2.Location = New System.Drawing.Point(792, 249)
+        Me.PictureBox2.Name = "PictureBox2"
+        Me.PictureBox2.Size = New System.Drawing.Size(681, 395)
+        Me.PictureBox2.TabIndex = 24
+        Me.PictureBox2.TabStop = False
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.Location = New System.Drawing.Point(79, 249)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(675, 395)
+        Me.PictureBox1.TabIndex = 21
+        Me.PictureBox1.TabStop = False
+        '
+        'usrCntlFinish
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.Controls.Add(Me.PictureBox2)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.PictureBox1)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.btn)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.lblKennzeichen)
+        Me.Name = "usrCntlFinish"
+        Me.Size = New System.Drawing.Size(1562, 878)
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents lblKennzeichen As Label
+    Friend WithEvents Label3 As Label
+    Friend WithEvents PictureBox2 As PictureBox
+    Friend WithEvents btn As Button
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Label4 As Label
+    Friend WithEvents Timer As Timer
+End Class

AVISO_CHECKIN/usrCntlFinish.resx

@@ -0,0 +1,123 @@
+<?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>
+  <metadata name="Timer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+</root>

AVISO_CHECKIN/usrCntlFinish.vb

@@ -0,0 +1,55 @@
+Imports AVISO
+
+Public Class usrCntlFinish
+
+    Dim MAIN As frmCheckIn
+    Dim AVISO As VERAG_PROG_ALLGEMEIN.cAviso
+
+    Sub New(MAIN, AVISO)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.MAIN = MAIN
+        Me.AVISO = AVISO
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+    Private Sub usrCntlFound_Load(sender As Object, e As EventArgs) Handles Me.Load
+        MAIN.TRANSLATE(Me)
+        If AVISO IsNot Nothing Then
+
+            Dim printerINFO = SDL.cProgramFunctions.getDruckernameBySearch("INFO", True)
+            Dim printerStandard = SDL.cProgramFunctions.getDruckernameBySearch("XXXXXXX", True)
+
+            ' If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("TICKET_ANKUNFT") Then
+            Dim rpt As New rptQRAviso(AVISO)
+            If printerINFO <> "" Then
+                SDL.cProgramFunctions.printRpt(rpt, printerINFO, True)
+            Else
+                SDL.cProgramFunctions.showRpt(rpt, "AVISO", False)
+            End If
+            'End If
+
+            SDL.FormularManagerNEU.Sammelakt_CheckIn(AVISO, Nothing, True, printerStandard)
+
+        Else
+            MAIN.SET_WELCOME()
+        End If
+
+
+    End Sub
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
+        MAIN.SET_WELCOME()
+    End Sub
+
+    Dim cnt = 30
+    Private Sub Timer_Tick(sender As Object, e As EventArgs) Handles Timer.Tick
+        If cnt = 0 Then
+            MAIN.SET_WELCOME()
+        End If
+        btn.Text = "RESET (" & cnt & ")"
+        cnt -= 1
+    End Sub
+End Class

AVISO_CHECKIN/usrCntlFound.Designer.vb

@@ -0,0 +1,410 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class usrCntlFound
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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.lblKennzeichen = New System.Windows.Forms.Label()
+        Me.txtFahrername = New System.Windows.Forms.TextBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.txtHandy = New System.Windows.Forms.TextBox()
+        Me.cbxHandyKeineAngabe = New System.Windows.Forms.CheckBox()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.lblAvisierer = New System.Windows.Forms.Label()
+        Me.lblFraechter = New System.Windows.Forms.Label()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.lblErrName = New System.Windows.Forms.Label()
+        Me.lblErrHandy = New System.Windows.Forms.Label()
+        Me.lblErrFahrzeugtyp = New System.Windows.Forms.Label()
+        Me.PictureBox2 = New System.Windows.Forms.PictureBox()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.pic = New System.Windows.Forms.PictureBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.CheckBox1 = New System.Windows.Forms.CheckBox()
+        Me.CheckBox2 = New System.Windows.Forms.CheckBox()
+        Me.CheckBox3 = New System.Windows.Forms.CheckBox()
+        Me.CheckBox4 = New System.Windows.Forms.CheckBox()
+        Me.lblErrSpedition = New System.Windows.Forms.Label()
+        Me.pnl = New System.Windows.Forms.Panel()
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnl.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'lblKennzeichen
+        '
+        Me.lblKennzeichen.BackColor = System.Drawing.Color.PapayaWhip
+        Me.lblKennzeichen.Font = New System.Drawing.Font("Microsoft Sans Serif", 60.0!, System.Drawing.FontStyle.Bold)
+        Me.lblKennzeichen.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
+        Me.lblKennzeichen.Location = New System.Drawing.Point(675, 58)
+        Me.lblKennzeichen.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblKennzeichen.Name = "lblKennzeichen"
+        Me.lblKennzeichen.Size = New System.Drawing.Size(1560, 195)
+        Me.lblKennzeichen.TabIndex = 4
+        Me.lblKennzeichen.Text = "34SD123AD/34SD123AD"
+        Me.lblKennzeichen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        '
+        'txtFahrername
+        '
+        Me.txtFahrername.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!)
+        Me.txtFahrername.Location = New System.Drawing.Point(1110, 475)
+        Me.txtFahrername.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.txtFahrername.Name = "txtFahrername"
+        Me.txtFahrername.Size = New System.Drawing.Size(1123, 75)
+        Me.txtFahrername.TabIndex = 5
+        '
+        'Label2
+        '
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label2.Location = New System.Drawing.Point(54, 45)
+        Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(520, 71)
+        Me.Label2.TabIndex = 9
+        Me.Label2.Text = "Bitte Typ auswählen:"
+        '
+        'Label3
+        '
+        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label3.Location = New System.Drawing.Point(662, 475)
+        Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(440, 71)
+        Me.Label3.TabIndex = 10
+        Me.Label3.Text = "Soför Name:"
+        '
+        'Label4
+        '
+        Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label4.Location = New System.Drawing.Point(662, 566)
+        Me.Label4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(440, 71)
+        Me.Label4.TabIndex = 12
+        Me.Label4.Text = "Handy-Nr (SMS):"
+        '
+        'txtHandy
+        '
+        Me.txtHandy.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!)
+        Me.txtHandy.Location = New System.Drawing.Point(1110, 566)
+        Me.txtHandy.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.txtHandy.Name = "txtHandy"
+        Me.txtHandy.Size = New System.Drawing.Size(1123, 75)
+        Me.txtHandy.TabIndex = 11
+        '
+        'cbxHandyKeineAngabe
+        '
+        Me.cbxHandyKeineAngabe.AutoSize = True
+        Me.cbxHandyKeineAngabe.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.cbxHandyKeineAngabe.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.cbxHandyKeineAngabe.Location = New System.Drawing.Point(1110, 657)
+        Me.cbxHandyKeineAngabe.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.cbxHandyKeineAngabe.Name = "cbxHandyKeineAngabe"
+        Me.cbxHandyKeineAngabe.Size = New System.Drawing.Size(365, 62)
+        Me.cbxHandyKeineAngabe.TabIndex = 13
+        Me.cbxHandyKeineAngabe.Text = "Keine Angabe"
+        Me.cbxHandyKeineAngabe.UseVisualStyleBackColor = True
+        '
+        'Label5
+        '
+        Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.0!)
+        Me.Label5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label5.Location = New System.Drawing.Point(1102, 715)
+        Me.Label5.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(854, 51)
+        Me.Label5.TabIndex = 14
+        Me.Label5.Text = "(Sie erhalen keine Nachrichten, wenn der LKW fertig ist)"
+        '
+        'lblAvisierer
+        '
+        Me.lblAvisierer.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold)
+        Me.lblAvisierer.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.lblAvisierer.Location = New System.Drawing.Point(672, 354)
+        Me.lblAvisierer.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblAvisierer.Name = "lblAvisierer"
+        Me.lblAvisierer.Size = New System.Drawing.Size(1563, 71)
+        Me.lblAvisierer.TabIndex = 18
+        Me.lblAvisierer.Text = "Avisierer"
+        Me.lblAvisierer.TextAlign = System.Drawing.ContentAlignment.TopRight
+        Me.lblAvisierer.Visible = False
+        '
+        'lblFraechter
+        '
+        Me.lblFraechter.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!, System.Drawing.FontStyle.Bold)
+        Me.lblFraechter.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.lblFraechter.Location = New System.Drawing.Point(672, 263)
+        Me.lblFraechter.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblFraechter.Name = "lblFraechter"
+        Me.lblFraechter.Size = New System.Drawing.Size(1563, 71)
+        Me.lblFraechter.TabIndex = 17
+        Me.lblFraechter.Text = "Firma"
+        Me.lblFraechter.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'btn
+        '
+        Me.btn.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btn.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!)
+        Me.btn.ForeColor = System.Drawing.Color.White
+        Me.btn.Location = New System.Drawing.Point(1818, 1092)
+        Me.btn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(520, 134)
+        Me.btn.TabIndex = 19
+        Me.btn.Text = "WEITER >>"
+        Me.btn.UseVisualStyleBackColor = False
+        '
+        'lblErrName
+        '
+        Me.lblErrName.BackColor = System.Drawing.Color.Red
+        Me.lblErrName.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.0!)
+        Me.lblErrName.ForeColor = System.Drawing.Color.White
+        Me.lblErrName.Location = New System.Drawing.Point(1612, 420)
+        Me.lblErrName.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblErrName.Name = "lblErrName"
+        Me.lblErrName.Size = New System.Drawing.Size(622, 51)
+        Me.lblErrName.TabIndex = 20
+        Me.lblErrName.Text = "Bitte geben Sie Ihren Namen ein!"
+        Me.lblErrName.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.lblErrName.Visible = False
+        '
+        'lblErrHandy
+        '
+        Me.lblErrHandy.BackColor = System.Drawing.Color.Red
+        Me.lblErrHandy.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.0!)
+        Me.lblErrHandy.ForeColor = System.Drawing.Color.White
+        Me.lblErrHandy.Location = New System.Drawing.Point(1612, 652)
+        Me.lblErrHandy.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblErrHandy.Name = "lblErrHandy"
+        Me.lblErrHandy.Size = New System.Drawing.Size(622, 51)
+        Me.lblErrHandy.TabIndex = 21
+        Me.lblErrHandy.Text = "Bitte geben Sie Ihre Handy-Nr. ein!"
+        Me.lblErrHandy.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.lblErrHandy.Visible = False
+        '
+        'lblErrFahrzeugtyp
+        '
+        Me.lblErrFahrzeugtyp.BackColor = System.Drawing.Color.Red
+        Me.lblErrFahrzeugtyp.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.0!)
+        Me.lblErrFahrzeugtyp.ForeColor = System.Drawing.Color.White
+        Me.lblErrFahrzeugtyp.Location = New System.Drawing.Point(64, 1120)
+        Me.lblErrFahrzeugtyp.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblErrFahrzeugtyp.Name = "lblErrFahrzeugtyp"
+        Me.lblErrFahrzeugtyp.Padding = New System.Windows.Forms.Padding(8, 8, 8, 8)
+        Me.lblErrFahrzeugtyp.Size = New System.Drawing.Size(474, 95)
+        Me.lblErrFahrzeugtyp.TabIndex = 22
+        Me.lblErrFahrzeugtyp.Text = "Bitte geben Sie den " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Fahrzeugtyp an!"
+        Me.lblErrFahrzeugtyp.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.lblErrFahrzeugtyp.Visible = False
+        '
+        'PictureBox2
+        '
+        Me.PictureBox2.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.Sprinter1
+        Me.PictureBox2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox2.Location = New System.Drawing.Point(64, 772)
+        Me.PictureBox2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.PictureBox2.Name = "PictureBox2"
+        Me.PictureBox2.Size = New System.Drawing.Size(474, 317)
+        Me.PictureBox2.TabIndex = 16
+        Me.PictureBox2.TabStop = False
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.LKW
+        Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox1.Location = New System.Drawing.Point(64, 446)
+        Me.PictureBox1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(474, 317)
+        Me.PictureBox1.TabIndex = 15
+        Me.PictureBox1.TabStop = False
+        '
+        'pic
+        '
+        Me.pic.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.LKW_mit_Aufleger
+        Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.pic.Location = New System.Drawing.Point(64, 120)
+        Me.pic.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.pic.Name = "pic"
+        Me.pic.Size = New System.Drawing.Size(474, 317)
+        Me.pic.TabIndex = 8
+        Me.pic.TabStop = False
+        '
+        'Label1
+        '
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label1.Location = New System.Drawing.Point(3, 7)
+        Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(440, 71)
+        Me.Label1.TabIndex = 23
+        Me.Label1.Text = "Spedition:"
+        '
+        'CheckBox1
+        '
+        Me.CheckBox1.AutoSize = True
+        Me.CheckBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.CheckBox1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.CheckBox1.Location = New System.Drawing.Point(451, 6)
+        Me.CheckBox1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.CheckBox1.Name = "CheckBox1"
+        Me.CheckBox1.Size = New System.Drawing.Size(225, 62)
+        Me.CheckBox1.TabIndex = 24
+        Me.CheckBox1.Text = "VERAG"
+        Me.CheckBox1.UseVisualStyleBackColor = True
+        '
+        'CheckBox2
+        '
+        Me.CheckBox2.AutoSize = True
+        Me.CheckBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.CheckBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.CheckBox2.Location = New System.Drawing.Point(451, 78)
+        Me.CheckBox2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.CheckBox2.Name = "CheckBox2"
+        Me.CheckBox2.Size = New System.Drawing.Size(272, 62)
+        Me.CheckBox2.TabIndex = 25
+        Me.CheckBox2.Text = "UNISPED"
+        Me.CheckBox2.UseVisualStyleBackColor = True
+        '
+        'CheckBox3
+        '
+        Me.CheckBox3.AutoSize = True
+        Me.CheckBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.CheckBox3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.CheckBox3.Location = New System.Drawing.Point(451, 150)
+        Me.CheckBox3.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.CheckBox3.Name = "CheckBox3"
+        Me.CheckBox3.Size = New System.Drawing.Size(173, 62)
+        Me.CheckBox3.TabIndex = 26
+        Me.CheckBox3.Text = "IMEX"
+        Me.CheckBox3.UseVisualStyleBackColor = True
+        '
+        'CheckBox4
+        '
+        Me.CheckBox4.AutoSize = True
+        Me.CheckBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.CheckBox4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.CheckBox4.Location = New System.Drawing.Point(451, 222)
+        Me.CheckBox4.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.CheckBox4.Name = "CheckBox4"
+        Me.CheckBox4.Size = New System.Drawing.Size(292, 62)
+        Me.CheckBox4.TabIndex = 27
+        Me.CheckBox4.Text = "(ANDERE)"
+        Me.CheckBox4.UseVisualStyleBackColor = True
+        '
+        'lblErrSpedition
+        '
+        Me.lblErrSpedition.BackColor = System.Drawing.Color.Red
+        Me.lblErrSpedition.Font = New System.Drawing.Font("Microsoft Sans Serif", 15.0!)
+        Me.lblErrSpedition.ForeColor = System.Drawing.Color.White
+        Me.lblErrSpedition.Location = New System.Drawing.Point(659, 1120)
+        Me.lblErrSpedition.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+        Me.lblErrSpedition.Name = "lblErrSpedition"
+        Me.lblErrSpedition.Size = New System.Drawing.Size(875, 51)
+        Me.lblErrSpedition.TabIndex = 28
+        Me.lblErrSpedition.Text = "Bitte wählen Sie eine Spedition aus!"
+        Me.lblErrSpedition.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.lblErrSpedition.Visible = False
+        '
+        'pnl
+        '
+        Me.pnl.BackColor = System.Drawing.Color.PapayaWhip
+        Me.pnl.Controls.Add(Me.CheckBox4)
+        Me.pnl.Controls.Add(Me.CheckBox3)
+        Me.pnl.Controls.Add(Me.CheckBox2)
+        Me.pnl.Controls.Add(Me.CheckBox1)
+        Me.pnl.Controls.Add(Me.Label1)
+        Me.pnl.Location = New System.Drawing.Point(659, 823)
+        Me.pnl.Name = "pnl"
+        Me.pnl.Size = New System.Drawing.Size(875, 297)
+        Me.pnl.TabIndex = 29
+        '
+        'usrCntlFound
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 20.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.Controls.Add(Me.pnl)
+        Me.Controls.Add(Me.lblErrSpedition)
+        Me.Controls.Add(Me.lblErrFahrzeugtyp)
+        Me.Controls.Add(Me.lblErrHandy)
+        Me.Controls.Add(Me.lblErrName)
+        Me.Controls.Add(Me.btn)
+        Me.Controls.Add(Me.lblAvisierer)
+        Me.Controls.Add(Me.lblFraechter)
+        Me.Controls.Add(Me.PictureBox2)
+        Me.Controls.Add(Me.PictureBox1)
+        Me.Controls.Add(Me.cbxHandyKeineAngabe)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.txtHandy)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.pic)
+        Me.Controls.Add(Me.txtFahrername)
+        Me.Controls.Add(Me.lblKennzeichen)
+        Me.Controls.Add(Me.Label5)
+        Me.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+        Me.Name = "usrCntlFound"
+        Me.Size = New System.Drawing.Size(2343, 1249)
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnl.ResumeLayout(False)
+        Me.pnl.PerformLayout()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents lblKennzeichen As Label
+    Friend WithEvents txtFahrername As TextBox
+    Friend WithEvents pic As PictureBox
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Label3 As Label
+    Friend WithEvents Label4 As Label
+    Friend WithEvents txtHandy As TextBox
+    Friend WithEvents cbxHandyKeineAngabe As CheckBox
+    Friend WithEvents Label5 As Label
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents PictureBox2 As PictureBox
+    Friend WithEvents lblAvisierer As Label
+    Friend WithEvents lblFraechter As Label
+    Friend WithEvents btn As Button
+    Friend WithEvents lblErrName As Label
+    Friend WithEvents lblErrHandy As Label
+    Friend WithEvents lblErrFahrzeugtyp As Label
+    Friend WithEvents Label1 As Label
+    Friend WithEvents CheckBox1 As CheckBox
+    Friend WithEvents CheckBox2 As CheckBox
+    Friend WithEvents CheckBox3 As CheckBox
+    Friend WithEvents CheckBox4 As CheckBox
+    Friend WithEvents lblErrSpedition As Label
+    Friend WithEvents pnl As Panel
+End Class

AVISO_CHECKIN/usrCntlFound.resx

@@ -0,0 +1,120 @@
+<?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>
+</root>

AVISO_CHECKIN/usrCntlFound.vb

@@ -0,0 +1,85 @@
+Public Class usrCntlFound
+
+    Dim MAIN As frmCheckIn
+    Dim AVISO As VERAG_PROG_ALLGEMEIN.cAviso
+    Dim FTYP As eFahrzeugtyp = eFahrzeugtyp.None
+
+    Sub New(MAIN, AVISO)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.MAIN = MAIN
+        Me.AVISO = AVISO
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+    Private Sub usrCntlFound_Load(sender As Object, e As EventArgs) Handles Me.Load
+        txtFahrername.Focus()
+
+        MAIN.TRANSLATE(Me)
+        If AVISO IsNot Nothing Then
+            lblKennzeichen.Text = AVISO.LKW_Nr
+            lblFraechter.Text = AVISO.Frächter
+            lblAvisierer.Text = AVISO.Auftraggeber
+            'txtFahrername.Text = AVISO.FahrerHandy
+            txtHandy.Text = AVISO.FahrerHandy
+
+        Else
+            MAIN.SET_WELCOME()
+        End If
+
+
+    End Sub
+
+    Private Sub cbxHandyKeineAngabe_CheckedChanged(sender As Object, e As EventArgs) Handles cbxHandyKeineAngabe.CheckedChanged
+        txtHandy.Enabled = Not cbxHandyKeineAngabe.Checked
+    End Sub
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
+        lblErrName.Visible = False
+        lblErrHandy.Visible = False
+        lblErrFahrzeugtyp.Visible = False
+
+        If txtFahrername.Text.Trim = "" Then
+            lblErrName.Visible = True
+            txtFahrername.Focus()
+            Exit Sub
+        End If
+        If Not cbxHandyKeineAngabe.Checked AndAlso txtHandy.Text.Trim = "" Then
+            lblErrHandy.Visible = True
+            txtHandy.Focus()
+            Exit Sub
+        End If
+        If FTYP = eFahrzeugtyp.None Then
+            lblErrFahrzeugtyp.Visible = True : Exit Sub
+        End If
+        MAIN.SET_FINISH(AVISO)
+    End Sub
+
+
+    Enum eFahrzeugtyp
+        None = 0
+        LKW_Auflieger = 1
+        LKW = 2
+        Sprinter = 3
+    End Enum
+
+    Private Sub pic_Click(sender As Object, e As EventArgs) Handles pic.Click, PictureBox1.Click, PictureBox2.Click
+        pic.BackColor = Color.White
+        PictureBox1.BackColor = Color.White
+        PictureBox2.BackColor = Color.White
+        pic.BorderStyle = BorderStyle.None
+        PictureBox1.BorderStyle = BorderStyle.None
+        PictureBox2.BorderStyle = BorderStyle.None
+
+        If sender Is pic Then FTYP = 1 : pic.BorderStyle = BorderStyle.FixedSingle
+        If sender Is PictureBox1 Then FTYP = 2 : PictureBox1.BorderStyle = BorderStyle.FixedSingle
+        If sender Is PictureBox2 Then FTYP = 3 : PictureBox2.BorderStyle = BorderStyle.FixedSingle
+
+        sender.BackColor = Color.PapayaWhip
+
+    End Sub
+
+
+End Class

AVISO_CHECKIN/usrCntlSearch.Designer.vb

@@ -0,0 +1,169 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class usrCntlSearch
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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(usrCntlSearch))
+        Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.txt = New System.Windows.Forms.TextBox()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.MyDatagridview1 = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'Label1
+        '
+        Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label1.Location = New System.Drawing.Point(3, 85)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(1556, 46)
+        Me.Label1.TabIndex = 4
+        Me.Label1.Text = "Bitte geben Sie das Kennzeichen oder den Frächter ein und wählen Sie einen Eintra" &
+    "g aus:"
+        '
+        'txt
+        '
+        Me.txt.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.txt.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!)
+        Me.txt.Location = New System.Drawing.Point(3, 134)
+        Me.txt.Name = "txt"
+        Me.txt.Size = New System.Drawing.Size(1475, 53)
+        Me.txt.TabIndex = 5
+        '
+        'Button1
+        '
+        Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 30.0!)
+        Me.Button1.ForeColor = System.Drawing.Color.White
+        Me.Button1.Location = New System.Drawing.Point(1212, 613)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(347, 87)
+        Me.Button1.TabIndex = 20
+        Me.Button1.Text = "WEITER >>"
+        Me.Button1.UseVisualStyleBackColor = False
+        '
+        'Label2
+        '
+        Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label2.Location = New System.Drawing.Point(152, 597)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(986, 116)
+        Me.Label2.TabIndex = 22
+        Me.Label2.Text = "Sie können Ihr Fahrzeug nicht finden?" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Bitte melden Sie sich am Schalter."
+        Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.PictureBox1.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.fragezeichen
+        Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox1.Location = New System.Drawing.Point(10, 597)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(124, 116)
+        Me.PictureBox1.TabIndex = 21
+        Me.PictureBox1.TabStop = False
+        '
+        'btn
+        '
+        Me.btn.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btn.BackgroundImage = CType(resources.GetObject("btn.BackgroundImage"), System.Drawing.Image)
+        Me.btn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.Location = New System.Drawing.Point(1484, 134)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(75, 53)
+        Me.btn.TabIndex = 6
+        Me.btn.UseVisualStyleBackColor = True
+        '
+        'MyDatagridview1
+        '
+        Me.MyDatagridview1.AKTUALISIERUNGS_INTERVALL = -1
+        Me.MyDatagridview1.AllowUserToAddRows = False
+        Me.MyDatagridview1.AllowUserToDeleteRows = False
+        Me.MyDatagridview1.AllowUserToResizeColumns = False
+        Me.MyDatagridview1.AllowUserToResizeRows = False
+        Me.MyDatagridview1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.MyDatagridview1.BackgroundColor = System.Drawing.Color.WhiteSmoke
+        Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.MyDatagridview1.ColumnHeadersVisible = False
+        DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
+        DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Window
+        DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.ControlText
+        DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
+        DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
+        DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
+        Me.MyDatagridview1.DefaultCellStyle = DataGridViewCellStyle1
+        Me.MyDatagridview1.Location = New System.Drawing.Point(3, 194)
+        Me.MyDatagridview1.Name = "MyDatagridview1"
+        Me.MyDatagridview1.ReadOnly = True
+        Me.MyDatagridview1.RowHeadersVisible = False
+        Me.MyDatagridview1.RowTemplate.Height = 60
+        Me.MyDatagridview1.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
+        Me.MyDatagridview1.Size = New System.Drawing.Size(1556, 377)
+        Me.MyDatagridview1.TabIndex = 7
+        '
+        'usrCntlSearch
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.PictureBox1)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.MyDatagridview1)
+        Me.Controls.Add(Me.btn)
+        Me.Controls.Add(Me.txt)
+        Me.Controls.Add(Me.Label1)
+        Me.Name = "usrCntlSearch"
+        Me.Size = New System.Drawing.Size(1562, 713)
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents Label1 As Label
+    Friend WithEvents txt As TextBox
+    Friend WithEvents btn As Button
+    Friend WithEvents MyDatagridview1 As VERAG_PROG_ALLGEMEIN.MyDatagridview
+    Friend WithEvents Button1 As Button
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents Label2 As Label
+End Class

AVISO_CHECKIN/usrCntlSearch.resx

@@ -0,0 +1,278 @@
+<?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="btn.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAAgAAAAIACAYAAAD0eNT6AAAABGdBTUEAALGPC/xhBQAAI19JREFUeF7t
+        3f+Z1Dj2L+DdjoAQOgQy+JLBkMGQwZDBTgZLBkMGQwaQAWQAGUAG957TdrM9xgXdVbZLR3rf5/n8cX/s
+        IFfL9rEsyf+CRj2P/N+c3yP/ydzc3Pz33//+9/sT+X+PzNr/9n3+t+//nfnfvP/3sy0AwAbyxvpb5OFN
+        /WNk7YbdUrKND4uFPIY8FgBg9iySN8c/4ob5V944H9xIe00WB3/lMc/Hnr8BAHQrh8nvhurzJhj5+uCm
+        OHryt3ifv838G3mlAEBZ+XSbN/u/5xvc2o1PTid/s7/zN5x/SwBoTg5j//bgXf3aDU0uz/3cgpxX4NUB
+        AFeRw9T5hF9hYl6v+Zh/g/lvAQC7yCfO3+fJeob028vXeXJhziEwOgDARW4jf8TNxVN+veToQK40yL8h
+        APySm35/UQwAsMpNf5woBgD41+9xQzBrf9zkMsOcMwDAAG7n5Xom8sl9cgJhLi80KgDQmbsZ/HGh97Qv
+        v0ruSGhUAKC4fNq3bE/Oyf2yQqMCAIW8iAt4bsG7dmEXeWpyrsCLqWsB0CLD/LJnvB4AaMj9+/3Pi4u1
+        yF75nH1u7nsAHCwvvrkXv/f7cq18zT4490UAdubGL61FIQCwsxzqd+OXVnP/agCAjXjHL5WiEAC40Mu8
+        mC4uriJVkoXAy6krA/AYz+PiaTmf9JJcPvh86toArHk279y3dhEVKZ15Z0ETBQEWzOyXEXK/YgBgeN7z
+        y4jJ+QG2FwaG9Cwugvbrl9GT3xnwWgAYhvX8Iv9LvhawbBDo2m1c7MzuF1lPrhbw+WGgO3/EBc5Tv8jP
+        k6MBf0ynDEBtuab/4+IiJyI/z8c8d6ZTCKAeT/0i58doAFCOGf4i28VKAaCEF3HB8tQvsm1yNMC+AUCb
+        bm5u/rty4RKRjZLn2Hy6ATTBRD+R42KCINCE3MrXkL/IsclXAj41DFyHIX+R68YrAeBoOcvfjn4ibSR3
+        ELRKANhdvu/39b528inyIfIungb/vE/8nXLG+MM85Z1x/v/9x//+4X87/63538x/e61Ncnzy64LmBQC7
+        ebVy4ZF98y3yIW68b+Ybe773zZtyS0982ZZs08u5SHiTbZ7bvnZMslPib/Aq/yAAm4mL+l9rFxzZNJ/i
+        d3473+jzhtrDh2HyGO5HEN7mMS6OWTZOnqvTTw9wGbv67ZN8Or4bto/fOG/2o7krCvI3mH+Ltd9Izo/d
+        A4GL5M3f+v5tcnfDj980h2h98vVH+f46XzEpCLZL7hegCACezGS/y5ND+vmEb3LW0z2fRwi8MrgsJgcC
+        T2I///Nz/5TvyWs7+Vvejw6s/eby8/iOAPAoZvo/PW76x1EMnJn83e5+QYAVbv6Pj5v+9SkGnpj8ve5+
+        OYAH3Px/nS/zO32T+NpzO88Z+LL4m8ki8VspAoBJXDit8f9J4vd5Gz+Td6h15BLD3HNg9e8p9goAgpv/
+        yXyL3yaf9g3x1/Us/4b5t1z8bSWiCICBufmv5kv8NIZI+5OvuLweWEQRAANy8/8hH+JnMczfv1zimt8p
+        WOsDQ0YRAANx8/9H3PjHpBB4EEUADMDN/3vc+EkKgTmKAOiYm/9d3PhZoxCIKAKgQ27+d5P73Pj5lSwE
+        hp4sqAiAvoy8yc+3OP7X088Aj/Y6+86iLw2TPP7pZwAqG/bmH08yb+L4rePnXLmPwJu1vjVC4vgth4XC
+        Rr3553t+2/WyldvsU4s+NkTi2BUBUFC+y1w9qTtODve7YLGXLKiHey0Qx23uDBTyPE7c0b7nn1/nM9zP
+        3p5lX1v0vd7zNY77+XT4QMvyAvV5cQL3HLP7uYbRVgt8jmNWYEPD8ub/cXHidhuT/Liy0SYJfsxjng4d
+        aEqcoH8vTthek+/6X05HDVf3Mvvkoo/2mr/nYwZakZt3rJysPSZn+HsKoTU5+jbESoG81szHDDRghOV+
+        NvShgiE2EIrjtNoGGpAz/ldP0o7yKY9zOlxoXp6TnxZ9uLvkcU6HC1zDCDP+Le+johGWC1oZANcSJ+D7
+        xQnZVeIQDflTXb4SWO3fneT9fJzAUTpffpTv+63tpxe5Z0C38wLm5bjAQXLZ0erJ2EHyfb9hRXqT3xPo
+        dl5AHJ9luXCAbrf5jSeJt3F8bv70qud5AbYLhr3FidblTn/zzR+6l3197RzoILlTILCHXt/7x6FZU8xo
+        uty7w3wA2EePn/e1pS8j63IL4TguE3hhQ/nusLf3/nnz986Q0eWcnt6KgJwPYC4PbCFOqN4+8uPmD//T
+        YxHgo0Gwgd42EnHzhx91VwTEMdnICy7Q25I/a/zhtN72CrA0EM4VJ1BPS/7c/OHXcr5PT0WApYFwhp6G
+        /t384fG6KgLieLwKgCfIocBehv7d/OHpeioC8lXA7XRYwE/FCdPLV/5ywp8TH86TDwK9TAz01UB4hF4+
+        9GO2P1yum9UBcSx2/ISf6GXDHzd/2E4vRYANguCUOEF62PDHzR+210sRYIMgWNHFXv9xHPb2h3108QGh
+        OA7XCHgoTozPyxOlWuIwvOODffVQBHyejwUI5df8+54/HCPPtbVzsFLiGP6cDweGVn7in5s/HCvOu3fL
+        87BYTAiEuHm+WTk5KsVGP3C88hsFeXBgdDmzd/XkKBIb/cD1lN8oKI7BiiHGFCdA6R3/4hBeTEcCXEn1
+        1UN2CGRIpXf8i/b7wAc0ICfUrZ2jVRKHYFkgY4mOX3nZ37v5MIAG5Dm5OEcrxbJAhlJ5La9Jf9Ce0pMC
+        o/32EGEM0eGrPv3b5hfaVXm7YKMADKHs03+03Xt/aFvZTcWy7dMhQKeio1d9+v8wHwLQsDxXF+duldgc
+        iK5Vrc5z6N+JCTXkfICSrwJsEUyvym75G223TAdqqbrM2CgA/am6Vje3Kp4PASgkt9pdO6dbj1EAelP1
+        6f9Ltn06BKCYvO58WZzTFWIUgK6UnPkf7bbVL9RW8lVAtNuKAPoQHbrizH+7/UEH8lxenNsVYl8AulCx
+        AjfrH/pRclVAtNvugNQWHbncF/+i2YbfoC8VlyB/nNsOJVX8VKcNf6BDeW4vzvXmE802D4maKi7DiWbf
+        Tq0HOnO7ds43nvdz26GUciebNf/QNw8lcIC8ma515oZj4h/0r9yEwCxa5rZDDdFxS238E0028Q8GEDfU
+        aruS2hiIUqpt/JM7/gGDyHN+cQ1oOtFkSwKpITpsqaV/0WQf+4GxVNufxJJASqg2+c+yPxhQnvuLa0HT
+        iSY/n1oOjao2+S+abJ0tjKnUPiUmA9K86KiVJv95+oeB5TVgcU1oOTkZEJpVavJftNfTP4yt1ChAtNdk
+        QNoUHbTSV7c8/QPVRgHsDEiTcoONtQ7bZKK9nv6BVG0UwM6ANKfS8L+nf+C7vCYsrhHNJppr0zLaEh3z
+        47KjtppornX/wEOV9gWwJwBNqbT2365/wA/y2rC4VjSbaK7XADTj9VonbTHRVrNogTVlXmNGW70GoA3R
+        IasM//viH3BKpS8Feg1AE8oM/+dXwOY2A/yg0pcCo7leA3B1lYb/nTDAz5R5oIm2eg3AdUVHLDH8bx9t
+        4DHielFlQzOvAbiqMpv/RFst/QMeo8ySwGirUU2upsqsWUv/gEfLa8biGtJkoqlWNXEdOay+1ilbi8l/
+        wFMUmgz4bm4yHCs63+dFZ2wy0VTDZMBTVJkM6BPBXMXzlc7YYuz7DzxZXjsW15ImE031YTMOV2L5X7TT
+        OzLgHCXmON3c3LyZ2wvHiI5XpTq28x9wjiqrnCwH5FBVTgwTZICz5TVkcU1pMtFU85w4TIl1stFOw//A
+        JUq8Bsh2Ts2FnVVZIhNNNfwPXKLEaKd5ABwmOlyF9/+G/4GL5bVkcW1pMeYBcIyVztdcopmGxIAtVHkN
+        YMST3b1Y63ytJdrpZAC2UOI1QLTTfgDsrsL6/09zWwEulteUxTWmudjynN1FR2v+fZgTAdhSTrJbu9Y0
+        Fruesq/oZF8Xna65RDMNhQFbqvLqE3ZT4QMZ3+a2Amwmry2La01ziWY+n1oL26swG9byP2BzeW1ZXGua
+        SzTz9dRa2FiFDYCimU4AYA/NT4C2IRC7iQ7W/AZA0UxDYMAeKnwC3URA9hGd6/Ois7UW7/+B3eQ1ZnHN
+        aS5zU2FTFTbDUP0Cu8lrzOKa01yimb4MyOaaXwZj/T+wpyLzoF5OrYXtND8BJtpo/T+wJw9CjCc61du1
+        ztZSopn2/wf2VOFVqKXQbCs6Vevvvuz/D+wurzWLa09r8WlgtrXSyZpKjlDMTQXYTZHRUNjOWidrKd57
+        AUfIa83aNailRDOtBGAzzU98yTZOTQXYleshQ6nQ4VW8wBGa/yhatPHV1FS4UJEhL4BDrF2DWopXomym
+        QAFgB0DgMHnNWVyDWoulgGwjOlPTnT0KFF/AAg4T15zWVwJ4KGIb0Zk+LjpXUzHcBRypwKjo17mpcJmV
+        ztVUoon2vgaO9HLtWtRS5nbCZdY6V0uJJlryAhypwsqo51NT4XzP1zpXS4k2+gYAcKTmvwkQbfRgxMUq
+        VLoAh1q7FrWUaKICgIu1XgD4CBBwuLz2LK5FTSWaaDMgLvZqrXM1FMtdgMPltWdxLWoqVkdxsQLLXWx4
+        ARwurz2La1FTUQBwsdYLAJ0cuIYC10YbpHGZ7ERrnauVKACAa2i9AIh4PcplshMtOlVTUQAA16AAoHvZ
+        iRadqqlEE+0CCFxD67sBKgC4THaiRadqKtFEa12Ba2h9ifTHuZ1wnuhECgCAH9kkjb5FJ1IAAPxIAUDf
+        ohO1XgD44AVwDQoA+rbWqVrK3EyAw61dk1rK3Ew4z1qnailzMwEOt3ZNailzM+E8a52qpczNBDjc2jWp
+        pczNhPOsdaqWMjcT4HBr16SWMjcTzrPWqVrK3EyAw61dk1rK3Ew4z1qnailzMwEOt3ZNailzM+E8a52q
+        pczNBDjc2jWppczNhPOsdaqWMjcT4HBr16SWMjcTzrPWqVrK3EyAw61dk1rK3Ew4z1qnailzMwEOt3ZN
+        ailzM+E80YlsBQzwI1sB07foRD4GBPAjBQB9i06kAAD4kQKAvkUnUgAA/Kj1AuDb3E44T3QiBQDAj1ov
+        AD7M7YTzZCdadKqmcnNz8+fcVIDD5LVn7ZrUUBQAXCY6+ZuVjtVMFADANSgA6F7rnVwBAFxDgQLg3dxU
+        OE+BAuDt3FSAw+S1Z+2a1Eo8HLGF12udq6EY5gIOl9eexbWoqSgA2IKZrgALce35uLgWNRUFAFuw2QXA
+        wtq1qKVEE19NLYXzKQAA/unZ2rWopUQb7ZHC5dY6V0uJJurowJEqPBj5UBqXW+tcLSWaqAAAjmRklDFE
+        Z/q07FwtxWQX4Eh5zVm7FrWUualwmehMrS93eTM3FWB3ec1ZuxY1FKuj2IbODvA/ec1ZXINai2si2ygw
+        3PV1birA7vKas7gGNZW4Ztshlc28XOtkLSXa+GxqKsCuml8CmA9tc1vhYhVmvFoJAByhwvXw5dRUuFyF
+        TS9eT00F2FXr30fJ66E9ANjOWidrKd55AUfIa83aNailzE2FbUSnanovgIhZr8Du8lqzuPa0li9zU2Eb
+        ql6A9kdDIx6G2FbOKl3paE0lmmkiILCn5icAxrXaxmhsrsLMVxMBgT1VmADoOsjmbtc6W2N5N7cVYHN5
+        jVlcc5pLNNNIKNuLzvVt2dkaix0Bgd3kNWZxzWkuc1NhW9G5Wp/9mp3/dmotwKYqjIJ+mtsK28rJJSsd
+        rqlEM19NrQXY1Ku1a05j8RqU3TR/AuRyxbmtAJupsBQ6V2vNzYXNPV/rdI3FPABgc3ltWVxrmks00wRA
+        9rPW6VpLNNM+2MCWKjz85LXPV1HZT3SyChMBrYMFttT8+v+ILYDZV75jWul4rcVWmMBm8pqyuMY0F/Of
+        OELzOwJmop2GwoAtNP859Ey00woodlflZHg5NRfgIi/XrjGtJdppDxT2F52t9U8DGw4DNlFh+V/k29xc
+        2FecEM1vCBSxHBC4WF5LFteWFmMDIA5TYUcsrwGAS1UZ/rfyicNU2BPbawDgIkWG/7MAsPcJx4lO1/w8
+        gIjXAMDZ8hqyuKa0GO//OVaReQBeAwDnKjH8b6STayixH0DE5BjgyfLasbiWNJloqvX/HC8637dlZ2wx
+        0VSbAgFPUWK/k0y2dWoyHCg6X5UK2QxZ4Ckq7P2f+TS3Fw5XYjlg5PPcXoBfymvG4hrSZG5ubv6cmwyH
+        K7EcMBNttUwGeIwSn/7NZFunJsMVRCessBzQTFngUaqs/Y9Y/sd1VVkOGMk9AUyWAX4mJ/9VWPvvoYYm
+        VBouMxkQ+Jkqk//yemaPE64vOmOJ1wARkwGBk/IasbhmtBrD/zSjUtVs0wxgTZVVTYb/aUqZ1QCR93Ob
+        Ab7La8PiWtFsormG/2lHdMoqrwHy5HkxtRrgTpWtzTOG/2lOmdcAhs+Ahwot/XP9okmVXgPkKMDt1Gxg
+        cNWuXTb/oT3ROcu8BlBFA6nS03/ky9xsaE6ZWbSZaK9RABhbtad/e5nQrNxFq8Qnguf8PbcbGFCxp38P
+        LbSt4AllRQCMqdTTf+TD3G5oVpmtgefYFwAGVPBhxSZmtC8665dl52050WSjADCWSuv+M7n238fMKKHM
+        ngBzPs7tBgYQ53yZXf8yNzc3b+amQ/NyMuBqR2410WbDazCGUquVMtFmk/+oo9r7tUh+KdAQG3Quz/XF
+        ud963s1NhzKqvWPLYbY/57YDHcpzfO3cbznRbHOUqCc674dlZ248X6PZhtqgT/lq8uvinG89dv6jrJcr
+        Hbr12BwIOpTn9uJcbz7RbDv/UVd04lJLAjPRbN/ahr6UeyUZsfSP8srNuI2YEAj9yKH/ahP/zEmiD9GZ
+        K30f4C7W3UIfKk78y0TTPYRQX+ET0OxbqK3a1uR3iWumz5XTjXIbA82xQyAUlufw4pwukWi61Uj0I4fU
+        1zp668nRi/kQgEKqjjx6+qdHOQpQbi5AJtruVQDUUnLoPxNt9/RPf6pW5BGrAqCOfNgoOfTv6Z+elR0F
+        iNggCAqIm2jJ142ZaL6nf/pVeBQgT04bBEHbKu4+ehdP/4yg8iiAbwVAu/LaUm2v/++J9ru20L/KowAR
+        SwOhQXFuvl+cq2Xi6Z+RVB4FyJP1r/k4gAbEOVn2vX8k9/z39M9QXq+cCGUS7X81HQZwZWXf+2dyRHQ+
+        DhhHdP5yXwp8mDiE59ORAFeS6/3LvveP+OIfw6r4ic6HsT8AXE/Z9f73iWMwksi44iT4sDwpiuX9fCjA
+        geLc+3txLlbLp/lQYFi3KydGqZgUCMcqPunvLnEYthiHnASzdoJUShzG6+logJ29WjsHi+XdfCwwvNLL
+        Au8Tx+F9Huyr9Iz/OZb9wUIPVb2VAbCf6jP+72LZH6yIk6P6hMBMbhesCIBtld7m90FM/IMTyk8InJNF
+        gOWBsI3yy/3uE8di4h+c0sOEwDn5zQBFAFymm5t/rlyYjwk4JU6WT8uTp2gUAXC+bm7+ETv+wSPlZJ+1
+        k6hiFAHwdD3d/HPo/+V0WMAv9bDRx4MoAuAJ4vz/a+U8qhpr/uGJ8gmg9MeCFlEEwCN0dvM39A9nqv6x
+        oGUUAXBaV8P+mTgmQ/9wrs5eBWQUAfCj7m7+ce16Ox8bcK44mXpZFXAfRQD8T3c3/8iXPK7p8IBL5KqA
+        8t8KWMSOgdDnzd+GP7Cx12snWvEoAhhZFvafF+dE+eRry/n4gK3EyfVuebJ1kCwCfEWQ0eQE3x729l/G
+        Xv+wkxwu7O1VwF3i2P6YDhG618WXP1fiM7+ws96WBn5Prn+ejxF69Z+1vt9D4tgs+YMD9Dgf4D7v4/jM
+        HqY3zzrb4Ocf8d4fDhQnXY/zAe7zOQ7R5EB6kZ/57m6m/4N47w8Hy/kAve0P8DAmB9KDl9mXF327q3h1
+        B9fR4/4A/4iLC4V1+75/GecpXEc+YayelB3FzoFUkqNzfy/6cPdRBMAV5ASctROys+QrAbOMaV2u0ulu
+        c5/HRhEAVxAnX8+TAr9nvsAYDaA50Tf/u9ZnR4siAI7X+6TAh7FKgJbkXJyeZ/k/OYoAOF63OwWuJY73
+        P9Nhw9X8EX2x61n+50YRAMfrfmXAIjlB0GgAR8u1/e8XfVEWUQTA8UZYGfCP5PvXOG5zAzhCLu/z1P/I
+        KALgeL1+cORnybkBvkPOXnKGv3f9Z0QRAAeLk26E5YFr+TsO32gAW8l9/M3wvzCKADhYnHRv107GAZL7
+        BpgkyKV+z7606FtyZhQBcLCBi4BMvhawgRBPZbh/pygC4GCDFwGZ/Myw+QH8itn9B0QRAAeLE2+UjYJO
+        Zr7w3E6/CHx3m31jrc/IPlEEwLFG2i3wp1EIMHPjv2IUAXAsRcCDKASG5cbfSBQBcCxFwCLzRciOgv1z
+        428wigA4liJgPTlZ8LfpJ6IjOat/uG/0V4oiAI6lCDidXD74e/5Gd78UVeU6fsv5ikQRAAeLk270JYI/
+        y9f4ffI7A+YJ1JF/q9yv//PibykFogiAgykCHpX88qBRgXbl0741/B1EEQAHUwQ8OjkqkBcoGwtd3/P8
+        W+TfZPE3kuJRBMDBFAFPzuf4zfIVgYmDx8mbfn6cxxB/51EEwPFG/JTwFrkfGVAMbM9Nf9AoAuB4L+Pk
+        +7Y8GeXRySHp/CxxzhkwgfDp8jf7PS/+82+59hvLIFEEwPGex8mnCNgmD18VmES47rf5Kd+yPfkhigA4
+        Xn4dzV4B2+fjfEHLEYIRdyC8f8J3w5dHRxEAx8sNgz4sT0bZNDnMnbsQ/ifSW1GQx5IjH7k2P3fjM6Qv
+        Z0cRAFcQJ54VAscnn45zLsF9YfB/kRbnFORrjWzbwxu9J3vZJYoAuI5cIWBeQBvJGfHv54thFgiZPyJ5
+        I77PJfMN7m/q98n/9t2/k/9m/ttzG9baJrJrrlQEfD8P4t/POT33552VPwwjJwd+WZ6QIiJH5oAiIEfb
+        /oh/6zEfksrvh7y6+19B58wLELl+coLu0JN0dyoCfov/9llfj5xHBqB/0dn/XDsJRGTfxLn3Zj4Nh/+q
+        54ZFQH5P4uLXWjsVJdAkmwaJHJdvec5Np953ioDLbro5zL/pfBZFACPJ/QK8EhDZN5/yXJtOuR8oAp5+
+        093kif9UFAEMJTq8VwIiOyTOrfsh/59RBDzuppsTmQ/5dLQigNFYJSCyXXLI/ymfnlYEnL7pPov/t9x9
+        cvV/t1cUAYwmT7Q3ayeDiDw67/Jcmk6pJ1EE/HjTfRH/91fbt0IRwIhMEBR5etYm+j2VImC66V7lqX8t
+        igBGlBeid8uTQURW8yHPmenUudjwRUCkqW9PKAIYVQ7BmRsgsp586t9jJzlFQGNRBDAqcwNEFolz4m2e
+        G9MpsgujcI1FEcDIcjTAU4mMni95LkynxP6y0Fhpg1wpigCGFidA7htgkqAMl+z782lwKEVAW1EEMLpb
+        FyUZKDnJ79RufodwvrUVRQBMrwVsJyy95tDh/l9RBLQVRQBMXsUJYbWA9JKc3f966tptUQS0FUUATHK1
+        gO8KSOlEH879+/ec3X8xRUBbUQTA/5gfIOWSfTb77tSF2+ccayuKAPgnhYA0n2o3/oecX21FEQA/UghI
+        i8mZ/c+nLlqXc6utKAJgnUJAWkh+ra+Zmf1bcF61FUUAnKYQkMOTfS773tQF++OcaiuKAPi5LATsKih7
+        5lvvN/6HFAFtRREAv5ZLruwjIFvmSxaXc98aiiKgrSgC4PGyELCzoJybnNi3x+d5S1EEtBVFADzN8zhp
+        8hPEXg/IrzLUMP9jKQLaiiIAzmNUQNbyKftGZLhh/sdSBLQVRQCcLycNGhUYO/luP7fq9bT/SIqAtqII
+        gMu9nC9sioEBkn/r/JtPf3qeShHQVhQBsB3FQH/Jv2Vu2GOIfyOKgLaiCIDtKQbq5n4ynyf9nSgC2ooi
+        APbzIk6wnDPwaXniSTO5f6fvpn8QRUBbUQTA/nLSWK4meBcxOnDd5ND+6/lvwhUoAtqKIgCOlaMDuQ2x
+        5YX750P+1vmbTz89LVAEtBVFAFxPfhb2dZyIOUJgS+Lzcz95L5/w3fAbpwhoK4oAaMPdK4M4IXMOQY4S
+        eG3wY/I3uX+6z3f45b+tPyJFQFtRBECbcjna3auD+aI50uTCLILePbjZe3/fEUVAW1EEQB15M8zh7td5
+        g4wTOF8jVBw1yDbfP9HfD+G70Q9CEdBWFAHQhxwaz5vp/ejBXeIkvy8UMnvMO8gRivv/ft7Y39z/29GW
+        fIp3g+cfom8oAhpK/D0UAcBUQKzEDZxNKQLaiiIAgKM8ixvP1+WNSK4XRQAAu4ubTa58Wb0RyfWiCABg
+        Ty/Wbj7SRhQBAOwhh/4/L2860lYUAQBsKm4suTJl9aYjbUURAMBWbtduNNJuFAEAXCxuKO+XNxhpP4oA
+        AC5h4l/hKAIAOEvcREz8Kx5FAABP9WrthiL1oggA4NHixuHpv6MoAgB4DE//HUYRAMBPxc3i4/LmIX1E
+        EQDAKWb+dx5FAAA/iJuDT/4OEEUAAA/53O9AUQQAcM/kv8GiCADA8P+gUQQADC5uBob/B40iAGBcvvo3
+        eBQBAGN6uXZTkLGiCAAYTFz4/1y7Ich4UQQADEQBIA+jCAAYhAJAllEEAIzh9dpNQMaOIgCgf8/XbgAi
+        igCAzsXF/svy4i+SUQQA9M2XAOVkFAEAffM9ADkZRQBA3xQBcjKKAIC+KQLkZBQBAH1TBMjJKAIA+qYI
+        kJNRBAD0TREgJ6MIAOibIkBORhEA0DdFgJyMIgCgb4oAORlFAEDfFAFyMooAgL4pAuRkFAEAfVMEyMko
+        AgD6pgiQk1EEAPRNESAnowgA6JsiQE5GEQDQN0WAnIwiAKBvigA5GUUAQN8UAXIyigCAvikC5GQUAQB9
+        UwTIySgCAPqmCJCTUQQA9E0RICejCADomyJATkYRANA3RYCcjCIAoG+KADkZRQBA3xQBcjKKAIC+KQLk
+        ZBQBAH1TBMjJKAIA+qYIkJNRBAD0TREgJ6MIAOibIkBORhEA0DdFgJyMIgCgb4oAORlFAEDfFAFyMooA
+        gL4pAuRkFAEAfVMEyMkoAgD6pgiQk1EEAPRNESAnowgA6JsiQE5GEQDQN0WAnIwiAKBvigA5GUUAQN8U
+        AXIyigCAvikC5GQUAQB9UwTIySgCAPqmCJCTUQQA9E0RICcT/eP11E0A6JEiQE4m+sft1E0A6JEiQFZz
+        c3PzZu4jAHRKESBr+Tj3DwA6pgiQHzL3DQA6pwiQf2TuFwAMQBEg3zP3CQAGoQiQzIe5PwAwEEXA4Lm5
+        uXk79wUABqMIGDhRAPw59wMABqQIGDTxt38+dQEARqUIGC9f5r89AINTBAwU7/8BeEgRMEjib/1y+pMD
+        wEQR0H8M/wOwShHQceLv61PAAJykCOgz3+Jv+2z6EwPAOkVAZ7H2H4DHUgR0lPh7evoH4NEUAR3E0z8A
+        51AE1I53/wCcTRFQNPm3m/6EAHAeRUC9WPcPwCYUAYUSf68X058NAC6nCKiRd/PfCwA2owhoOyb+AbAb
+        RUCjib+ND/4AsCtFQHsx9A/AIRQB7cTQPwCHUgQ0kPg7GPoH4HCKgCvm5ubmzfx3AIDDKQKuk0/z7w8A
+        V6MIODb53v92+ukB4LoUAQclfmvv/QFoiiJg5/jMLwCtUgTslLj5v51/YwBokiJg++SkP+v9AWieImC7
+        2OwHgFIUAZcnb/7Pp58TAOpQBFyQ+P3M+AegLEXAGcnfbfr5AKAuRcATkr/X9LMBQH2KgEfEHv8A9EgR
+        8JNY6w9AzxQBK3HzB2AEioAHcfMHYCSKgIibPwAjGroIcPMHYGRDFgFx8zfbH4DhDVUE5PFOhw0ADFEE
+        5HFOhwsA3Ou5CMgP+9jbHwBO6LEI8FU/AHiEnoqAT3E8vucPAI9UvgiYl/m5+QPAE5UtAuLm/+d8DADA
+        GaoVASb7AcBGqhQB+b7/dmoyALCFposAO/sBwH5aLAIM+QPAAVoqAt5Fe8zyB4CDXLsI8NQPAFdyrSLA
+        Uz8AXNmRRcCX+PdeTP8sAHBtexcBOdz/evqnAICW7FIEzLv5Ge4HgIZtVQR8m2/8NvQBgCIuKQLyHX8O
+        9XviB4CCsgj4tri5n0o+7ecX+yzpA4AO3ObWvHGD/7S44ef/+d08xD/QTf9f//r/oSs8kHKK7soAAAAA
+        SUVORK5CYII=
+</value>
+  </data>
+</root>

AVISO_CHECKIN/usrCntlSearch.vb

@@ -0,0 +1,66 @@
+Public Class usrCntlSearch
+
+    Dim MAIN As frmCheckIn
+    Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+
+    Sub New(MAIN)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.MAIN = MAIN
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+    Private Sub txt_TextChanged(sender As Object, e As EventArgs) Handles txt.TextChanged
+        initDGV()
+    End Sub
+
+
+    Sub initDGV()
+
+        With MyDatagridview1
+
+            Dim search = txt.Text
+            If search.Length <= 2 Then .Columns.Clear() : Exit Sub
+
+            Dim sqlstr = "SELECT TOP (20) [AvisoID],[LKW_Nr] LKW,[Frächter],Auftraggeber Avisierer
+                          FROM [Aviso]
+                          WHERE ((LKW_Nr LIKE '%" & search & "%') OR (Frächter LIKE '%" & search & "%') OR (Auftraggeber LIKE '%" & search & "%'))  AND Status NOT IN (1,2) AND Datum > DATEADD(MONTH,-1 ,GETDATE())
+                          order by DATUM DESC"
+
+            ' .SET_SQL(sqlstr, "AVISO")
+            '.LOAD()
+            .DataSource = SQL.loadDgvBySql(sqlstr, "AVISO")
+
+            If .RowCount = 0 Then
+                .Columns.Clear() : Exit Sub
+            End If
+
+
+            .Columns("AvisoID").Visible = False
+            .Columns("LKW").Width = 400
+            .Columns("Frächter").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
+            '.loa.Columns("Avisierer").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
+            .Columns("Avisierer").Visible = False
+
+            '   MsgBox(dt.Rows(0)("AvisoID"))
+
+        End With
+
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        If MyDatagridview1.SelectedRows.Count > 0 Then
+            MAIN.SET_FOUND(MyDatagridview1.SelectedRows(0).Cells("AvisoId").Value)
+        End If
+    End Sub
+
+    Private Sub usrCntlSearch_Load(sender As Object, e As EventArgs) Handles Me.Load
+        txt.Focus()
+        MAIN.TRANSLATE(Me)
+    End Sub
+
+
+End Class

AVISO_CHECKIN/usrCntlWelcome.Designer.vb

@@ -0,0 +1,263 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class usrCntlWelcome
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlWelcome))
+        Me.Button4 = New System.Windows.Forms.Button()
+        Me.Button5 = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.PictureBox3 = New System.Windows.Forms.PictureBox()
+        Me.PictureBox2 = New System.Windows.Forms.PictureBox()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Button3 = New System.Windows.Forms.Button()
+        CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'Button4
+        '
+        Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button4.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button4.Location = New System.Drawing.Point(123, 501)
+        Me.Button4.Name = "Button4"
+        Me.Button4.Size = New System.Drawing.Size(75, 63)
+        Me.Button4.TabIndex = 10
+        Me.Button4.Tag = "RUS"
+        Me.Button4.UseVisualStyleBackColor = True
+        Me.Button4.Visible = False
+        '
+        'Button5
+        '
+        Me.Button5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button5.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button5.Location = New System.Drawing.Point(123, 570)
+        Me.Button5.Name = "Button5"
+        Me.Button5.Size = New System.Drawing.Size(75, 63)
+        Me.Button5.TabIndex = 11
+        Me.Button5.Tag = "BG"
+        Me.Button5.UseVisualStyleBackColor = True
+        Me.Button5.Visible = False
+        '
+        'Label1
+        '
+        Me.Label1.Font = New System.Drawing.Font("Arial Black", 30.0!, System.Drawing.FontStyle.Bold)
+        Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label1.Location = New System.Drawing.Point(384, 262)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+        Me.Label1.Size = New System.Drawing.Size(514, 63)
+        Me.Label1.TabIndex = 12
+        Me.Label1.Tag = "DE"
+        Me.Label1.Text = "WILLKOMMEN!"
+        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label2
+        '
+        Me.Label2.Font = New System.Drawing.Font("Arial Black", 30.0!, System.Drawing.FontStyle.Bold)
+        Me.Label2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label2.Location = New System.Drawing.Point(384, 331)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+        Me.Label2.Size = New System.Drawing.Size(514, 63)
+        Me.Label2.TabIndex = 13
+        Me.Label2.Tag = "EN"
+        Me.Label2.Text = "WELCOME!"
+        Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label3
+        '
+        Me.Label3.Font = New System.Drawing.Font("Arial Black", 30.0!, System.Drawing.FontStyle.Bold)
+        Me.Label3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label3.Location = New System.Drawing.Point(384, 400)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+        Me.Label3.Size = New System.Drawing.Size(514, 63)
+        Me.Label3.TabIndex = 14
+        Me.Label3.Tag = "YU"
+        Me.Label3.Text = "DOBRODOŠLI!"
+        Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label4
+        '
+        Me.Label4.Font = New System.Drawing.Font("Arial Black", 30.0!, System.Drawing.FontStyle.Bold)
+        Me.Label4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label4.Location = New System.Drawing.Point(384, 469)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+        Me.Label4.Size = New System.Drawing.Size(514, 63)
+        Me.Label4.TabIndex = 15
+        Me.Label4.Text = "HOŞGELDINIZ!"
+        Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label5
+        '
+        Me.Label5.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 25.0!)
+        Me.Label5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Label5.Location = New System.Drawing.Point(303, 173)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(481, 46)
+        Me.Label5.TabIndex = 16
+        Me.Label5.Text = "Please select Language:"
+        '
+        'PictureBox3
+        '
+        Me.PictureBox3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.PictureBox3.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.IMEX_LOGO_simple
+        Me.PictureBox3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox3.Location = New System.Drawing.Point(824, 582)
+        Me.PictureBox3.Name = "PictureBox3"
+        Me.PictureBox3.Size = New System.Drawing.Size(385, 93)
+        Me.PictureBox3.TabIndex = 19
+        Me.PictureBox3.TabStop = False
+        '
+        'PictureBox2
+        '
+        Me.PictureBox2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.PictureBox2.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.Unisped_logo
+        Me.PictureBox2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox2.Location = New System.Drawing.Point(414, 582)
+        Me.PictureBox2.Name = "PictureBox2"
+        Me.PictureBox2.Size = New System.Drawing.Size(385, 93)
+        Me.PictureBox2.TabIndex = 18
+        Me.PictureBox2.TabStop = False
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.PictureBox1.BackgroundImage = Global.AVISO_CHECKIN.My.Resources.Resources.Verag_AG_Logopng
+        Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox1.Location = New System.Drawing.Point(0, 582)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(385, 93)
+        Me.PictureBox1.TabIndex = 17
+        Me.PictureBox1.TabStop = False
+        '
+        'btn
+        '
+        Me.btn.BackgroundImage = CType(resources.GetObject("btn.BackgroundImage"), System.Drawing.Image)
+        Me.btn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.ForeColor = System.Drawing.Color.White
+        Me.btn.Location = New System.Drawing.Point(310, 262)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(75, 63)
+        Me.btn.TabIndex = 6
+        Me.btn.Tag = "DE"
+        Me.btn.UseVisualStyleBackColor = True
+        '
+        'Button1
+        '
+        Me.Button1.BackgroundImage = CType(resources.GetObject("Button1.BackgroundImage"), System.Drawing.Image)
+        Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.ForeColor = System.Drawing.Color.White
+        Me.Button1.Location = New System.Drawing.Point(310, 331)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 63)
+        Me.Button1.TabIndex = 7
+        Me.Button1.Tag = "EN"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.BackgroundImage = CType(resources.GetObject("Button2.BackgroundImage"), System.Drawing.Image)
+        Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button2.ForeColor = System.Drawing.Color.White
+        Me.Button2.Location = New System.Drawing.Point(310, 400)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(75, 63)
+        Me.Button2.TabIndex = 8
+        Me.Button2.Tag = "YU"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'Button3
+        '
+        Me.Button3.BackgroundImage = CType(resources.GetObject("Button3.BackgroundImage"), System.Drawing.Image)
+        Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button3.ForeColor = System.Drawing.Color.White
+        Me.Button3.Location = New System.Drawing.Point(310, 469)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(75, 63)
+        Me.Button3.TabIndex = 9
+        Me.Button3.Tag = "TR"
+        Me.Button3.Text = "TR"
+        Me.Button3.UseVisualStyleBackColor = True
+        '
+        'usrCntlWelcome
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.Controls.Add(Me.PictureBox3)
+        Me.Controls.Add(Me.PictureBox2)
+        Me.Controls.Add(Me.PictureBox1)
+        Me.Controls.Add(Me.Label5)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.btn)
+        Me.Controls.Add(Me.Button1)
+        Me.Controls.Add(Me.Button2)
+        Me.Controls.Add(Me.Button4)
+        Me.Controls.Add(Me.Button5)
+        Me.Controls.Add(Me.Button3)
+        Me.Name = "usrCntlWelcome"
+        Me.Size = New System.Drawing.Size(1212, 678)
+        CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents btn As Button
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+    Friend WithEvents Button4 As Button
+    Friend WithEvents Button5 As Button
+    Friend WithEvents Button3 As Button
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Label3 As Label
+    Friend WithEvents Label4 As Label
+    Friend WithEvents Label5 As Label
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents PictureBox2 As PictureBox
+    Friend WithEvents PictureBox3 As PictureBox
+End Class

AVISO_CHECKIN/usrCntlWelcome.vb

@@ -0,0 +1,26 @@
+Public Class usrCntlWelcome
+
+    Dim MAIN As frmCheckIn
+    Sub New(MAIN)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.MAIN = MAIN
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click, Label1.Click, Button1.Click, Label2.Click, Button2.Click, Label3.Click, Button3.Click, Label4.Click
+        MAIN.SET_LANGUAGE(sender.tag)
+        MAIN.SET_SEARCH()
+    End Sub
+
+    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
+
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+
+    End Sub
+End Class

AVISO_INFO/AVISO_INFO.vbproj

@@ -0,0 +1,221 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="15.0" 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>{A734141E-2C4E-4D70-81E8-A88184282AF5}</ProjectGuid>
+    <OutputType>WinExe</OutputType>
+    <StartupObject>AVISO_INFO.My.MyApplication</StartupObject>
+    <RootNamespace>AVISO_INFO</RootNamespace>
+    <AssemblyName>AVISO_INFO</AssemblyName>
+    <FileAlignment>512</FileAlignment>
+    <MyType>WindowsForms</MyType>
+    <TargetFrameworkVersion>v4.7</TargetFrameworkVersion>
+    <Deterministic>true</Deterministic>
+    <TargetFrameworkProfile />
+    <NuGetPackageImportStamp>
+    </NuGetPackageImportStamp>
+    <IsWebBootstrapper>true</IsWebBootstrapper>
+    <PublishUrl>\\ftps.verag.ag\g\ftp\programme\AVISO_INFO\</PublishUrl>
+    <Install>true</Install>
+    <InstallFrom>Web</InstallFrom>
+    <UpdateEnabled>true</UpdateEnabled>
+    <UpdateMode>Foreground</UpdateMode>
+    <UpdateInterval>7</UpdateInterval>
+    <UpdateIntervalUnits>Days</UpdateIntervalUnits>
+    <UpdatePeriodically>false</UpdatePeriodically>
+    <UpdateRequired>false</UpdateRequired>
+    <MapFileExtensions>true</MapFileExtensions>
+    <InstallUrl>http://ftps.verag.ag/AVISO_INFO/</InstallUrl>
+    <CreateWebPageOnPublish>true</CreateWebPageOnPublish>
+    <WebPage>publish.htm</WebPage>
+    <ApplicationRevision>4</ApplicationRevision>
+    <ApplicationVersion>1.0.0.%2a</ApplicationVersion>
+    <UseApplicationTrust>false</UseApplicationTrust>
+    <PublishWizardCompleted>true</PublishWizardCompleted>
+    <BootstrapperEnabled>true</BootstrapperEnabled>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <PlatformTarget>x64</PlatformTarget>
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\Debug\</OutputPath>
+    <DocumentationFile>AVISO_INFO.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>AVISO_INFO.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionExplicit>On</OptionExplicit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionCompare>Binary</OptionCompare>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionStrict>Off</OptionStrict>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
+  </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationIcon>aviso.ico</ApplicationIcon>
+  </PropertyGroup>
+  <PropertyGroup>
+    <ManifestCertificateThumbprint>9D59777AB77A758BD3CBA1B39EAE25EC16C09CA2</ManifestCertificateThumbprint>
+  </PropertyGroup>
+  <PropertyGroup>
+    <ManifestKeyFile>AVISO_INFO_TemporaryKey.pfx</ManifestKeyFile>
+  </PropertyGroup>
+  <PropertyGroup>
+    <GenerateManifests>true</GenerateManifests>
+  </PropertyGroup>
+  <PropertyGroup>
+    <SignManifests>true</SignManifests>
+  </PropertyGroup>
+  <ItemGroup>
+    <Reference Include="System" />
+    <Reference Include="System.Data" />
+    <Reference Include="System.Deployment" />
+    <Reference Include="System.Design" />
+    <Reference Include="System.Drawing" />
+    <Reference Include="System.Windows.Forms" />
+    <Reference Include="System.Xaml" />
+    <Reference Include="System.Xml" />
+    <Reference Include="System.Xml.Linq" />
+    <Reference Include="System.Data.DataSetExtensions" />
+    <Reference Include="System.Net.Http" />
+    <Reference Include="WindowsBase" />
+  </ItemGroup>
+  <ItemGroup>
+    <Import Include="AVISO_INFO" />
+    <Import Include="Microsoft.Toolkit.Forms.UI.Controls" />
+    <Import Include="Microsoft.Toolkit.UI.Controls" />
+    <Import Include="Microsoft.Toolkit.Win32.UI.Controls" />
+    <Import Include="Microsoft.Toolkit.Win32.UI.Controls.Interop.WinRT" />
+    <Import Include="Microsoft.VisualBasic" />
+    <Import Include="System" />
+    <Import Include="System.Collections" />
+    <Import Include="System.Collections.Generic" />
+    <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="frmInfo.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="frmInfo.Designer.vb">
+      <DependentUpon>frmInfo.vb</DependentUpon>
+      <SubType>Form</SubType>
+    </Compile>
+    <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>
+  </ItemGroup>
+  <ItemGroup>
+    <EmbeddedResource Include="frmInfo.resx">
+      <DependentUpon>frmInfo.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="My Project\Resources.resx">
+      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
+      <CustomToolNamespace>My.Resources</CustomToolNamespace>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="AVISO_INFO_TemporaryKey.pfx" />
+    <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" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\lan_de.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\timer.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\handy_QR.jpg" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\qr_search.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <PackageReference Include="Microsoft.Toolkit.Forms.UI.Controls.WebView">
+      <Version>6.0.0</Version>
+    </PackageReference>
+    <PackageReference Include="Microsoft.Windows.SDK.Contracts">
+      <Version>10.0.19041.1-preview.vb-release</Version>
+    </PackageReference>
+    <PackageReference Include="System.Runtime.WindowsRuntime">
+      <Version>4.7.0</Version>
+    </PackageReference>
+    <PackageReference Include="System.Runtime.WindowsRuntime.UI.Xaml">
+      <Version>4.7.0</Version>
+    </PackageReference>
+  </ItemGroup>
+  <ItemGroup>
+    <Content Include="aviso.ico" />
+    <None Include="Resources\flag_srb2.png" />
+    <None Include="Resources\flag_tr.png" />
+    <None Include="Resources\flag_srb.png" />
+    <None Include="Resources\lan_eng.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <BootstrapperPackage Include=".NETFramework,Version=v4.7">
+      <Visible>False</Visible>
+      <ProductName>Microsoft .NET Framework 4.7 %28x86 und x64%29</ProductName>
+      <Install>true</Install>
+    </BootstrapperPackage>
+    <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
+      <Visible>False</Visible>
+      <ProductName>.NET Framework 3.5 SP1</ProductName>
+      <Install>false</Install>
+    </BootstrapperPackage>
+  </ItemGroup>
+  <ItemGroup>
+    <ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
+      <Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
+      <Name>VERAG_PROG_ALLGEMEIN</Name>
+    </ProjectReference>
+    <ProjectReference Include="..\Gemeinsames\Gemeinsames.vbproj">
+      <Project>{110c923b-cb02-4fd0-af24-95e0f0eeeff5}</Project>
+      <Name>Gemeinsames</Name>
+    </ProjectReference>
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+</Project>

AVISO_INFO/App.config

@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="utf-8"?>
+<configuration>
+    <startup>
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7"/>
+    </startup>
+</configuration>

AVISO_INFO/My Project/Application.Designer.vb

@@ -0,0 +1,38 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden.  Wenn Sie Änderungen vornehmen möchten
+    ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
+    ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
+    ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
+    '
+    Partial Friend Class MyApplication
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Public Sub New()
+            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
+            Me.IsSingleInstance = false
+            Me.EnableVisualStyles = false
+            Me.SaveMySettingsOnExit = true
+            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
+        End Sub
+        
+        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
+        Protected Overrides Sub OnCreateMainForm()
+            Me.MainForm = Global.AVISO_INFO.frmInfo
+        End Sub
+    End Class
+End Namespace

AVISO_INFO/My Project/Application.myapp

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <MySubMain>true</MySubMain>
+  <MainForm>frmInfo</MainForm>
+  <SingleInstance>false</SingleInstance>
+  <ShutdownMode>0</ShutdownMode>
+  <EnableVisualStyles>false</EnableVisualStyles>
+  <AuthenticationMode>0</AuthenticationMode>
+  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
+</MyApplicationData>

AVISO_INFO/My Project/AssemblyInfo.vb

@@ -0,0 +1,35 @@
+Imports System
+Imports System.Reflection
+Imports System.Runtime.InteropServices
+
+' Allgemeine Informationen über eine Assembly werden über die folgenden
+' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
+' die einer Assembly zugeordnet sind.
+
+' Werte der Assemblyattribute überprüfen
+
+<Assembly: AssemblyTitle("AVISO_INFO")>
+<Assembly: AssemblyDescription("")>
+<Assembly: AssemblyCompany("")>
+<Assembly: AssemblyProduct("AVISO_INFO")>
+<Assembly: AssemblyCopyright("Copyright ©  2020")>
+<Assembly: AssemblyTrademark("")>
+
+<Assembly: ComVisible(False)>
+
+'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
+<Assembly: Guid("a1cc3d6c-2f32-42bf-ab74-d65a06593798")>
+
+' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
+'
+'      Hauptversion
+'      Nebenversion
+'      Buildnummer
+'      Revision
+'
+' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
+' übernehmen, indem Sie "*" eingeben:
+' <Assembly: AssemblyVersion("1.0.*")>
+
+<Assembly: AssemblyVersion("1.0.0.0")>
+<Assembly: AssemblyFileVersion("1.0.0.0")>

AVISO_INFO/My Project/Resources.Designer.vb

@@ -0,0 +1,143 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
+    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
+    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
+    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
+    '''<summary>
+    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("AVISO_INFO.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
+        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property flag_srb() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("flag_srb", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property flag_srb2() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("flag_srb2", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property flag_tr() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("flag_tr", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property handy_QR() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("handy_QR", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property lan_de() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("lan_de", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property lan_eng() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("lan_eng", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property qr_search() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("qr_search", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property timer() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("timer", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+    End Module
+End Namespace

AVISO_INFO/My Project/Resources.resx

@@ -0,0 +1,145 @@
+<?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.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="lan_de" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\lan_de.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_srb" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_srb.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="timer" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\timer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="qr_search" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\qr_search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="lan_eng" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\lan_eng.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="handy_QR" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\handy_QR.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_tr" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_tr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="flag_srb2" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\flag_srb2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+</root>

AVISO_INFO/My Project/Settings.Designer.vb

@@ -0,0 +1,73 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     Dieser Code wurde von einem Tool generiert.
+'     Laufzeitversion:4.0.30319.42000
+'
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
+'     der Code erneut generiert wird.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.9.0.0"),  _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+    Partial Friend NotInheritable Class MySettings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+        
+        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
+        
+#Region "Automatische My.Settings-Speicherfunktion"
+#If _MyType = "WindowsForms" Then
+    Private Shared addedHandler As Boolean
+
+    Private Shared addedHandlerLockObject As New Object
+
+    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
+        If My.Application.SaveMySettingsOnExit Then
+            My.Settings.Save()
+        End If
+    End Sub
+#End If
+#End Region
+        
+        Public Shared ReadOnly Property [Default]() As MySettings
+            Get
+                
+#If _MyType = "WindowsForms" Then
+               If Not addedHandler Then
+                    SyncLock addedHandlerLockObject
+                        If Not addedHandler Then
+                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                            addedHandler = True
+                        End If
+                    End SyncLock
+                End If
+#End If
+                Return defaultInstance
+            End Get
+        End Property
+    End Class
+End Namespace
+
+Namespace My
+    
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
+    Friend Module MySettingsProperty
+        
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
+        Friend ReadOnly Property Settings() As Global.AVISO_INFO.My.MySettings
+            Get
+                Return Global.AVISO_INFO.My.MySettings.Default
+            End Get
+        End Property
+    End Module
+End Namespace

AVISO_INFO/My Project/Settings.settings

@@ -0,0 +1,7 @@
+<?xml version='1.0' encoding='utf-8'?>
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
+  <Profiles>
+    <Profile Name="(Default)" />
+  </Profiles>
+  <Settings />
+</SettingsFile>

AVISO_INFO/frmInfo.Designer.vb

@@ -0,0 +1,372 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmInfo
+    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(frmInfo))
+        Me.pnl = New System.Windows.Forms.Panel()
+        Me.WebView1 = New Microsoft.Toolkit.Forms.UI.Controls.WebView()
+        Me.WebBrowser = New System.Windows.Forms.WebBrowser()
+        Me.WebBrowser1 = New System.Windows.Forms.WebBrowser()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.btnResetSearch = New System.Windows.Forms.Button()
+        Me.Panel2 = New System.Windows.Forms.Panel()
+        Me.pic = New System.Windows.Forms.PictureBox()
+        Me.lblClock = New System.Windows.Forms.Label()
+        Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Button2 = New System.Windows.Forms.Button()
+        Me.Button4 = New System.Windows.Forms.Button()
+        Me.Button5 = New System.Windows.Forms.Button()
+        Me.Button3 = New System.Windows.Forms.Button()
+        Me.MyTextBox1 = New System.Windows.Forms.TextBox()
+        Me.lbl = New System.Windows.Forms.Label()
+        Me.Panel = New System.Windows.Forms.Panel()
+        Me.Timer = New System.Windows.Forms.Timer(Me.components)
+        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
+        Me.timerResetDefault = New System.Windows.Forms.Timer(Me.components)
+        Me.Panel3 = New System.Windows.Forms.Panel()
+        Me.pnl.SuspendLayout()
+        CType(Me.WebView1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel1.SuspendLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.Panel2.SuspendLayout()
+        CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.FlowLayoutPanel.SuspendLayout()
+        Me.Panel3.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'pnl
+        '
+        Me.pnl.BackColor = System.Drawing.Color.White
+        Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnl.Controls.Add(Me.Panel3)
+        Me.pnl.Controls.Add(Me.WebBrowser)
+        Me.pnl.Controls.Add(Me.WebBrowser1)
+        Me.pnl.Controls.Add(Me.Panel1)
+        Me.pnl.Controls.Add(Me.Panel)
+        Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.pnl.Location = New System.Drawing.Point(0, 0)
+        Me.pnl.Name = "pnl"
+        Me.pnl.Size = New System.Drawing.Size(1388, 559)
+        Me.pnl.TabIndex = 1
+        '
+        'WebView1
+        '
+        Me.WebView1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.WebView1.Location = New System.Drawing.Point(0, 0)
+        Me.WebView1.MinimumSize = New System.Drawing.Size(20, 20)
+        Me.WebView1.Name = "WebView1"
+        Me.WebView1.Size = New System.Drawing.Size(1386, 398)
+        Me.WebView1.TabIndex = 7
+        '
+        'WebBrowser
+        '
+        Me.WebBrowser.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.WebBrowser.Location = New System.Drawing.Point(0, 129)
+        Me.WebBrowser.MinimumSize = New System.Drawing.Size(20, 20)
+        Me.WebBrowser.Name = "WebBrowser"
+        Me.WebBrowser.Size = New System.Drawing.Size(1386, 398)
+        Me.WebBrowser.TabIndex = 6
+        '
+        'WebBrowser1
+        '
+        Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.WebBrowser1.Location = New System.Drawing.Point(0, 129)
+        Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
+        Me.WebBrowser1.Name = "WebBrowser1"
+        Me.WebBrowser1.Size = New System.Drawing.Size(1386, 398)
+        Me.WebBrowser1.TabIndex = 5
+        '
+        'Panel1
+        '
+        Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel1.Controls.Add(Me.PictureBox1)
+        Me.Panel1.Controls.Add(Me.btnResetSearch)
+        Me.Panel1.Controls.Add(Me.Panel2)
+        Me.Panel1.Controls.Add(Me.FlowLayoutPanel)
+        Me.Panel1.Controls.Add(Me.MyTextBox1)
+        Me.Panel1.Controls.Add(Me.lbl)
+        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
+        Me.Panel1.Location = New System.Drawing.Point(0, 0)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(1386, 129)
+        Me.Panel1.TabIndex = 2
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.qr_search
+        Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox1.Location = New System.Drawing.Point(3, 6)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(129, 104)
+        Me.PictureBox1.TabIndex = 6
+        Me.PictureBox1.TabStop = False
+        '
+        'btnResetSearch
+        '
+        Me.btnResetSearch.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnResetSearch.BackColor = System.Drawing.Color.FromArgb(CType(CType(210, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
+        Me.btnResetSearch.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnResetSearch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnResetSearch.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!)
+        Me.btnResetSearch.ForeColor = System.Drawing.Color.White
+        Me.btnResetSearch.Location = New System.Drawing.Point(581, 3)
+        Me.btnResetSearch.Name = "btnResetSearch"
+        Me.btnResetSearch.Size = New System.Drawing.Size(251, 51)
+        Me.btnResetSearch.TabIndex = 1
+        Me.btnResetSearch.Text = "X   Suche zurücksetzen"
+        Me.btnResetSearch.UseVisualStyleBackColor = False
+        Me.btnResetSearch.Visible = False
+        '
+        'Panel2
+        '
+        Me.Panel2.BackColor = System.Drawing.Color.Gold
+        Me.Panel2.Controls.Add(Me.pic)
+        Me.Panel2.Controls.Add(Me.lblClock)
+        Me.Panel2.Location = New System.Drawing.Point(134, 10)
+        Me.Panel2.Name = "Panel2"
+        Me.Panel2.Size = New System.Drawing.Size(96, 47)
+        Me.Panel2.TabIndex = 3
+        Me.Panel2.Visible = False
+        '
+        'pic
+        '
+        Me.pic.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.timer
+        Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.pic.Location = New System.Drawing.Point(4, 4)
+        Me.pic.Name = "pic"
+        Me.pic.Size = New System.Drawing.Size(44, 39)
+        Me.pic.TabIndex = 5
+        Me.pic.TabStop = False
+        '
+        'lblClock
+        '
+        Me.lblClock.AutoSize = True
+        Me.lblClock.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblClock.Location = New System.Drawing.Point(45, 8)
+        Me.lblClock.Name = "lblClock"
+        Me.lblClock.Size = New System.Drawing.Size(46, 31)
+        Me.lblClock.TabIndex = 4
+        Me.lblClock.Text = "10"
+        '
+        'FlowLayoutPanel
+        '
+        Me.FlowLayoutPanel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.FlowLayoutPanel.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.FlowLayoutPanel.Controls.Add(Me.btn)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button1)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button2)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button4)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button5)
+        Me.FlowLayoutPanel.Controls.Add(Me.Button3)
+        Me.FlowLayoutPanel.Location = New System.Drawing.Point(884, 3)
+        Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
+        Me.FlowLayoutPanel.Size = New System.Drawing.Size(491, 75)
+        Me.FlowLayoutPanel.TabIndex = 2
+        '
+        'btn
+        '
+        Me.btn.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.lan_de
+        Me.btn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.ForeColor = System.Drawing.Color.AliceBlue
+        Me.btn.Location = New System.Drawing.Point(3, 3)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(75, 63)
+        Me.btn.TabIndex = 0
+        Me.btn.Tag = "DE"
+        Me.btn.UseVisualStyleBackColor = True
+        '
+        'Button1
+        '
+        Me.Button1.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.lan_eng
+        Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button1.Location = New System.Drawing.Point(84, 3)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 63)
+        Me.Button1.TabIndex = 1
+        Me.Button1.Tag = "EN"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Button2
+        '
+        Me.Button2.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.flag_srb2
+        Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button2.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button2.Location = New System.Drawing.Point(165, 3)
+        Me.Button2.Name = "Button2"
+        Me.Button2.Size = New System.Drawing.Size(75, 63)
+        Me.Button2.TabIndex = 2
+        Me.Button2.Tag = "SRB"
+        Me.Button2.UseVisualStyleBackColor = True
+        '
+        'Button4
+        '
+        Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button4.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button4.Location = New System.Drawing.Point(246, 3)
+        Me.Button4.Name = "Button4"
+        Me.Button4.Size = New System.Drawing.Size(75, 63)
+        Me.Button4.TabIndex = 4
+        Me.Button4.Tag = "RUS"
+        Me.Button4.UseVisualStyleBackColor = True
+        Me.Button4.Visible = False
+        '
+        'Button5
+        '
+        Me.Button5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button5.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button5.Location = New System.Drawing.Point(327, 3)
+        Me.Button5.Name = "Button5"
+        Me.Button5.Size = New System.Drawing.Size(75, 63)
+        Me.Button5.TabIndex = 5
+        Me.Button5.Tag = "BG"
+        Me.Button5.UseVisualStyleBackColor = True
+        Me.Button5.Visible = False
+        '
+        'Button3
+        '
+        Me.Button3.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.flag_tr
+        Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button3.ForeColor = System.Drawing.Color.AliceBlue
+        Me.Button3.Location = New System.Drawing.Point(408, 3)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(75, 63)
+        Me.Button3.TabIndex = 3
+        Me.Button3.Tag = "TR"
+        Me.Button3.UseVisualStyleBackColor = True
+        '
+        'MyTextBox1
+        '
+        Me.MyTextBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.MyTextBox1.Location = New System.Drawing.Point(134, 90)
+        Me.MyTextBox1.Name = "MyTextBox1"
+        Me.MyTextBox1.Size = New System.Drawing.Size(698, 20)
+        Me.MyTextBox1.TabIndex = 7
+        '
+        'lbl
+        '
+        Me.lbl.AutoSize = True
+        Me.lbl.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
+        Me.lbl.Location = New System.Drawing.Point(130, 61)
+        Me.lbl.Name = "lbl"
+        Me.lbl.Size = New System.Drawing.Size(240, 20)
+        Me.lbl.TabIndex = 0
+        Me.lbl.Text = "Bitte scannen Sie den QR-Code:"
+        '
+        'Panel
+        '
+        Me.Panel.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Panel.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.Panel.Location = New System.Drawing.Point(0, 527)
+        Me.Panel.Name = "Panel"
+        Me.Panel.Size = New System.Drawing.Size(1386, 30)
+        Me.Panel.TabIndex = 0
+        Me.Panel.Visible = False
+        '
+        'Timer
+        '
+        Me.Timer.Interval = 1000
+        '
+        'Timer1
+        '
+        Me.Timer1.Enabled = True
+        '
+        'timerResetDefault
+        '
+        Me.timerResetDefault.Enabled = True
+        Me.timerResetDefault.Interval = 5000
+        '
+        'Panel3
+        '
+        Me.Panel3.Controls.Add(Me.WebView1)
+        Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.Panel3.Location = New System.Drawing.Point(0, 129)
+        Me.Panel3.Name = "Panel3"
+        Me.Panel3.Size = New System.Drawing.Size(1386, 398)
+        Me.Panel3.TabIndex = 9
+        '
+        'frmInfo
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1388, 559)
+        Me.Controls.Add(Me.pnl)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmInfo"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Info"
+        Me.TopMost = True
+        Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
+        Me.pnl.ResumeLayout(False)
+        CType(Me.WebView1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel1.ResumeLayout(False)
+        Me.Panel1.PerformLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.Panel2.ResumeLayout(False)
+        Me.Panel2.PerformLayout()
+        CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.FlowLayoutPanel.ResumeLayout(False)
+        Me.Panel3.ResumeLayout(False)
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents pnl As Panel
+    Friend WithEvents Panel1 As Panel
+    Friend WithEvents lbl As Label
+    Friend WithEvents Panel As Panel
+    Friend WithEvents FlowLayoutPanel As FlowLayoutPanel
+    Friend WithEvents btn As Button
+    Friend WithEvents MyTextBox1 As System.Windows.Forms.TextBox
+    Friend WithEvents Timer As Timer
+    Friend WithEvents Panel2 As Panel
+    Friend WithEvents pic As PictureBox
+    Friend WithEvents lblClock As Label
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents btnResetSearch As Button
+    Friend WithEvents WebBrowser1 As WebBrowser
+    Friend WithEvents WebBrowser As WebBrowser
+    Friend WithEvents WebView1 As Microsoft.Toolkit.Forms.UI.Controls.WebView
+    Friend WithEvents Timer1 As Timer
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Button2 As Button
+    Friend WithEvents Button3 As Button
+    Friend WithEvents Button4 As Button
+    Friend WithEvents Button5 As Button
+    Public WithEvents timerResetDefault As Timer
+    Friend WithEvents Panel3 As Panel
+End Class

AVISO_INFO/frmInfo.vb

@@ -0,0 +1,117 @@
+Imports CefSharp.WinForms
+
+Public Class frmInfo
+
+
+    Dim Timer_Sek As Integer = 30
+    Dim Timer_cnt As Integer
+
+    Dim lastLink As String = ""
+
+
+    Dim tmstmp_Eingabe As Date
+
+    Private Sub MyTextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles MyTextBox1.KeyDown
+        Try
+
+            If e.KeyCode = Keys.Return Then
+                lastLink = MyTextBox1.Text
+                setLink(MyTextBox1.Text)
+            End If
+
+            ' Dim c As New ChromiumWebBrowser("as")
+
+            '  Me.WebBrowserEx1.ActivateBrowserOnCreation = False
+
+        Catch ex As Exception
+
+        End Try
+    End Sub
+    Sub setLink(link)
+        If validlink(link) Then
+            WebView1.Navigate(link) ', Nothing, Nothing, "Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.1; Trident/6.0)")
+            '  WebBrowserEx1. = MyTextBox1.Text
+
+            MyTextBox1.Text = ""
+            Timer_cnt = Timer_Sek
+            lblClock.Text = Timer_cnt
+            Panel2.Visible = True
+            Timer.Enabled = True
+            btnResetSearch.Visible = True
+        Else
+            reset()
+        End If
+    End Sub
+    'Private Async Sub Button_Click(ByVal sender As Object, ByVal e As RoutedEventArgs)
+    '    Dim functionString As String = String.Format("document.getElementById('nameDiv').innerText = 'Hello, {0}';", nameTextBox.Text)
+    '    Await WebView1.InvokeScriptAsync("eval", New String() {functionString})
+    'End Sub
+
+
+    Private Sub Timer_Tick(sender As Object, e As EventArgs) Handles Timer.Tick
+        Try
+            If Timer_cnt = 0 Then
+                reset()
+            End If
+
+            Timer_cnt -= 1
+            lblClock.Text = Timer_cnt
+        Catch ex As Exception
+
+        End Try
+    End Sub
+
+    Sub reset()
+        Timer.Enabled = False
+        Panel2.Visible = False
+        btnResetSearch.Visible = False
+        WebView1.Navigate("")
+        WebView1.Dispose()
+        WebView1 = Nothing
+        MyTextBox1.Text = ""
+        MyTextBox1.Focus()
+        lastLink = ""
+    End Sub
+
+    Private Sub btnResetSearch_Click(sender As Object, e As EventArgs) Handles btnResetSearch.Click
+        Try
+            reset()
+        Catch ex As Exception
+
+        End Try
+    End Sub
+
+    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
+        MyTextBox1.Focus()
+    End Sub
+
+    Private Sub btn_Click(sender As Object, e As MouseEventArgs) Handles btn.MouseDown, Button1.MouseDown, Button2.MouseDown, Button3.MouseDown, Button4.MouseDown, Button5.MouseDown
+        If validlink(lastLink) Then
+            setLink(lastLink & "&lan=" & sender.tag)
+        End If
+
+    End Sub
+    Function validlink(link) As Boolean
+        If link = "" Then Return False
+        If Not link.contains("https://login.verag.ag/status.aspx?AvisoId=") Then Return False
+        Return True
+    End Function
+
+    Private Sub timerResetDefault_Tick(sender As Object, e As EventArgs) Handles timerResetDefault.Tick
+        If Timer_cnt > 0 Then Exit Sub ' Anzeige läuft...
+        Dim Result As TimeSpan = Now - tmstmp_Eingabe
+
+        If Result.Seconds > 4 Then
+            reset()
+        End If
+    End Sub
+
+    Private Sub MyTextBox1_TextChanged(sender As Object, e As EventArgs) Handles MyTextBox1.TextChanged
+        tmstmp_Eingabe = Now
+    End Sub
+
+
+    Private Sub btntm_Click(sender As Object, e As MouseEventArgs) Handles pic.MouseDown, lblClock.MouseDown, Panel2.MouseDown
+        Timer_cnt = Timer_Sek + 1 ' zurücksetzen
+    End Sub
+End Class

Aviso.sln

@@ -1,7 +1,7 @@
 
 Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 15
+# Visual Studio Version 17
-VisualStudioVersion = 15.0.28307.106
+VisualStudioVersion = 17.0.31612.314
 MinimumVisualStudioVersion = 10.0.40219.1
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Aviso", "Aviso\Aviso.vbproj", "{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}"
 EndProject
@@ -13,8 +13,6 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "AVISOUPDATER", "AVISOUPDATE
 EndProject
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "SDL", "..\..\SDL\SDL\SDL\SDL.vbproj", "{289BCD77-BC00-4BA1-95ED-A79176D99525}"
 EndProject
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "UID", "..\..\UID\UID\UID\UID.vbproj", "{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}"
-EndProject
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAG_PROG_ALLGEMEIN", "..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj", "{A3B497BD-842C-4A2B-B398-ED1976849DF1}"
 EndProject
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAGAddIn", "..\..\OutlookAddIN\VERAGAddIn\VERAGAddIn\VERAGAddIn.vbproj", "{D579F7A6-7D29-4295-B382-DA5F7EFB4528}"
@@ -23,118 +21,273 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DAKOSY_Worker_lib", "..\..\
 EndProject
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TELOTEC_Worker_lib", "..\..\ADMIN\ADMIN\TELOTEK_Worker_lib\TELOTEC_Worker_lib.vbproj", "{5B947A66-009A-4BB6-B925-F84A01045095}"
 EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "AVISO_INFO", "AVISO_INFO\AVISO_INFO.vbproj", "{A734141E-2C4E-4D70-81E8-A88184282AF5}"
+EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "NCTSPartnerWorker", "..\..\ADMIN\ADMIN\cNCTSPartnerWorker\NCTSPartnerWorker.vbproj", "{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}"
+EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "AVISO_CHECKIN", "AVISO_CHECKIN\AVISO_CHECKIN.vbproj", "{CB95CC0E-D73A-4D11-9FF8-197A392D831F}"
+EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAG_TELEINFO", "VERAG_TELEINFO\VERAG_TELEINFO.vbproj", "{5193A729-058C-4C93-B7D3-0A228CA719CC}"
+EndProject
+Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "PlathosysApiWrapper", "..\..\..\SCHNITTSTELLEN\PLATHOSYS\WRAPPER\PlathosysApiWrapper-master\PlathosysApiWrapper-master\PlathosysApiWrapper\PlathosysApiWrapper.csproj", "{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}"
+EndProject
+Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "sipdotnet", "..\..\dll\Linphone\WRAPPER\sipdotnet-master\sipdotnet-master\sipdotnet.csproj", "{BCB250F8-F74C-4768-8833-0F13FC8659B8}"
+EndProject
+Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Bria_API_CSharp_SampleApp_3.0", "..\..\dll\BRIA\Bria_API_CSharp_SampleApp_3-main\Bria_API_CSharp_SampleApp_3-main\Bria_API_SampleApp_Phone\Bria_API_CSharp_SampleApp_3.0.csproj", "{1F68E194-88A8-47F2-B9F9-20E092EFA30A}"
+EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		Debug|Any CPU = Debug|Any CPU
 		Debug|Mixed Platforms = Debug|Mixed Platforms
+		Debug|x64 = Debug|x64
 		Debug|x86 = Debug|x86
 		Release|Any CPU = Release|Any CPU
 		Release|Mixed Platforms = Release|Mixed Platforms
+		Release|x64 = Release|x64
 		Release|x86 = Release|x86
 	EndGlobalSection
 	GlobalSection(ProjectConfigurationPlatforms) = postSolution
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.ActiveCfg = Debug|x86
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.ActiveCfg = Debug|x64
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.ActiveCfg = Debug|x86
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Any CPU.Build.0 = Debug|x64
-		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.Build.0 = Debug|x86
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.ActiveCfg = Debug|x64
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|Mixed Platforms.Build.0 = Debug|x64
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|x64.ActiveCfg = Debug|x64
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|x64.Build.0 = Debug|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|x86.ActiveCfg = Debug|x86
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Debug|x86.Build.0 = Debug|x86
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|Any CPU.ActiveCfg = Release|x86
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|Mixed Platforms.ActiveCfg = Release|x86
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|Mixed Platforms.Build.0 = Release|x86
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|x64.ActiveCfg = Release|x64
+		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|x64.Build.0 = Release|x64
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|x86.ActiveCfg = Release|x86
 		{7BDD8C2F-2C9E-49F1-A365-3B1DA1C84991}.Release|x86.Build.0 = Release|x86
-		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|Any CPU.ActiveCfg = Debug|x86
+		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|Any CPU.ActiveCfg = Debug|x64
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|Mixed Platforms.ActiveCfg = Debug|x86
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|Mixed Platforms.Build.0 = Debug|x86
+		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|x64.ActiveCfg = Debug|x64
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|x86.ActiveCfg = Debug|x86
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Debug|x86.Build.0 = Debug|x86
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|Any CPU.ActiveCfg = Release|x86
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|Mixed Platforms.ActiveCfg = Release|x86
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|Mixed Platforms.Build.0 = Release|x86
+		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|x64.ActiveCfg = Release|x64
+		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|x64.Build.0 = Release|x64
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|x86.ActiveCfg = Release|x86
 		{3B5EAEB2-0477-4899-A893-3049DD458B9B}.Release|x86.Build.0 = Release|x86
-		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Any CPU.ActiveCfg = Debug|x86
+		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Any CPU.ActiveCfg = Debug|x64
+		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Any CPU.Build.0 = Debug|x64
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Mixed Platforms.ActiveCfg = Debug|x86
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Mixed Platforms.Build.0 = Debug|x86
+		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x64.ActiveCfg = Debug|x64
+		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x64.Build.0 = Debug|x64
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x86.ActiveCfg = Debug|x86
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x86.Build.0 = Debug|x86
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|Any CPU.ActiveCfg = Release|x86
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|Mixed Platforms.ActiveCfg = Release|x86
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|Mixed Platforms.Build.0 = Release|x86
+		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x64.ActiveCfg = Release|x64
+		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x64.Build.0 = Release|x64
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x86.ActiveCfg = Release|x86
 		{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x86.Build.0 = Release|x86
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|x64.Build.0 = Debug|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|Any CPU.Build.0 = Release|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|x64.ActiveCfg = Release|Any CPU
+		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|x64.Build.0 = Release|Any CPU
 		{D8EDB976-2F90-46C1-9642-63BE8C4F5F1F}.Release|x86.ActiveCfg = Release|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x64.Build.0 = Debug|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Any CPU.Build.0 = Release|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x64.ActiveCfg = Release|Any CPU
+		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x64.Build.0 = Release|Any CPU
 		{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x86.ActiveCfg = Release|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.ActiveCfg = Debug|x64
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.Build.0 = Debug|x64
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|x86.ActiveCfg = Debug|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Any CPU.ActiveCfg = Release|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Any CPU.Build.0 = Release|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Mixed Platforms.Build.0 = Release|Any CPU
-		{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|x86.ActiveCfg = Release|Any CPU
-		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
-		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x64.ActiveCfg = Debug|x64
+		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x64.Build.0 = Debug|x64
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Any CPU.Build.0 = Release|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x64.ActiveCfg = Release|Any CPU
+		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x64.Build.0 = Release|Any CPU
 		{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x86.ActiveCfg = Release|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|x64.Build.0 = Debug|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|Any CPU.Build.0 = Release|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|x64.ActiveCfg = Release|Any CPU
+		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|x64.Build.0 = Release|Any CPU
 		{D579F7A6-7D29-4295-B382-DA5F7EFB4528}.Release|x86.ActiveCfg = Release|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x64.Build.0 = Debug|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|Any CPU.Build.0 = Release|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x64.ActiveCfg = Release|Any CPU
+		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x64.Build.0 = Release|Any CPU
 		{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x86.ActiveCfg = Release|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x64.Build.0 = Debug|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x86.ActiveCfg = Debug|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x86.Build.0 = Debug|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Any CPU.Build.0 = Release|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x64.ActiveCfg = Release|Any CPU
+		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x64.Build.0 = Release|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.ActiveCfg = Release|Any CPU
 		{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.Build.0 = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|x64.Build.0 = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|x86.Build.0 = Debug|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Any CPU.Build.0 = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|x64.ActiveCfg = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|x64.Build.0 = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|x86.ActiveCfg = Release|Any CPU
+		{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|x86.Build.0 = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|x64.Build.0 = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Debug|x86.Build.0 = Debug|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|Any CPU.Build.0 = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|x64.ActiveCfg = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|x64.Build.0 = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|x86.ActiveCfg = Release|Any CPU
+		{2BBD7643-82A1-481F-A014-EB7FCDEED3B5}.Release|x86.Build.0 = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|x64.Build.0 = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Debug|x86.Build.0 = Debug|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|Any CPU.Build.0 = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|x64.ActiveCfg = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|x64.Build.0 = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|x86.ActiveCfg = Release|Any CPU
+		{CB95CC0E-D73A-4D11-9FF8-197A392D831F}.Release|x86.Build.0 = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|x64.Build.0 = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Debug|x86.Build.0 = Debug|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|Any CPU.Build.0 = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|x64.ActiveCfg = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|x64.Build.0 = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|x86.ActiveCfg = Release|Any CPU
+		{5193A729-058C-4C93-B7D3-0A228CA719CC}.Release|x86.Build.0 = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|x64.Build.0 = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Debug|x86.Build.0 = Debug|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|Any CPU.Build.0 = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|x64.ActiveCfg = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|x64.Build.0 = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|x86.ActiveCfg = Release|Any CPU
+		{A4A15E4A-9D83-4FD5-807B-63FC87CA4F0F}.Release|x86.Build.0 = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|x64.Build.0 = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Debug|x86.Build.0 = Debug|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|Any CPU.Build.0 = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|x64.ActiveCfg = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|x64.Build.0 = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|x86.ActiveCfg = Release|Any CPU
+		{BCB250F8-F74C-4768-8833-0F13FC8659B8}.Release|x86.Build.0 = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|x64.ActiveCfg = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|x64.Build.0 = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Debug|x86.Build.0 = Debug|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|Any CPU.Build.0 = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|Mixed Platforms.Build.0 = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|x64.ActiveCfg = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|x64.Build.0 = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|x86.ActiveCfg = Release|Any CPU
+		{1F68E194-88A8-47F2-B9F9-20E092EFA30A}.Release|x86.Build.0 = Release|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE

Aviso/Anhänge/frmAddSendnung.Designer.vb

@@ -0,0 +1,443 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmAddSendnung
+    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(frmAddSendnung))
+        Me.cboAbfertigungsart = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.txtEmpfaenger = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
+        Me.txtGewicht = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.Label19 = New System.Windows.Forms.Label()
+        Me.Label17 = New System.Windows.Forms.Label()
+        Me.txtColli = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.rtbWarenbezeichnung = New System.Windows.Forms.RichTextBox()
+        Me.Label23 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.btn = New System.Windows.Forms.Button()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.txtAbsender = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
+        Me.ToolTip = New System.Windows.Forms.ToolTip(Me.components)
+        Me.FlatButton4 = New VERAG_PROG_ALLGEMEIN.FlatButton()
+        Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton()
+        Me.picWarnAbsender = New System.Windows.Forms.PictureBox()
+        Me.picWarnEmpfaenger = New System.Windows.Forms.PictureBox()
+        Me.RichTextBox1 = New System.Windows.Forms.RichTextBox()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.txtWarenwertWaehrung = New VERAG_PROG_ALLGEMEIN.MySearchBox()
+        Me.lblWW = New System.Windows.Forms.Label()
+        Me.txtWarenwert = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        CType(Me.picWarnAbsender, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.picWarnEmpfaenger, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'cboAbfertigungsart
+        '
+        Me.cboAbfertigungsart._allowedValuesFreiText = Nothing
+        Me.cboAbfertigungsart._allowFreiText = False
+        Me.cboAbfertigungsart._value = ""
+        Me.cboAbfertigungsart.BackColor = System.Drawing.Color.White
+        Me.cboAbfertigungsart.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboAbfertigungsart.FormattingEnabled = True
+        Me.cboAbfertigungsart.Location = New System.Drawing.Point(12, 29)
+        Me.cboAbfertigungsart.Name = "cboAbfertigungsart"
+        Me.cboAbfertigungsart.Size = New System.Drawing.Size(425, 24)
+        Me.cboAbfertigungsart.TabIndex = 1
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.ForeColor = System.Drawing.Color.Black
+        Me.Label1.Location = New System.Drawing.Point(10, 9)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(109, 17)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "Abfertigungsart:"
+        '
+        'txtEmpfaenger
+        '
+        Me.txtEmpfaenger._AlleFirmenCLUSTER = False
+        Me.txtEmpfaenger._AllowSetValue = True
+        Me.txtEmpfaenger._autoSizeGross = True
+        Me.txtEmpfaenger._display_Name1 = False
+        Me.txtEmpfaenger._displayAVISO_Email = False
+        Me.txtEmpfaenger._displayFullName = False
+        Me.txtEmpfaenger._displayWoelflKd = False
+        Me.txtEmpfaenger._hideIfListEmpty = True
+        Me.txtEmpfaenger._loadKdData = True
+        Me.txtEmpfaenger._UseFIRMA = ""
+        Me.txtEmpfaenger._ValueKdAndName = True
+        Me.txtEmpfaenger.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
+        Me.txtEmpfaenger.dgvpos = "LEFT"
+        Me.txtEmpfaenger.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.txtEmpfaenger.KdName = ""
+        Me.txtEmpfaenger.KdNr = "-1"
+        Me.txtEmpfaenger.kdNrField = Nothing
+        Me.txtEmpfaenger.KdNrNullInt = Nothing
+        Me.txtEmpfaenger.Location = New System.Drawing.Point(15, 131)
+        Me.txtEmpfaenger.Name = "txtEmpfaenger"
+        Me.txtEmpfaenger.nurAktive = True
+        Me.txtEmpfaenger.searchActive = True
+        Me.txtEmpfaenger.Size = New System.Drawing.Size(378, 23)
+        Me.txtEmpfaenger.TabIndex = 7
+        Me.txtEmpfaenger.TIMER_SEARCH = True
+        Me.txtEmpfaenger.usrcntl = Nothing
+        '
+        'txtGewicht
+        '
+        Me.txtGewicht._DateTimeOnly = False
+        Me.txtGewicht._numbersOnly = True
+        Me.txtGewicht._numbersOnlyKommastellen = ""
+        Me.txtGewicht._Prozent = False
+        Me.txtGewicht._ShortDateNew = False
+        Me.txtGewicht._ShortDateOnly = False
+        Me.txtGewicht._TimeOnly = False
+        Me.txtGewicht._TimeOnly_Seconds = False
+        Me.txtGewicht._value = ""
+        Me.txtGewicht._Waehrung = False
+        Me.txtGewicht._WaehrungZeichen = True
+        Me.txtGewicht.ForeColor = System.Drawing.Color.Black
+        Me.txtGewicht.Location = New System.Drawing.Point(152, 212)
+        Me.txtGewicht.MaxLineLength = -1
+        Me.txtGewicht.MaxLines_Warning = ""
+        Me.txtGewicht.MaxLines_Warning_Label = Nothing
+        Me.txtGewicht.Name = "txtGewicht"
+        Me.txtGewicht.Size = New System.Drawing.Size(60, 20)
+        Me.txtGewicht.TabIndex = 13
+        Me.txtGewicht.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label19
+        '
+        Me.Label19.AutoSize = True
+        Me.Label19.Location = New System.Drawing.Point(9, 164)
+        Me.Label19.Name = "Label19"
+        Me.Label19.Size = New System.Drawing.Size(100, 13)
+        Me.Label19.TabIndex = 8
+        Me.Label19.Text = "Warenbezeichnung"
+        '
+        'Label17
+        '
+        Me.Label17.AutoSize = True
+        Me.Label17.Location = New System.Drawing.Point(10, 215)
+        Me.Label17.Name = "Label17"
+        Me.Label17.Size = New System.Drawing.Size(73, 13)
+        Me.Label17.TabIndex = 10
+        Me.Label17.Text = "Colli/Gewicht:"
+        '
+        'txtColli
+        '
+        Me.txtColli._DateTimeOnly = False
+        Me.txtColli._numbersOnly = True
+        Me.txtColli._numbersOnlyKommastellen = ""
+        Me.txtColli._Prozent = False
+        Me.txtColli._ShortDateNew = False
+        Me.txtColli._ShortDateOnly = False
+        Me.txtColli._TimeOnly = False
+        Me.txtColli._TimeOnly_Seconds = False
+        Me.txtColli._value = ""
+        Me.txtColli._Waehrung = False
+        Me.txtColli._WaehrungZeichen = True
+        Me.txtColli.ForeColor = System.Drawing.Color.Black
+        Me.txtColli.Location = New System.Drawing.Point(84, 212)
+        Me.txtColli.MaxLineLength = -1
+        Me.txtColli.MaxLines_Warning = ""
+        Me.txtColli.MaxLines_Warning_Label = Nothing
+        Me.txtColli.Name = "txtColli"
+        Me.txtColli.Size = New System.Drawing.Size(46, 20)
+        Me.txtColli.TabIndex = 11
+        Me.txtColli.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'rtbWarenbezeichnung
+        '
+        Me.rtbWarenbezeichnung.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.rtbWarenbezeichnung.Cursor = System.Windows.Forms.Cursors.IBeam
+        Me.rtbWarenbezeichnung.Location = New System.Drawing.Point(12, 180)
+        Me.rtbWarenbezeichnung.MaxLength = 500
+        Me.rtbWarenbezeichnung.Name = "rtbWarenbezeichnung"
+        Me.rtbWarenbezeichnung.Size = New System.Drawing.Size(425, 32)
+        Me.rtbWarenbezeichnung.TabIndex = 9
+        Me.rtbWarenbezeichnung.Text = ""
+        '
+        'Label23
+        '
+        Me.Label23.AutoSize = True
+        Me.Label23.Location = New System.Drawing.Point(129, 215)
+        Me.Label23.Name = "Label23"
+        Me.Label23.Size = New System.Drawing.Size(23, 13)
+        Me.Label23.TabIndex = 12
+        Me.Label23.Text = "Pk."
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.Label2.Location = New System.Drawing.Point(10, 111)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(81, 17)
+        Me.Label2.TabIndex = 5
+        Me.Label2.Text = "Empfänger:"
+        '
+        'btn
+        '
+        Me.btn.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btn.Location = New System.Drawing.Point(12, 244)
+        Me.btn.Name = "btn"
+        Me.btn.Size = New System.Drawing.Size(425, 52)
+        Me.btn.TabIndex = 17
+        Me.btn.Text = "OK"
+        Me.btn.UseVisualStyleBackColor = True
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.Label3.Location = New System.Drawing.Point(10, 65)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(73, 17)
+        Me.Label3.TabIndex = 2
+        Me.Label3.Text = "Absender:"
+        '
+        'txtAbsender
+        '
+        Me.txtAbsender._AlleFirmenCLUSTER = False
+        Me.txtAbsender._AllowSetValue = True
+        Me.txtAbsender._autoSizeGross = True
+        Me.txtAbsender._display_Name1 = False
+        Me.txtAbsender._displayAVISO_Email = False
+        Me.txtAbsender._displayFullName = False
+        Me.txtAbsender._displayWoelflKd = False
+        Me.txtAbsender._hideIfListEmpty = True
+        Me.txtAbsender._loadKdData = True
+        Me.txtAbsender._UseFIRMA = ""
+        Me.txtAbsender._ValueKdAndName = True
+        Me.txtAbsender.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
+        Me.txtAbsender.dgvpos = "LEFT"
+        Me.txtAbsender.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.txtAbsender.KdName = ""
+        Me.txtAbsender.KdNr = "-1"
+        Me.txtAbsender.kdNrField = Nothing
+        Me.txtAbsender.KdNrNullInt = Nothing
+        Me.txtAbsender.Location = New System.Drawing.Point(15, 85)
+        Me.txtAbsender.Name = "txtAbsender"
+        Me.txtAbsender.nurAktive = True
+        Me.txtAbsender.searchActive = True
+        Me.txtAbsender.Size = New System.Drawing.Size(378, 23)
+        Me.txtAbsender.TabIndex = 4
+        Me.txtAbsender.TIMER_SEARCH = True
+        Me.txtAbsender.usrcntl = Nothing
+        '
+        'FlatButton4
+        '
+        Me.FlatButton4.allowBorder = False
+        Me.FlatButton4.BackgroundImage = CType(resources.GetObject("FlatButton4.BackgroundImage"), System.Drawing.Image)
+        Me.FlatButton4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.FlatButton4.FlatAppearance.BorderSize = 0
+        Me.FlatButton4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.FlatButton4.ForeColor = System.Drawing.Color.Black
+        Me.FlatButton4.Location = New System.Drawing.Point(391, 130)
+        Me.FlatButton4.Name = "FlatButton4"
+        Me.FlatButton4.Size = New System.Drawing.Size(25, 25)
+        Me.FlatButton4.TabIndex = 6
+        Me.FlatButton4.TabStop = False
+        Me.FlatButton4.UseVisualStyleBackColor = True
+        '
+        'FlatButton1
+        '
+        Me.FlatButton1.allowBorder = False
+        Me.FlatButton1.BackgroundImage = CType(resources.GetObject("FlatButton1.BackgroundImage"), System.Drawing.Image)
+        Me.FlatButton1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.FlatButton1.FlatAppearance.BorderSize = 0
+        Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.FlatButton1.ForeColor = System.Drawing.Color.Black
+        Me.FlatButton1.Location = New System.Drawing.Point(391, 84)
+        Me.FlatButton1.Name = "FlatButton1"
+        Me.FlatButton1.Size = New System.Drawing.Size(25, 25)
+        Me.FlatButton1.TabIndex = 3
+        Me.FlatButton1.TabStop = False
+        Me.FlatButton1.UseVisualStyleBackColor = True
+        '
+        'picWarnAbsender
+        '
+        Me.picWarnAbsender.BackgroundImage = Global.AVISO.My.Resources.Resources.warning2
+        Me.picWarnAbsender.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.picWarnAbsender.Location = New System.Drawing.Point(417, 85)
+        Me.picWarnAbsender.Name = "picWarnAbsender"
+        Me.picWarnAbsender.Size = New System.Drawing.Size(20, 23)
+        Me.picWarnAbsender.TabIndex = 86
+        Me.picWarnAbsender.TabStop = False
+        Me.picWarnAbsender.Visible = False
+        '
+        'picWarnEmpfaenger
+        '
+        Me.picWarnEmpfaenger.BackgroundImage = Global.AVISO.My.Resources.Resources.warning2
+        Me.picWarnEmpfaenger.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.picWarnEmpfaenger.Location = New System.Drawing.Point(417, 131)
+        Me.picWarnEmpfaenger.Name = "picWarnEmpfaenger"
+        Me.picWarnEmpfaenger.Size = New System.Drawing.Size(20, 23)
+        Me.picWarnEmpfaenger.TabIndex = 87
+        Me.picWarnEmpfaenger.TabStop = False
+        Me.picWarnEmpfaenger.Visible = False
+        '
+        'RichTextBox1
+        '
+        Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.RichTextBox1.Cursor = System.Windows.Forms.Cursors.IBeam
+        Me.RichTextBox1.Location = New System.Drawing.Point(12, 327)
+        Me.RichTextBox1.MaxLength = 500
+        Me.RichTextBox1.Name = "RichTextBox1"
+        Me.RichTextBox1.ReadOnly = True
+        Me.RichTextBox1.Size = New System.Drawing.Size(425, 102)
+        Me.RichTextBox1.TabIndex = 19
+        Me.RichTextBox1.Text = ""
+        '
+        'Label4
+        '
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(12, 311)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(184, 13)
+        Me.Label4.TabIndex = 18
+        Me.Label4.Text = "Besonderheiten (aktives Kundenfeld):"
+        '
+        'txtWarenwertWaehrung
+        '
+        Me.txtWarenwertWaehrung._allowFreitext = False
+        Me.txtWarenwertWaehrung._AllowSetValue = False
+        Me.txtWarenwertWaehrung._allowSpaceAsSplitter = False
+        Me.txtWarenwertWaehrung._autoSizeGross = False
+        Me.txtWarenwertWaehrung._hideIfListEmpty = True
+        Me.txtWarenwertWaehrung._value = ""
+        Me.txtWarenwertWaehrung.conn_art = "FMZOLL"
+        Me.txtWarenwertWaehrung.dgvpos = "LEFT"
+        Me.txtWarenwertWaehrung.DISPLAY_PARAM = Nothing
+        Me.txtWarenwertWaehrung.INVISIBLE_COLUMNS = Nothing
+        Me.txtWarenwertWaehrung.key_visible = False
+        Me.txtWarenwertWaehrung.KEYPARAM = Nothing
+        Me.txtWarenwertWaehrung.Location = New System.Drawing.Point(397, 212)
+        Me.txtWarenwertWaehrung.Name = "txtWarenwertWaehrung"
+        Me.txtWarenwertWaehrung.searchActive = True
+        Me.txtWarenwertWaehrung.Size = New System.Drawing.Size(40, 20)
+        Me.txtWarenwertWaehrung.SQL_ORDER_BY = Nothing
+        Me.txtWarenwertWaehrung.SQL_SELECT = Nothing
+        Me.txtWarenwertWaehrung.SQL_WHERE = Nothing
+        Me.txtWarenwertWaehrung.SQL_WhereParamList = Nothing
+        Me.txtWarenwertWaehrung.TabIndex = 16
+        Me.txtWarenwertWaehrung.usrcntl = Nothing
+        '
+        'lblWW
+        '
+        Me.lblWW.AutoSize = True
+        Me.lblWW.Location = New System.Drawing.Point(218, 215)
+        Me.lblWW.Name = "lblWW"
+        Me.lblWW.Size = New System.Drawing.Size(62, 13)
+        Me.lblWW.TabIndex = 14
+        Me.lblWW.Text = "Warenwert:"
+        '
+        'txtWarenwert
+        '
+        Me.txtWarenwert._DateTimeOnly = False
+        Me.txtWarenwert._numbersOnly = True
+        Me.txtWarenwert._numbersOnlyKommastellen = ""
+        Me.txtWarenwert._Prozent = False
+        Me.txtWarenwert._ShortDateNew = False
+        Me.txtWarenwert._ShortDateOnly = False
+        Me.txtWarenwert._TimeOnly = False
+        Me.txtWarenwert._TimeOnly_Seconds = False
+        Me.txtWarenwert._value = ""
+        Me.txtWarenwert._Waehrung = False
+        Me.txtWarenwert._WaehrungZeichen = True
+        Me.txtWarenwert.ForeColor = System.Drawing.Color.Black
+        Me.txtWarenwert.Location = New System.Drawing.Point(289, 212)
+        Me.txtWarenwert.MaxLineLength = -1
+        Me.txtWarenwert.MaxLines_Warning = ""
+        Me.txtWarenwert.MaxLines_Warning_Label = Nothing
+        Me.txtWarenwert.Name = "txtWarenwert"
+        Me.txtWarenwert.Size = New System.Drawing.Size(109, 20)
+        Me.txtWarenwert.TabIndex = 15
+        Me.txtWarenwert.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'frmAddSendnung
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.ClientSize = New System.Drawing.Size(449, 441)
+        Me.Controls.Add(Me.txtWarenwertWaehrung)
+        Me.Controls.Add(Me.lblWW)
+        Me.Controls.Add(Me.txtWarenwert)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.RichTextBox1)
+        Me.Controls.Add(Me.picWarnEmpfaenger)
+        Me.Controls.Add(Me.picWarnAbsender)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.txtAbsender)
+        Me.Controls.Add(Me.btn)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.txtGewicht)
+        Me.Controls.Add(Me.Label19)
+        Me.Controls.Add(Me.Label17)
+        Me.Controls.Add(Me.txtColli)
+        Me.Controls.Add(Me.rtbWarenbezeichnung)
+        Me.Controls.Add(Me.Label23)
+        Me.Controls.Add(Me.txtEmpfaenger)
+        Me.Controls.Add(Me.cboAbfertigungsart)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.FlatButton1)
+        Me.Controls.Add(Me.FlatButton4)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmAddSendnung"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Sendnung hinzufügen"
+        CType(Me.picWarnAbsender, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.picWarnEmpfaenger, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents cboAbfertigungsart As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents txtEmpfaenger As VERAG_PROG_ALLGEMEIN.KdSearchBox
+    Friend WithEvents txtGewicht As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents Label19 As Label
+    Friend WithEvents Label17 As Label
+    Friend WithEvents txtColli As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents rtbWarenbezeichnung As RichTextBox
+    Friend WithEvents Label23 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents btn As Button
+    Friend WithEvents Label3 As Label
+    Friend WithEvents txtAbsender As VERAG_PROG_ALLGEMEIN.KdSearchBox
+    Friend WithEvents ToolTip As ToolTip
+    Friend WithEvents FlatButton4 As VERAG_PROG_ALLGEMEIN.FlatButton
+    Friend WithEvents FlatButton1 As VERAG_PROG_ALLGEMEIN.FlatButton
+    Friend WithEvents picWarnAbsender As PictureBox
+    Friend WithEvents picWarnEmpfaenger As PictureBox
+    Friend WithEvents RichTextBox1 As RichTextBox
+    Friend WithEvents Label4 As Label
+    Friend WithEvents txtWarenwertWaehrung As VERAG_PROG_ALLGEMEIN.MySearchBox
+    Friend WithEvents lblWW As Label
+    Friend WithEvents txtWarenwert As VERAG_PROG_ALLGEMEIN.MyTextBox
+End Class

Aviso/Anhänge/frmAddSendnung.vb

@@ -0,0 +1,198 @@
+Public Class frmAddSendnung
+
+    Public Sendung As VERAG_PROG_ALLGEMEIN.cSendungen = Nothing
+    Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+    Dim AvisoId As Integer
+    Dim AVISOFUNC As New AvisoStatusFunctions
+    Public SendungsId As Integer = -1
+    Sub New(AvisoId)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.AvisoId = AvisoId
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+    Sub New(AvisoId, SENDUNG)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.AvisoId = AvisoId
+        Me.Sendung = SENDUNG
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+    Private Sub frmAddSendnung_Load(sender As Object, e As EventArgs) Handles Me.Load
+        cboAbfertigungsart.fillWithSQL("SELECT [Abfertigungsart],[Abfertigungsbezeichnung] FROM [Abfertigungsarten] ", True, "FMZOLL", True)
+        txtEmpfaenger.initKdBox(Me)
+        txtEmpfaenger.usrcntlWIDTH = 360
+        txtEmpfaenger.usrcntlHEIGHT = 100
+        txtAbsender.initKdBox(Me)
+        txtAbsender.usrcntlWIDTH = 360
+        txtAbsender.usrcntlHEIGHT = 100
+
+        txtWarenwertWaehrung.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM tbl_DY_ZollDE_I0400_Waehrungsliste", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 150, 200)
+
+        AddHandler txtEmpfaenger.PropertyChanged, Sub()
+                                                      FlatButton4.BackgroundImage = IIf(txtEmpfaenger.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
+                                                      initWarnKd(txtEmpfaenger, picWarnEmpfaenger)
+                                                      initBesKd(txtEmpfaenger)
+                                                  End Sub
+        AddHandler txtAbsender.PropertyChanged, Sub()
+                                                    FlatButton1.BackgroundImage = IIf(txtAbsender.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
+                                                    initWarnKd(txtAbsender, picWarnAbsender)
+                                                    initBesKd(txtAbsender)
+                                                End Sub
+
+
+
+        If Sendung IsNot Nothing Then
+            cboAbfertigungsart.changeItem(Sendung.tblSnd_Abfertigungsart_ID)
+            If Sendung.tblSnd_EmpfaengerKdNr > 0 Then
+                txtEmpfaenger.KdNr = Sendung.tblSnd_EmpfaengerKdNr
+            Else
+                txtEmpfaenger.Text = Sendung.tblSnd_Empfaenger
+            End If
+            If Sendung.tblSnd_AbsenderKdNr > 0 Then
+                txtAbsender.KdNr = Sendung.tblSnd_AbsenderKdNr
+            Else
+                txtAbsender.Text = Sendung.tblSnd_Absender
+            End If
+
+            txtColli.Text = If(Sendung.tblSnd_Colli, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
+            txtGewicht.Text = If(Sendung.tblSnd_Gewicht, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
+            txtWarenwert.Text = If(Sendung.tblSnd_Warenwert, "")
+            txtWarenwertWaehrung.SET_VALUE(If(Sendung.tblSnd_WarenwertWaehrung, ""))
+            rtbWarenbezeichnung.Text = If(Sendung.tblSnd_Warenbezeichnung, "")
+
+        End If
+
+
+
+    End Sub
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
+        Try
+            txtColli.Text = txtColli.Text.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
+            txtGewicht.Text = txtGewicht.Text.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
+            If txtColli.Text <> "" And Not IsNumeric(txtColli.Text) Then MsgBox("Colli: Falsches Format") : Exit Sub
+            If txtGewicht.Text <> "" And Not IsNumeric(txtGewicht.Text) Then MsgBox("Gewicht: Falsches Format") : Exit Sub
+
+            If Sendung Is Nothing Then
+                Sendung = New VERAG_PROG_ALLGEMEIN.cSendungen(AvisoId, SQL.getValueTxtBySql("SELECT Count(*)+1 FROM tblSendungen WHERE tblSnd_AvisoID=" & AvisoId & "", "AVISO"),,,, 0)
+            End If
+
+            Sendung.tblSnd_Abfertigungsart_ID = If(cboAbfertigungsart._value <> "", cboAbfertigungsart._value, -1)
+            Sendung.tblSnd_Empfaenger = txtEmpfaenger.Text
+            Sendung.tblSnd_EmpfaengerKdNr = txtEmpfaenger.KdNr
+            Sendung.tblSnd_Absender = txtAbsender.Text
+            Sendung.tblSnd_AbsenderKdNr = txtAbsender.KdNr
+            Sendung.tblSnd_Colli = ""
+            Sendung.tblSnd_Gewicht = ""
+            If txtColli.Text <> "" Then Sendung.tblSnd_Colli = CInt(txtColli.Text)
+            If txtGewicht.Text <> "" Then Sendung.tblSnd_Gewicht = CDbl(txtGewicht.Text)
+            If txtWarenwert._value <> "" Then Sendung.tblSnd_Warenwert = CDbl(txtWarenwert._value)
+            If txtWarenwertWaehrung._value <> "" Then Sendung.tblSnd_WarenwertWaehrung = txtWarenwertWaehrung._value
+
+
+            Sendung.tblSnd_Warenbezeichnung = rtbWarenbezeichnung.Text
+
+            If Sendung.SAVE Then
+                SendungsId = Sendung.tblSnd_SendungID
+                Me.DialogResult = DialogResult.OK
+            Else
+                Me.DialogResult = DialogResult.None
+            End If
+
+            Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+        End Try
+
+    End Sub
+
+    Private Sub txtEmpfaenger_PropertyChanged(sender As Object, e As EventArgs) Handles txtEmpfaenger.PropertyChanged
+        initWarnKd(txtEmpfaenger, picWarnEmpfaenger)
+    End Sub
+
+    Private Sub txtEmpfaenger_TextChanged_1(sender As Object, e As EventArgs) Handles txtEmpfaenger.TextChanged
+        picWarnEmpfaenger.Visible = False
+        'initBesKd(Nothing)
+    End Sub
+
+    Private Sub txtAbsender_TextChanged(sender As Object, e As EventArgs) Handles txtAbsender.TextChanged
+        picWarnAbsender.Visible = False
+        '  initBesKd(Nothing)
+    End Sub
+    Private Sub txtAbsender_PropertyChanged(sender As Object, e As EventArgs) Handles txtAbsender.PropertyChanged
+        initWarnKd(txtAbsender, picWarnAbsender)
+    End Sub
+
+    Sub initWarnKd(kdSearch As VERAG_PROG_ALLGEMEIN.KdSearchBox, pic As PictureBox)
+        Try
+            pic.Visible = False
+            ToolTip.SetToolTip(pic, "")
+            Dim InfoText = ""
+            If kdSearch.KdData_ADRESSEN IsNot Nothing Then
+                If kdSearch.KdData_ADRESSEN.Auswahl = "I" Then
+                    InfoText &= "KUNDE INAKTIV!" & vbNewLine & vbNewLine
+                End If
+            End If
+
+            If kdSearch.KdData_KUNDE IsNot Nothing Then
+                If kdSearch.KdData_KUNDE.Abfertigungsverbot Then
+                    pic.Visible = True
+                    Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
+                        Case "VERAG" : InfoText &= "ACHTUNG!" & vbNewLine
+                        Case Else
+                            InfoText &= "ABFERTIGUNGSVERBOT!" & vbNewLine
+                    End Select
+                    If If(kdSearch.KdData_KUNDE.Abfertigungsverbot_Grund, "") <> "" Then InfoText &= kdSearch.KdData_KUNDE.Abfertigungsverbot_Grund & vbNewLine
+                End If
+            End If
+
+            ToolTip.SetToolTip(pic, InfoText.Trim)
+
+        Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+        End Try
+    End Sub
+
+    Sub initBesKd(kdSearch As VERAG_PROG_ALLGEMEIN.KdSearchBox)
+        If kdSearch Is Nothing Then
+            RichTextBox1.Text = ""
+        Else
+            If kdSearch.KdData_KUNDE IsNot Nothing Then
+                RichTextBox1.Text = If(kdSearch.KdData_KUNDE.Besonderheiten, "")
+            End If
+        End If
+    End Sub
+
+    Private Sub FlatButton4_Click(sender As Object, e As EventArgs) Handles FlatButton4.Click
+        If txtEmpfaenger.KdNr > 0 Then
+            Me.Cursor = Cursors.WaitCursor
+            AVISOFUNC.showKd(txtEmpfaenger.KdNr)
+            Me.Cursor = Cursors.Default
+        End If
+    End Sub
+
+
+    Private Sub FlatButton1_Click(sender As Object, e As EventArgs) Handles FlatButton1.Click
+        If txtAbsender.KdNr > 0 Then
+            Me.Cursor = Cursors.WaitCursor
+            AVISOFUNC.showKd(txtAbsender.KdNr)
+            Me.Cursor = Cursors.Default
+        End If
+    End Sub
+
+    Private Sub txtAbsender_GotFocus(sender As Object, e As EventArgs) Handles txtAbsender.GotFocus, txtEmpfaenger.GotFocus
+        initBesKd(sender)
+    End Sub
+    Private Sub txtAbsender_lostFocus(sender As Object, e As EventArgs) Handles txtAbsender.LostFocus, txtEmpfaenger.LostFocus
+        initBesKd(Nothing)
+    End Sub
+
+    Private Sub txtGewicht_Leave(sender As Object, e As EventArgs) Handles txtGewicht.Leave, txtColli.Leave
+        sender.Text = sender.Text.Replace(" ", "")
+    End Sub
+End Class

Aviso/Anhänge/frmSendungAnhangImport.Designer.vb

@@ -0,0 +1,735 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class frmSendungAnhangImport
+    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(frmSendungAnhangImport))
+        Me.lbl = New System.Windows.Forms.Label()
+        Me.flpnlAviso = New System.Windows.Forms.FlowLayoutPanel()
+        Me.flpnlSendungen = New System.Windows.Forms.FlowLayoutPanel()
+        Me.lblSendungen = New System.Windows.Forms.Label()
+        Me.lblImport = New System.Windows.Forms.Label()
+        Me.pnlAnfuegen = New System.Windows.Forms.Panel()
+        Me.cbxAlternativePDFAnsicht = New System.Windows.Forms.CheckBox()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.txtBezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.lblBezeichnung = New System.Windows.Forms.Label()
+        Me.btnSeitenLoeschen = New System.Windows.Forms.Button()
+        Me.btnAnfuegenAll = New System.Windows.Forms.Button()
+        Me.txtDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.lblDatei = New System.Windows.Forms.Label()
+        Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.lblSendung = New System.Windows.Forms.Label()
+        Me.lblArt = New System.Windows.Forms.Label()
+        Me.cboArt = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.btnAnfuegen = New System.Windows.Forms.Button()
+        Me.txtSeiten = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.lblSeiten = New System.Windows.Forms.Label()
+        Me.cbxDelPDF = New System.Windows.Forms.CheckBox()
+        Me.btnAdd = New System.Windows.Forms.Button()
+        Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.DateiHochladenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.DateiScannenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AusZwischenablageeinfügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.btnDel = New System.Windows.Forms.Button()
+        Me.pnl = New System.Windows.Forms.Panel()
+        Me.Button5 = New System.Windows.Forms.Button()
+        Me.PdfViewer = New Spire.PdfViewer.Forms.PdfViewer()
+        Me.WebBrowser = New System.Windows.Forms.WebBrowser()
+        Me.Button3 = New System.Windows.Forms.Button()
+        Me.btnSndDel = New System.Windows.Forms.Button()
+        Me.PrintDocument1 = New System.Drawing.Printing.PrintDocument()
+        Me.btnAddSnd = New System.Windows.Forms.Button()
+        Me.cboSendungen = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.lblSendungsdetails = New System.Windows.Forms.Label()
+        Me.lblWarenbeichnung = New System.Windows.Forms.Label()
+        Me.btnSndEdit = New System.Windows.Forms.Button()
+        Me.lblAbsender = New System.Windows.Forms.Label()
+        Me.lblEmpfaenger = New System.Windows.Forms.Label()
+        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.Button17 = New System.Windows.Forms.Button()
+        Me.lblRgPreis = New System.Windows.Forms.Label()
+        Me.UsrCntlSendungAnhangElement1 = New AVISO.usrCntlSendungAnhangElement()
+        Me.UsrCntlSendungAnhangElement2 = New AVISO.usrCntlSendungAnhangElement()
+        Me.flpnlAviso.SuspendLayout()
+        Me.pnlAnfuegen.SuspendLayout()
+        Me.cntxt.SuspendLayout()
+        Me.pnl.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'lbl
+        '
+        Me.lbl.AutoSize = True
+        Me.lbl.Location = New System.Drawing.Point(12, 14)
+        Me.lbl.Name = "lbl"
+        Me.lbl.Size = New System.Drawing.Size(53, 13)
+        Me.lbl.TabIndex = 0
+        Me.lbl.Text = "Anhänge:"
+        '
+        'flpnlAviso
+        '
+        Me.flpnlAviso.AllowDrop = True
+        Me.flpnlAviso.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.flpnlAviso.AutoScroll = True
+        Me.flpnlAviso.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.flpnlAviso.Controls.Add(Me.UsrCntlSendungAnhangElement1)
+        Me.flpnlAviso.Controls.Add(Me.UsrCntlSendungAnhangElement2)
+        Me.flpnlAviso.FlowDirection = System.Windows.Forms.FlowDirection.TopDown
+        Me.flpnlAviso.Location = New System.Drawing.Point(15, 30)
+        Me.flpnlAviso.Name = "flpnlAviso"
+        Me.flpnlAviso.Size = New System.Drawing.Size(200, 825)
+        Me.flpnlAviso.TabIndex = 7
+        '
+        'flpnlSendungen
+        '
+        Me.flpnlSendungen.AllowDrop = True
+        Me.flpnlSendungen.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.flpnlSendungen.AutoScroll = True
+        Me.flpnlSendungen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.flpnlSendungen.FlowDirection = System.Windows.Forms.FlowDirection.TopDown
+        Me.flpnlSendungen.Location = New System.Drawing.Point(1073, 150)
+        Me.flpnlSendungen.Name = "flpnlSendungen"
+        Me.flpnlSendungen.Size = New System.Drawing.Size(230, 643)
+        Me.flpnlSendungen.TabIndex = 10
+        '
+        'lblSendungen
+        '
+        Me.lblSendungen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblSendungen.AutoSize = True
+        Me.lblSendungen.Location = New System.Drawing.Point(1070, 14)
+        Me.lblSendungen.Name = "lblSendungen"
+        Me.lblSendungen.Size = New System.Drawing.Size(65, 13)
+        Me.lblSendungen.TabIndex = 6
+        Me.lblSendungen.Text = "Sendungen:"
+        '
+        'lblImport
+        '
+        Me.lblImport.AutoSize = True
+        Me.lblImport.Location = New System.Drawing.Point(221, 14)
+        Me.lblImport.Name = "lblImport"
+        Me.lblImport.Size = New System.Drawing.Size(39, 13)
+        Me.lblImport.TabIndex = 5
+        Me.lblImport.Text = "Import:"
+        '
+        'pnlAnfuegen
+        '
+        Me.pnlAnfuegen.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.pnlAnfuegen.BackColor = System.Drawing.Color.FloralWhite
+        Me.pnlAnfuegen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnlAnfuegen.Controls.Add(Me.cbxAlternativePDFAnsicht)
+        Me.pnlAnfuegen.Controls.Add(Me.Button1)
+        Me.pnlAnfuegen.Controls.Add(Me.txtBezeichnung)
+        Me.pnlAnfuegen.Controls.Add(Me.lblBezeichnung)
+        Me.pnlAnfuegen.Controls.Add(Me.btnSeitenLoeschen)
+        Me.pnlAnfuegen.Controls.Add(Me.btnAnfuegenAll)
+        Me.pnlAnfuegen.Controls.Add(Me.txtDateiname)
+        Me.pnlAnfuegen.Controls.Add(Me.lblDatei)
+        Me.pnlAnfuegen.Controls.Add(Me.MyTextBox2)
+        Me.pnlAnfuegen.Controls.Add(Me.lblSendung)
+        Me.pnlAnfuegen.Controls.Add(Me.lblArt)
+        Me.pnlAnfuegen.Controls.Add(Me.cboArt)
+        Me.pnlAnfuegen.Controls.Add(Me.btnAnfuegen)
+        Me.pnlAnfuegen.Controls.Add(Me.txtSeiten)
+        Me.pnlAnfuegen.Controls.Add(Me.lblSeiten)
+        Me.pnlAnfuegen.Controls.Add(Me.cbxDelPDF)
+        Me.pnlAnfuegen.Location = New System.Drawing.Point(221, 30)
+        Me.pnlAnfuegen.Name = "pnlAnfuegen"
+        Me.pnlAnfuegen.Size = New System.Drawing.Size(846, 162)
+        Me.pnlAnfuegen.TabIndex = 8
+        '
+        'cbxAlternativePDFAnsicht
+        '
+        Me.cbxAlternativePDFAnsicht.AutoSize = True
+        Me.cbxAlternativePDFAnsicht.Location = New System.Drawing.Point(527, 139)
+        Me.cbxAlternativePDFAnsicht.Name = "cbxAlternativePDFAnsicht"
+        Me.cbxAlternativePDFAnsicht.Size = New System.Drawing.Size(138, 17)
+        Me.cbxAlternativePDFAnsicht.TabIndex = 15
+        Me.cbxAlternativePDFAnsicht.Text = "Alternative PDF-Ansicht"
+        Me.cbxAlternativePDFAnsicht.UseVisualStyleBackColor = True
+        '
+        'Button1
+        '
+        Me.Button1.BackColor = System.Drawing.Color.Wheat
+        Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button1.Location = New System.Drawing.Point(748, 132)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(52, 28)
+        Me.Button1.TabIndex = 14
+        Me.Button1.Text = "Hardcore test"
+        Me.Button1.UseVisualStyleBackColor = False
+        Me.Button1.Visible = False
+        '
+        'txtBezeichnung
+        '
+        Me.txtBezeichnung._DateTimeOnly = False
+        Me.txtBezeichnung._numbersOnly = False
+        Me.txtBezeichnung._numbersOnlyKommastellen = ""
+        Me.txtBezeichnung._Prozent = False
+        Me.txtBezeichnung._ShortDateNew = False
+        Me.txtBezeichnung._ShortDateOnly = False
+        Me.txtBezeichnung._TimeOnly = False
+        Me.txtBezeichnung._TimeOnly_Seconds = False
+        Me.txtBezeichnung._value = ""
+        Me.txtBezeichnung._Waehrung = False
+        Me.txtBezeichnung._WaehrungZeichen = True
+        Me.txtBezeichnung.BackColor = System.Drawing.Color.White
+        Me.txtBezeichnung.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtBezeichnung.ForeColor = System.Drawing.Color.Black
+        Me.txtBezeichnung.Location = New System.Drawing.Point(68, 105)
+        Me.txtBezeichnung.MaxLineLength = -1
+        Me.txtBezeichnung.MaxLines_Warning = ""
+        Me.txtBezeichnung.MaxLines_Warning_Label = Nothing
+        Me.txtBezeichnung.Name = "txtBezeichnung"
+        Me.txtBezeichnung.Size = New System.Drawing.Size(453, 26)
+        Me.txtBezeichnung.TabIndex = 7
+        '
+        'lblBezeichnung
+        '
+        Me.lblBezeichnung.AutoSize = True
+        Me.lblBezeichnung.Location = New System.Drawing.Point(3, 113)
+        Me.lblBezeichnung.Name = "lblBezeichnung"
+        Me.lblBezeichnung.Size = New System.Drawing.Size(63, 13)
+        Me.lblBezeichnung.TabIndex = 10
+        Me.lblBezeichnung.Text = "Bezeichng.:"
+        '
+        'btnSeitenLoeschen
+        '
+        Me.btnSeitenLoeschen.BackColor = System.Drawing.Color.Wheat
+        Me.btnSeitenLoeschen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnSeitenLoeschen.Location = New System.Drawing.Point(523, 105)
+        Me.btnSeitenLoeschen.Name = "btnSeitenLoeschen"
+        Me.btnSeitenLoeschen.Size = New System.Drawing.Size(277, 28)
+        Me.btnSeitenLoeschen.TabIndex = 11
+        Me.btnSeitenLoeschen.Text = "Seiten löschen"
+        Me.btnSeitenLoeschen.UseVisualStyleBackColor = False
+        '
+        'btnAnfuegenAll
+        '
+        Me.btnAnfuegenAll.BackColor = System.Drawing.Color.Wheat
+        Me.btnAnfuegenAll.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAnfuegenAll.Location = New System.Drawing.Point(523, 47)
+        Me.btnAnfuegenAll.Name = "btnAnfuegenAll"
+        Me.btnAnfuegenAll.Size = New System.Drawing.Size(277, 56)
+        Me.btnAnfuegenAll.TabIndex = 9
+        Me.btnAnfuegenAll.Text = ">>   Ganzes Dokument anfügen   >>"
+        Me.btnAnfuegenAll.UseVisualStyleBackColor = False
+        '
+        'txtDateiname
+        '
+        Me.txtDateiname._DateTimeOnly = False
+        Me.txtDateiname._numbersOnly = False
+        Me.txtDateiname._numbersOnlyKommastellen = ""
+        Me.txtDateiname._Prozent = False
+        Me.txtDateiname._ShortDateNew = False
+        Me.txtDateiname._ShortDateOnly = False
+        Me.txtDateiname._TimeOnly = False
+        Me.txtDateiname._TimeOnly_Seconds = False
+        Me.txtDateiname._value = ""
+        Me.txtDateiname._Waehrung = False
+        Me.txtDateiname._WaehrungZeichen = True
+        Me.txtDateiname.ForeColor = System.Drawing.Color.Black
+        Me.txtDateiname.Location = New System.Drawing.Point(68, 11)
+        Me.txtDateiname.MaxLineLength = -1
+        Me.txtDateiname.MaxLines_Warning = ""
+        Me.txtDateiname.MaxLines_Warning_Label = Nothing
+        Me.txtDateiname.Name = "txtDateiname"
+        Me.txtDateiname.ReadOnly = True
+        Me.txtDateiname.Size = New System.Drawing.Size(732, 20)
+        Me.txtDateiname.TabIndex = 1
+        '
+        'lblDatei
+        '
+        Me.lblDatei.AutoSize = True
+        Me.lblDatei.Location = New System.Drawing.Point(3, 14)
+        Me.lblDatei.Name = "lblDatei"
+        Me.lblDatei.Size = New System.Drawing.Size(35, 13)
+        Me.lblDatei.TabIndex = 0
+        Me.lblDatei.Text = "Datei:"
+        '
+        'MyTextBox2
+        '
+        Me.MyTextBox2._DateTimeOnly = False
+        Me.MyTextBox2._numbersOnly = False
+        Me.MyTextBox2._numbersOnlyKommastellen = ""
+        Me.MyTextBox2._Prozent = False
+        Me.MyTextBox2._ShortDateNew = False
+        Me.MyTextBox2._ShortDateOnly = False
+        Me.MyTextBox2._TimeOnly = False
+        Me.MyTextBox2._TimeOnly_Seconds = False
+        Me.MyTextBox2._value = ""
+        Me.MyTextBox2._Waehrung = False
+        Me.MyTextBox2._WaehrungZeichen = True
+        Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
+        Me.MyTextBox2.Location = New System.Drawing.Point(68, 137)
+        Me.MyTextBox2.MaxLineLength = -1
+        Me.MyTextBox2.MaxLines_Warning = ""
+        Me.MyTextBox2.MaxLines_Warning_Label = Nothing
+        Me.MyTextBox2.Name = "MyTextBox2"
+        Me.MyTextBox2.ReadOnly = True
+        Me.MyTextBox2.Size = New System.Drawing.Size(453, 20)
+        Me.MyTextBox2.TabIndex = 13
+        '
+        'lblSendung
+        '
+        Me.lblSendung.AutoSize = True
+        Me.lblSendung.Location = New System.Drawing.Point(3, 140)
+        Me.lblSendung.Name = "lblSendung"
+        Me.lblSendung.Size = New System.Drawing.Size(53, 13)
+        Me.lblSendung.TabIndex = 12
+        Me.lblSendung.Text = "Sendung:"
+        '
+        'lblArt
+        '
+        Me.lblArt.AutoSize = True
+        Me.lblArt.Location = New System.Drawing.Point(3, 83)
+        Me.lblArt.Name = "lblArt"
+        Me.lblArt.Size = New System.Drawing.Size(23, 13)
+        Me.lblArt.TabIndex = 5
+        Me.lblArt.Text = "Art:"
+        '
+        'cboArt
+        '
+        Me.cboArt._allowedValuesFreiText = Nothing
+        Me.cboArt._allowFreiText = False
+        Me.cboArt._value = ""
+        Me.cboArt.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
+        Me.cboArt.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
+        Me.cboArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboArt.FormattingEnabled = True
+        Me.cboArt.Location = New System.Drawing.Point(68, 75)
+        Me.cboArt.Name = "cboArt"
+        Me.cboArt.Size = New System.Drawing.Size(242, 28)
+        Me.cboArt.TabIndex = 6
+        '
+        'btnAnfuegen
+        '
+        Me.btnAnfuegen.BackColor = System.Drawing.Color.Wheat
+        Me.btnAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAnfuegen.Location = New System.Drawing.Point(316, 47)
+        Me.btnAnfuegen.Name = "btnAnfuegen"
+        Me.btnAnfuegen.Size = New System.Drawing.Size(205, 56)
+        Me.btnAnfuegen.TabIndex = 8
+        Me.btnAnfuegen.Text = ">>   Anfügen   >>"
+        Me.btnAnfuegen.UseVisualStyleBackColor = False
+        '
+        'txtSeiten
+        '
+        Me.txtSeiten._DateTimeOnly = False
+        Me.txtSeiten._numbersOnly = False
+        Me.txtSeiten._numbersOnlyKommastellen = ""
+        Me.txtSeiten._Prozent = False
+        Me.txtSeiten._ShortDateNew = False
+        Me.txtSeiten._ShortDateOnly = False
+        Me.txtSeiten._TimeOnly = False
+        Me.txtSeiten._TimeOnly_Seconds = False
+        Me.txtSeiten._value = ""
+        Me.txtSeiten._Waehrung = False
+        Me.txtSeiten._WaehrungZeichen = True
+        Me.txtSeiten.BackColor = System.Drawing.Color.White
+        Me.txtSeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtSeiten.ForeColor = System.Drawing.Color.Black
+        Me.txtSeiten.Location = New System.Drawing.Point(68, 47)
+        Me.txtSeiten.MaxLineLength = -1
+        Me.txtSeiten.MaxLines_Warning = ""
+        Me.txtSeiten.MaxLines_Warning_Label = Nothing
+        Me.txtSeiten.Name = "txtSeiten"
+        Me.txtSeiten.Size = New System.Drawing.Size(242, 26)
+        Me.txtSeiten.TabIndex = 4
+        '
+        'lblSeiten
+        '
+        Me.lblSeiten.AutoSize = True
+        Me.lblSeiten.Location = New System.Drawing.Point(3, 55)
+        Me.lblSeiten.Name = "lblSeiten"
+        Me.lblSeiten.Size = New System.Drawing.Size(40, 13)
+        Me.lblSeiten.TabIndex = 3
+        Me.lblSeiten.Text = "Seiten:"
+        '
+        'cbxDelPDF
+        '
+        Me.cbxDelPDF.AutoSize = True
+        Me.cbxDelPDF.Checked = True
+        Me.cbxDelPDF.CheckState = System.Windows.Forms.CheckState.Checked
+        Me.cbxDelPDF.Location = New System.Drawing.Point(316, 31)
+        Me.cbxDelPDF.Name = "cbxDelPDF"
+        Me.cbxDelPDF.Size = New System.Drawing.Size(244, 17)
+        Me.cbxDelPDF.TabIndex = 2
+        Me.cbxDelPDF.Text = "angefügte Dateien aus Original PDF entfernen"
+        Me.cbxDelPDF.UseVisualStyleBackColor = True
+        '
+        'btnAdd
+        '
+        Me.btnAdd.ContextMenuStrip = Me.cntxt
+        Me.btnAdd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAdd.Location = New System.Drawing.Point(71, 3)
+        Me.btnAdd.Name = "btnAdd"
+        Me.btnAdd.Size = New System.Drawing.Size(75, 25)
+        Me.btnAdd.TabIndex = 3
+        Me.btnAdd.Text = "Hinzufügen"
+        Me.btnAdd.UseVisualStyleBackColor = True
+        '
+        'cntxt
+        '
+        Me.cntxt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiHochladenToolStripMenuItem, Me.DateiScannenToolStripMenuItem, Me.AusZwischenablageeinfügenToolStripMenuItem})
+        Me.cntxt.Name = "cntxt"
+        Me.cntxt.Size = New System.Drawing.Size(250, 70)
+        '
+        'DateiHochladenToolStripMenuItem
+        '
+        Me.DateiHochladenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdf11
+        Me.DateiHochladenToolStripMenuItem.Name = "DateiHochladenToolStripMenuItem"
+        Me.DateiHochladenToolStripMenuItem.Size = New System.Drawing.Size(249, 22)
+        Me.DateiHochladenToolStripMenuItem.Text = "Datei hochladen..."
+        '
+        'DateiScannenToolStripMenuItem
+        '
+        Me.DateiScannenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.scanner
+        Me.DateiScannenToolStripMenuItem.Name = "DateiScannenToolStripMenuItem"
+        Me.DateiScannenToolStripMenuItem.Size = New System.Drawing.Size(249, 22)
+        Me.DateiScannenToolStripMenuItem.Text = "Datei scannen..."
+        '
+        'AusZwischenablageeinfügenToolStripMenuItem
+        '
+        Me.AusZwischenablageeinfügenToolStripMenuItem.Name = "AusZwischenablageeinfügenToolStripMenuItem"
+        Me.AusZwischenablageeinfügenToolStripMenuItem.Size = New System.Drawing.Size(249, 22)
+        Me.AusZwischenablageeinfügenToolStripMenuItem.Text = "Aus Zwischenablage (einfügen)..."
+        '
+        'btnDel
+        '
+        Me.btnDel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnDel.Location = New System.Drawing.Point(152, 3)
+        Me.btnDel.Name = "btnDel"
+        Me.btnDel.Size = New System.Drawing.Size(63, 25)
+        Me.btnDel.TabIndex = 4
+        Me.btnDel.Text = "Löschen"
+        Me.btnDel.UseVisualStyleBackColor = True
+        '
+        'pnl
+        '
+        Me.pnl.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnl.Controls.Add(Me.Button5)
+        Me.pnl.Controls.Add(Me.PdfViewer)
+        Me.pnl.Controls.Add(Me.WebBrowser)
+        Me.pnl.Location = New System.Drawing.Point(221, 198)
+        Me.pnl.Name = "pnl"
+        Me.pnl.Size = New System.Drawing.Size(846, 657)
+        Me.pnl.TabIndex = 11
+        '
+        'Button5
+        '
+        Me.Button5.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button5.Image = Global.AVISO.My.Resources.Resources.refresh
+        Me.Button5.Location = New System.Drawing.Point(793, 1)
+        Me.Button5.Name = "Button5"
+        Me.Button5.Size = New System.Drawing.Size(48, 34)
+        Me.Button5.TabIndex = 2
+        Me.Button5.UseVisualStyleBackColor = True
+        '
+        'PdfViewer
+        '
+        Me.PdfViewer.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.PdfViewer.FindTextHighLightColor = System.Drawing.Color.FromArgb(CType(CType(200, Byte), Integer), CType(CType(153, Byte), Integer), CType(CType(193, Byte), Integer), CType(CType(218, Byte), Integer))
+        Me.PdfViewer.FormFillEnabled = False
+        Me.PdfViewer.IgnoreCase = False
+        Me.PdfViewer.IsToolBarVisible = True
+        Me.PdfViewer.Location = New System.Drawing.Point(0, 0)
+        Me.PdfViewer.MultiPagesThreshold = 60
+        Me.PdfViewer.Name = "PdfViewer"
+        Me.PdfViewer.OnRenderPageExceptionEvent = Nothing
+        Me.PdfViewer.Size = New System.Drawing.Size(844, 655)
+        Me.PdfViewer.TabIndex = 0
+        Me.PdfViewer.Threshold = 60
+        Me.PdfViewer.ViewerBackgroundColor = System.Drawing.Color.FromArgb(CType(CType(229, Byte), Integer), CType(CType(229, Byte), Integer), CType(CType(229, Byte), Integer))
+        '
+        'WebBrowser
+        '
+        Me.WebBrowser.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.WebBrowser.Location = New System.Drawing.Point(0, 0)
+        Me.WebBrowser.MinimumSize = New System.Drawing.Size(20, 20)
+        Me.WebBrowser.Name = "WebBrowser"
+        Me.WebBrowser.Size = New System.Drawing.Size(844, 655)
+        Me.WebBrowser.TabIndex = 1
+        '
+        'Button3
+        '
+        Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button3.BackColor = System.Drawing.Color.Wheat
+        Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button3.Location = New System.Drawing.Point(1073, 799)
+        Me.Button3.Name = "Button3"
+        Me.Button3.Size = New System.Drawing.Size(230, 56)
+        Me.Button3.TabIndex = 12
+        Me.Button3.Text = "<<   zurück   <<"
+        Me.Button3.UseVisualStyleBackColor = False
+        '
+        'btnSndDel
+        '
+        Me.btnSndDel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnSndDel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnSndDel.Image = Global.AVISO.My.Resources.Resources.del1
+        Me.btnSndDel.Location = New System.Drawing.Point(1271, 2)
+        Me.btnSndDel.Name = "btnSndDel"
+        Me.btnSndDel.Size = New System.Drawing.Size(32, 25)
+        Me.btnSndDel.TabIndex = 2
+        Me.btnSndDel.UseVisualStyleBackColor = True
+        '
+        'btnAddSnd
+        '
+        Me.btnAddSnd.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnAddSnd.ContextMenuStrip = Me.cntxt
+        Me.btnAddSnd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAddSnd.Location = New System.Drawing.Point(1141, 2)
+        Me.btnAddSnd.Name = "btnAddSnd"
+        Me.btnAddSnd.Size = New System.Drawing.Size(58, 25)
+        Me.btnAddSnd.TabIndex = 1
+        Me.btnAddSnd.Text = "+ NEU"
+        Me.btnAddSnd.UseVisualStyleBackColor = True
+        '
+        'cboSendungen
+        '
+        Me.cboSendungen._allowedValuesFreiText = Nothing
+        Me.cboSendungen._allowFreiText = False
+        Me.cboSendungen._value = ""
+        Me.cboSendungen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.cboSendungen.DropDownWidth = 450
+        Me.cboSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboSendungen.FormattingEnabled = True
+        Me.cboSendungen.Location = New System.Drawing.Point(1073, 30)
+        Me.cboSendungen.Name = "cboSendungen"
+        Me.cboSendungen.Size = New System.Drawing.Size(230, 28)
+        Me.cboSendungen.TabIndex = 9
+        '
+        'lblSendungsdetails
+        '
+        Me.lblSendungsdetails.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblSendungsdetails.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblSendungsdetails.Location = New System.Drawing.Point(1077, 98)
+        Me.lblSendungsdetails.Name = "lblSendungsdetails"
+        Me.lblSendungsdetails.Size = New System.Drawing.Size(157, 21)
+        Me.lblSendungsdetails.TabIndex = 13
+        Me.lblSendungsdetails.Text = "-"
+        '
+        'lblWarenbeichnung
+        '
+        Me.lblWarenbeichnung.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblWarenbeichnung.Location = New System.Drawing.Point(1077, 116)
+        Me.lblWarenbeichnung.Name = "lblWarenbeichnung"
+        Me.lblWarenbeichnung.Size = New System.Drawing.Size(223, 31)
+        Me.lblWarenbeichnung.TabIndex = 14
+        Me.lblWarenbeichnung.Text = "-"
+        '
+        'btnSndEdit
+        '
+        Me.btnSndEdit.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnSndEdit.ContextMenuStrip = Me.cntxt
+        Me.btnSndEdit.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnSndEdit.Image = Global.AVISO.My.Resources.Resources.stift1
+        Me.btnSndEdit.Location = New System.Drawing.Point(1205, 3)
+        Me.btnSndEdit.Name = "btnSndEdit"
+        Me.btnSndEdit.Size = New System.Drawing.Size(29, 25)
+        Me.btnSndEdit.TabIndex = 15
+        Me.btnSndEdit.UseVisualStyleBackColor = True
+        '
+        'lblAbsender
+        '
+        Me.lblAbsender.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblAbsender.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblAbsender.Location = New System.Drawing.Point(1077, 67)
+        Me.lblAbsender.Name = "lblAbsender"
+        Me.lblAbsender.Size = New System.Drawing.Size(223, 15)
+        Me.lblAbsender.TabIndex = 16
+        Me.lblAbsender.Text = "-"
+        '
+        'lblEmpfaenger
+        '
+        Me.lblEmpfaenger.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblEmpfaenger.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblEmpfaenger.Location = New System.Drawing.Point(1077, 82)
+        Me.lblEmpfaenger.Name = "lblEmpfaenger"
+        Me.lblEmpfaenger.Size = New System.Drawing.Size(223, 17)
+        Me.lblEmpfaenger.TabIndex = 17
+        Me.lblEmpfaenger.Text = "-"
+        '
+        'Panel1
+        '
+        Me.Panel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel1.Location = New System.Drawing.Point(1073, 98)
+        Me.Panel1.Name = "Panel1"
+        Me.Panel1.Size = New System.Drawing.Size(230, 1)
+        Me.Panel1.TabIndex = 18
+        '
+        'Button17
+        '
+        Me.Button17.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.Button17.BackgroundImage = Global.AVISO.My.Resources.Resources.vermerk
+        Me.Button17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+        Me.Button17.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button17.Location = New System.Drawing.Point(1240, 2)
+        Me.Button17.Name = "Button17"
+        Me.Button17.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
+        Me.Button17.Size = New System.Drawing.Size(25, 26)
+        Me.Button17.TabIndex = 6
+        Me.Button17.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button17.UseVisualStyleBackColor = True
+        '
+        'lblRgPreis
+        '
+        Me.lblRgPreis.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lblRgPreis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblRgPreis.Location = New System.Drawing.Point(1196, 98)
+        Me.lblRgPreis.Name = "lblRgPreis"
+        Me.lblRgPreis.Size = New System.Drawing.Size(107, 21)
+        Me.lblRgPreis.TabIndex = 19
+        Me.lblRgPreis.Text = "-"
+        Me.lblRgPreis.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'UsrCntlSendungAnhangElement1
+        '
+        Me.UsrCntlSendungAnhangElement1.ACTIVE = False
+        Me.UsrCntlSendungAnhangElement1.BackColor = System.Drawing.Color.White
+        Me.UsrCntlSendungAnhangElement1.FILE_ANHID = Nothing
+        Me.UsrCntlSendungAnhangElement1.FILE_DOCID = Nothing
+        Me.UsrCntlSendungAnhangElement1.FILE_NAME = "False"
+        Me.UsrCntlSendungAnhangElement1.FILE_PAGES = Nothing
+        Me.UsrCntlSendungAnhangElement1.FILE_PATH = Nothing
+        Me.UsrCntlSendungAnhangElement1.FILE_TYPE = Nothing
+        Me.UsrCntlSendungAnhangElement1.Location = New System.Drawing.Point(3, 3)
+        Me.UsrCntlSendungAnhangElement1.Name = "UsrCntlSendungAnhangElement1"
+        Me.UsrCntlSendungAnhangElement1.Size = New System.Drawing.Size(130, 64)
+        Me.UsrCntlSendungAnhangElement1.TabIndex = 0
+        '
+        'UsrCntlSendungAnhangElement2
+        '
+        Me.UsrCntlSendungAnhangElement2.ACTIVE = False
+        Me.UsrCntlSendungAnhangElement2.BackColor = System.Drawing.Color.White
+        Me.UsrCntlSendungAnhangElement2.FILE_ANHID = Nothing
+        Me.UsrCntlSendungAnhangElement2.FILE_DOCID = Nothing
+        Me.UsrCntlSendungAnhangElement2.FILE_NAME = "False"
+        Me.UsrCntlSendungAnhangElement2.FILE_PAGES = Nothing
+        Me.UsrCntlSendungAnhangElement2.FILE_PATH = Nothing
+        Me.UsrCntlSendungAnhangElement2.FILE_TYPE = Nothing
+        Me.UsrCntlSendungAnhangElement2.Location = New System.Drawing.Point(3, 73)
+        Me.UsrCntlSendungAnhangElement2.Name = "UsrCntlSendungAnhangElement2"
+        Me.UsrCntlSendungAnhangElement2.Size = New System.Drawing.Size(130, 64)
+        Me.UsrCntlSendungAnhangElement2.TabIndex = 1
+        '
+        'frmSendungAnhangImport
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.ClientSize = New System.Drawing.Size(1309, 860)
+        Me.Controls.Add(Me.Button17)
+        Me.Controls.Add(Me.flpnlSendungen)
+        Me.Controls.Add(Me.Panel1)
+        Me.Controls.Add(Me.lblAbsender)
+        Me.Controls.Add(Me.btnSndEdit)
+        Me.Controls.Add(Me.lblWarenbeichnung)
+        Me.Controls.Add(Me.lblSendungsdetails)
+        Me.Controls.Add(Me.btnAddSnd)
+        Me.Controls.Add(Me.btnSndDel)
+        Me.Controls.Add(Me.Button3)
+        Me.Controls.Add(Me.cboSendungen)
+        Me.Controls.Add(Me.btnDel)
+        Me.Controls.Add(Me.btnAdd)
+        Me.Controls.Add(Me.pnlAnfuegen)
+        Me.Controls.Add(Me.lblImport)
+        Me.Controls.Add(Me.lblSendungen)
+        Me.Controls.Add(Me.flpnlAviso)
+        Me.Controls.Add(Me.lbl)
+        Me.Controls.Add(Me.pnl)
+        Me.Controls.Add(Me.lblEmpfaenger)
+        Me.Controls.Add(Me.lblRgPreis)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.KeyPreview = True
+        Me.Name = "frmSendungAnhangImport"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Anhang Import"
+        Me.flpnlAviso.ResumeLayout(False)
+        Me.pnlAnfuegen.ResumeLayout(False)
+        Me.pnlAnfuegen.PerformLayout()
+        Me.cntxt.ResumeLayout(False)
+        Me.pnl.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents lbl As Label
+    Friend WithEvents flpnlAviso As FlowLayoutPanel
+    Friend WithEvents flpnlSendungen As FlowLayoutPanel
+    Friend WithEvents lblSendungen As Label
+    Friend WithEvents lblImport As Label
+    Friend WithEvents pnlAnfuegen As Panel
+    Friend WithEvents lblSeiten As Label
+    Friend WithEvents btnAdd As Button
+    Friend WithEvents btnAnfuegen As Button
+    Friend WithEvents txtSeiten As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents UsrCntlSendungAnhangElement1 As usrCntlSendungAnhangElement
+    Friend WithEvents MyTextBox2 As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents lblSendung As Label
+    Friend WithEvents lblArt As Label
+    Friend WithEvents cboArt As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents txtDateiname As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents lblDatei As Label
+    Friend WithEvents UsrCntlSendungAnhangElement2 As usrCntlSendungAnhangElement
+    Friend WithEvents btnDel As Button
+    Friend WithEvents pnl As Panel
+    Friend WithEvents cbxDelPDF As CheckBox
+    Friend WithEvents cboSendungen As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents btnAnfuegenAll As Button
+    Friend WithEvents Button3 As Button
+    Friend WithEvents cntxt As ContextMenuStrip
+    Friend WithEvents DateiScannenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents DateiHochladenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents btnSndDel As Button
+    Friend WithEvents PrintDocument1 As Printing.PrintDocument
+    Friend WithEvents PdfViewer As Spire.PdfViewer.Forms.PdfViewer
+    Friend WithEvents WebBrowser As WebBrowser
+    Friend WithEvents btnAddSnd As Button
+    Friend WithEvents Button5 As Button
+    Friend WithEvents AusZwischenablageeinfügenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents btnSeitenLoeschen As Button
+    Friend WithEvents txtBezeichnung As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents lblBezeichnung As Label
+    Friend WithEvents Button1 As Button
+    Friend WithEvents lblSendungsdetails As Label
+    Friend WithEvents lblWarenbeichnung As Label
+    Friend WithEvents btnSndEdit As Button
+    Friend WithEvents lblAbsender As Label
+    Friend WithEvents lblEmpfaenger As Label
+    Friend WithEvents Panel1 As Panel
+    Friend WithEvents Button17 As Button
+    Friend WithEvents cbxAlternativePDFAnsicht As CheckBox
+    Friend WithEvents lblRgPreis As Label
+End Class

Aviso/Anhänge/frmSendungAnhangUmbenennenUmkateg.Designer.vb

@@ -0,0 +1,122 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmSendungAnhangUmbenennenUmkateg
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungAnhangUmbenennenUmkateg))
+        Me.txtBezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.cboArt = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.btnAnfuegen = New System.Windows.Forms.Button()
+        Me.SuspendLayout()
+        '
+        'txtBezeichnung
+        '
+        Me.txtBezeichnung._DateTimeOnly = False
+        Me.txtBezeichnung._numbersOnly = False
+        Me.txtBezeichnung._numbersOnlyKommastellen = ""
+        Me.txtBezeichnung._Prozent = False
+        Me.txtBezeichnung._ShortDateNew = False
+        Me.txtBezeichnung._ShortDateOnly = False
+        Me.txtBezeichnung._TimeOnly = False
+        Me.txtBezeichnung._value = ""
+        Me.txtBezeichnung._Waehrung = False
+        Me.txtBezeichnung._WaehrungZeichen = True
+        Me.txtBezeichnung.BackColor = System.Drawing.Color.White
+        Me.txtBezeichnung.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtBezeichnung.ForeColor = System.Drawing.Color.Black
+        Me.txtBezeichnung.Location = New System.Drawing.Point(77, 41)
+        Me.txtBezeichnung.MaxLineLength = -1
+        Me.txtBezeichnung.MaxLines_Warning = ""
+        Me.txtBezeichnung.MaxLines_Warning_Label = Nothing
+        Me.txtBezeichnung.Name = "txtBezeichnung"
+        Me.txtBezeichnung.Size = New System.Drawing.Size(242, 26)
+        Me.txtBezeichnung.TabIndex = 13
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(12, 49)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(63, 13)
+        Me.Label1.TabIndex = 14
+        Me.Label1.Text = "Bezeichng.:"
+        '
+        'Label5
+        '
+        Me.Label5.AutoSize = True
+        Me.Label5.Location = New System.Drawing.Point(12, 19)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(23, 13)
+        Me.Label5.TabIndex = 11
+        Me.Label5.Text = "Art:"
+        '
+        'cboArt
+        '
+        Me.cboArt._allowedValuesFreiText = Nothing
+        Me.cboArt._allowFreiText = False
+        Me.cboArt._value = ""
+        Me.cboArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboArt.FormattingEnabled = True
+        Me.cboArt.Location = New System.Drawing.Point(77, 11)
+        Me.cboArt.Name = "cboArt"
+        Me.cboArt.Size = New System.Drawing.Size(242, 28)
+        Me.cboArt.TabIndex = 12
+        '
+        'btnAnfuegen
+        '
+        Me.btnAnfuegen.BackColor = System.Drawing.Color.White
+        Me.btnAnfuegen.DialogResult = DialogResult.OK
+        Me.btnAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnAnfuegen.Location = New System.Drawing.Point(77, 73)
+        Me.btnAnfuegen.Name = "btnAnfuegen"
+        Me.btnAnfuegen.Size = New System.Drawing.Size(242, 46)
+        Me.btnAnfuegen.TabIndex = 15
+        Me.btnAnfuegen.Text = "OK"
+        Me.btnAnfuegen.UseVisualStyleBackColor = False
+        '
+        'frmSendungAnhangUmbenennenUmkateg
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.ClientSize = New System.Drawing.Size(326, 130)
+        Me.Controls.Add(Me.btnAnfuegen)
+        Me.Controls.Add(Me.txtBezeichnung)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.Label5)
+        Me.Controls.Add(Me.cboArt)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmSendungAnhangUmbenennenUmkateg"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents txtBezeichnung As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label5 As Label
+    Friend WithEvents cboArt As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents btnAnfuegen As Button
+End Class

Aviso/Anhänge/frmSendungAnhangUmbenennenUmkateg.vb

@@ -0,0 +1,59 @@
+Public Class frmSendungAnhangUmbenennenUmkateg
+    Dim nameOLD = ""
+    Dim artOLD = ""
+    Sub New(nameOLD As String, artOLD As String)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.nameOLD = nameOLD
+        Me.artOLD = artOLD
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+    Private Sub frmSendungAnhangImport_Load(sender As Object, e As EventArgs) Handles Me.Load
+
+        cboArt.Items.Clear()
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATR-EUR1", "ATR-EUR1"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Rechnung", "Rechnung"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("CMR", "CMR"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Ausfuhr", "Ausfuhr"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Vorpapier", "Vorpapier"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Packliste", "Packliste"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Auftrag", "Auftrag"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Auftrag", "Auftrag"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Dispoliste", "Dispoliste"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Vorkasse", "Vorkasse"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Überweisungsbeleg", "Überweisungsbeleg"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Vollmacht", "Vollmacht"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATB-Nr", "ATB"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATA-Nr", "ATA"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UID-Prüfung", "UID"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EORI-Prüfung", "EORI"))
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Lieferschein", "Lieferschein"))
+        If VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE = 7001 Then
+            cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - C88", "C88"))
+            cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - E2", "E2"))
+            cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - Atanak Rechnung", "Atanak_RG"))
+        End If
+        If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
+            cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EXPORT_DOCS", "EXPORT_DOCS"))
+        End If
+        cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Sonstiges", "Sonstiges"))
+        txtBezeichnung.Text = nameOLD
+        cboArt.changeItem(artOLD)
+    End Sub
+
+    Private Sub txtBezeichnung_TextChanged(sender As Object, e As EventArgs) Handles txtBezeichnung.TextChanged
+    End Sub
+
+    Private Sub txtBezeichnung_KeyDown(sender As Object, e As KeyEventArgs) Handles txtBezeichnung.KeyDown
+        If e.KeyCode = Keys.Return Then
+            btnAnfuegen.PerformClick()
+        End If
+    End Sub
+
+    Private Sub btnAnfuegen_Click(sender As Object, e As EventArgs) Handles btnAnfuegen.Click
+        If txtBezeichnung.Text = "" Then Me.DialogResult = DialogResult.None : Exit Sub
+    End Sub
+End Class

Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.Designer.vb

@@ -0,0 +1,112 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmSendungAnhang_SendenAnSnd
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungAnhang_SendenAnSnd))
+        Me.MyDatagridview1 = New System.Windows.Forms.DataGridView()
+        Me.pnl = New System.Windows.Forms.Panel()
+        Me.lbl = New System.Windows.Forms.Label()
+        Me.clmnSendungID = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        Me.clmnSendung = New System.Windows.Forms.DataGridViewTextBoxColumn()
+        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnl.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'MyDatagridview1
+        '
+        Me.MyDatagridview1.AllowUserToAddRows = False
+        Me.MyDatagridview1.AllowUserToDeleteRows = False
+        Me.MyDatagridview1.AllowUserToResizeColumns = False
+        Me.MyDatagridview1.AllowUserToResizeRows = False
+        Me.MyDatagridview1.BackgroundColor = System.Drawing.Color.White
+        Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
+        Me.MyDatagridview1.ColumnHeadersVisible = False
+        Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnSendungID, Me.clmnSendung})
+        Me.MyDatagridview1.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.MyDatagridview1.GridColor = System.Drawing.Color.White
+        Me.MyDatagridview1.Location = New System.Drawing.Point(0, 35)
+        Me.MyDatagridview1.Name = "MyDatagridview1"
+        Me.MyDatagridview1.ReadOnly = True
+        Me.MyDatagridview1.RowHeadersVisible = False
+        Me.MyDatagridview1.RowTemplate.Height = 25
+        Me.MyDatagridview1.Size = New System.Drawing.Size(471, 354)
+        Me.MyDatagridview1.TabIndex = 0
+        '
+        'pnl
+        '
+        Me.pnl.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.pnl.Controls.Add(Me.lbl)
+        Me.pnl.Dock = System.Windows.Forms.DockStyle.Top
+        Me.pnl.Location = New System.Drawing.Point(0, 0)
+        Me.pnl.Name = "pnl"
+        Me.pnl.Size = New System.Drawing.Size(471, 35)
+        Me.pnl.TabIndex = 1
+        '
+        'lbl
+        '
+        Me.lbl.AutoSize = True
+        Me.lbl.Location = New System.Drawing.Point(4, 11)
+        Me.lbl.Name = "lbl"
+        Me.lbl.Size = New System.Drawing.Size(232, 13)
+        Me.lbl.TabIndex = 0
+        Me.lbl.Text = "Anhang an Sendung verschieben (doppelklick):"
+        '
+        'clmnSendungID
+        '
+        Me.clmnSendungID.HeaderText = "ID"
+        Me.clmnSendungID.Name = "clmnSendungID"
+        Me.clmnSendungID.ReadOnly = True
+        Me.clmnSendungID.Visible = False
+        '
+        'clmnSendung
+        '
+        Me.clmnSendung.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
+        Me.clmnSendung.HeaderText = "Sendung"
+        Me.clmnSendung.Name = "clmnSendung"
+        Me.clmnSendung.ReadOnly = True
+        '
+        'frmSendungAnhang_SendenAnSnd
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.ClientSize = New System.Drawing.Size(471, 389)
+        Me.Controls.Add(Me.MyDatagridview1)
+        Me.Controls.Add(Me.pnl)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "frmSendungAnhang_SendenAnSnd"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "Anhang verschieben"
+        CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnl.ResumeLayout(False)
+        Me.pnl.PerformLayout()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents MyDatagridview1 As System.Windows.Forms.DataGridView
+    Friend WithEvents pnl As Panel
+    Friend WithEvents lbl As Label
+    Friend WithEvents clmnSendungID As DataGridViewTextBoxColumn
+    Friend WithEvents clmnSendung As DataGridViewTextBoxColumn
+End Class

Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.resx

@@ -0,0 +1,986 @@
+<?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>
+  <metadata name="clmnSendungID.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <metadata name="clmnSendung.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
+        AACRbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEd4Sx5mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB4Sx5/VClmMwBuPg5r
+        OglrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOgluPg5mMwB/VCl0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0RhhzRBVmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
+        RBV3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh18UCRmMwBqOQdnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFqOQdmMwB8UCR9USZmMwBrOQhn
+        NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwDm4N3/////////
+        ///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
+        //////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
+        //////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
+        MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
+        ///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
+        v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
+        jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
+        ///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
+        mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwCMblj///////////////////////////+M
+        blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
+        ///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
+        y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
+        4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwC3
+        p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
+        p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
+        SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
+        y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
+        MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        ///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDm4N3/////////////
+        //+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
+        //////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
+        9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
+        //////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
+        MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
+        ///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
+        //////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        //////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
+        ///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
+        ///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
+        MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
+        //////////////+3p5xmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCjjH3/
+        ///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
+        1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
+        mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
+        MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
+        fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
+        //////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
+        //////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
+        p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
+        9fRmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwDUy8X///////////////+t
+        mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
+        //////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
+        //+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
+        MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
+        ///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
+        ///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
+        MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        //////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
+        6+n///////////////+jjH1mMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwCYfWv/////
+        ///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
+        //////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
+        ///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
+        //+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
+        //////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
+        MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
+        mo1mMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwDLv7j////////////////Bs6pm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
+        //////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
+        MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
+        ///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
+        fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
+        //////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
+        ///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
+        jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAF0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
+        //////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
+        ///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
+        NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
+        USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ8UCRmMwBqOQdn
+        NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBnNAFqOQdmMwB8UCR3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh1zRBVmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
+        RBV0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
+        NAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0Rhh/VClmMwBuPg5rOglrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
+        OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOgluPg5mMwB/VCl4Sx5mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwB4Sx6RbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
+        USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEf/////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////Bs6rBs6qYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvBs6rBs6r/////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////Uy8WYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvUy8X////////////////////////////////////////B
+        s6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCjjH3Bs6rBs6r39fT/////////////////////////////////////////////////////////
+        ///Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////d1tGMblhmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvm4N3/
+        ///////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMbljLv7j/////////////////
+        ///////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X////////////////////////////d1tFmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwCMbljm4N3////////////////////////////////////////////m4N1mMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////////////////////
+        //////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////
+        ///////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////
+        ///////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////
+        ///////////////////////////////////////////////////////////////////Bs6pmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwCtmo3///////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCA
+        XUL/////////////////////////////////////////////////////////////////////////////
+        ///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT/////////////////
+        //+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////////////////////
+        //////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////////////////////////////////////////
+        //////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwDBs6r///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDBs6r////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////
+        ///////////////////////////////////////////////////////////////////////////d1tFm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6rd1tH////////39fTBs6qAXUJm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Lv7hmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////////////Uy8VmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////////////////////////
+        //////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/
+        //////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd
+        1tH////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////
+        ///////Uy8XBs6qMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////
+        ///////////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////////////////////////////+AXUJmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCtmo3///////////////////////////////////////+AXUJmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwC3p5z////////////////////////////////d1tGMblhmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////9mMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT/////////////////////
+        ///////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////
+        //////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////
+        //////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb39fT/////////////
+        //////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDBs6r////////////////////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwCYfWv///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0
+        SSb///////////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDBs6r///////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwDUy8X/////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///u6+nBs6rBs6rBs6qYfWtmMwBmMwBmMwDu6+n/////////////////////////////////////////
+        ///Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n////////////////////////////////////////u
+        6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////////////Bs6pm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCY
+        fWv////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////
+        //////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDm4N3////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////u6+m3p5xmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////m4N1mMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwDBs6r////////////////////////////////////////////d1tFmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////////u6+lmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////////////////Uy8XB
+        s6p0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
+        //////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////////////////
+        //////////////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
+        //////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////m4N3Bs6qMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDUy8X///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwCMblj///////////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwB0SSb///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwDm4N3/////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////Bs6qAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb39fT///////////////////////+jjH1m
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////////////////
+        ///////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT///////////////////+t
+        mo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////Lv7hmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/
+        ///////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
+        ///////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwDm4N3////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////////////////////Uy8VmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////////////////////////////////////90SSZm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////Uy8VmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbm4N3/////////////////////
+        ///////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////
+        //////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
+        ///////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////Bs6pmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCM
+        bljm4N3///////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCjjH3///////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDLv7j///////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwD39fT/////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////////////////////////+M
+        blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////
+        //////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////
+        //+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvBs6r/////////////////////////
+        //////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////
+        //////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwDd1tH///////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDL
+        v7j/////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////////////////////////////////////////////+Mblhm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3Bs6r/////
+        ///////////////////////////////////////////////////////////////Bs6pmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////////////////////////////////+AXUJm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////////Bs6pmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwCtmo3Bs6r39fT/////////////////////////////////////////////////////////////////
+        ///////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////
+        ///////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n/////
+        ///////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwB0SSbLv7j/////////////////////////////////////////////////
+        ///////////////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwC3p5z////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwB0SSb////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwCAXUL/////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n/////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////////
+        //////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////
+        //////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwC3p5z////////////////////////////////////39fRmMwBmMwB0SSbBs6rBs6r39fT/////////
+        //////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/
+        ///////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDBs6r///////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwDm4N3/////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////////////39fRmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////////////////////Bs6pm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3Bs6rBs6r///////////////////////////+3p5xmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT////////////////////////////39fSMblhmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////////+3p5xmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////
+        ///////////////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////
+        ///////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////
+        ///////////u6+mMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////
+        ///////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////////u6+mAXUJmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwCYfWv////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDLv7j////////////////Uy8W3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwDd1tH////////////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMbljBs6r////////d1tG3
+        p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH/////////////////////////
+        ///39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////
+        ///////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCM
+        blj///////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n/
+        //////////////////////////////////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwD39fT/////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////////////////////L
+        v7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////////////////+YfWtmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwDLv7j///////////////////////////////////////////////+jjH1m
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH/////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
+        //////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////////
+        //////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////////////39fSAXUJmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwCYfWv////////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDB
+        s6r////////////////////////////////////////////////////////Lv7hmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////u6+mMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////
+        ///////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwB0SSbUy8X/////////////////////////////////////////////////
+        ///////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////////////////////////////////////////////////+jjH1mMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////
+        ///////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbBs6r/////////////////////////
+        ///////////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwB0SSb/////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////d1tGYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
+        MwBmMwDBs6r39fT///////////////////////////////////////////////////////////+AXUJm
+        MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXULBs6rBs6rm4N3/
+        //////////////////////////////////////////////////////////////////////////////+A
+        XUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ///////////////////////////////////////////////////////////39fTBs6rBs6pmMwBmMwBm
+        MwBmMwBmMwBmMwBmMwBmMwCjjH3Bs6rUy8X/////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        //////////////////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+        AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
+</value>
+  </data>
+</root>

Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.vb

@@ -0,0 +1,39 @@
+Public Class frmSendungAnhang_SendenAnSnd
+    Public SendungsId = -1
+    Dim SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen)
+    Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
+
+    Sub New(SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen))
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+        Me.SENDUNG_LIST = SENDUNG_LIST
+    End Sub
+
+    Private Sub frmSendungAnhang_SendenAnSnd_Load(sender As Object, e As EventArgs) Handles Me.Load
+        Dim cnt = 1
+        For Each S In SENDUNG_LIST
+            Dim abfertigungsArt = SQL.getValueTxtBySql("SELECT isnull([Abfertigungsbezeichnung],'') FROM [Abfertigungsarten] WHERE Abfertigungsart='" & S.tblSnd_Abfertigungsart_ID & "'", "FMZOLL")
+            Dim empfTmp = ""
+            If S.tblSnd_Empfaenger IsNot Nothing Then
+                empfTmp = If(S.tblSnd_Empfaenger.Length > 15, S.tblSnd_Empfaenger.Substring(0, 15), S.tblSnd_Empfaenger)
+            End If
+
+            MyDatagridview1.Rows.Add({S.tblSnd_SendungID, (cnt & ". " & empfTmp & " (" & abfertigungsArt & ")")})
+            cnt += 1
+        Next
+        MyDatagridview1.ClearSelection()
+    End Sub
+
+    Private Sub MyDatagridview1_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles MyDatagridview1.CellDoubleClick, MyDatagridview1.CellContentDoubleClick
+        If e.RowIndex >= 0 Then
+            SendungsId = MyDatagridview1.Rows(e.RowIndex).Cells(0).Value
+            Me.DialogResult = DialogResult.OK
+            Me.Close()
+        Else
+            Me.DialogResult = DialogResult.None
+        End If
+    End Sub
+End Class

Aviso/Anhänge/usrCntlSendungAnhangElement.Designer.vb

@@ -0,0 +1,117 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class usrCntlSendungAnhangElement
+    Inherits System.Windows.Forms.UserControl
+
+    'UserControl ü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()
+        Me.pic = New System.Windows.Forms.PictureBox()
+        Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components)
+        Me.UmbenennenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.LöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.lbl = New System.Windows.Forms.Label()
+        Me.AnhängeVerschiebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.PDFsZusammenführenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.cntxt.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'pic
+        '
+        Me.pic.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.pic.BackgroundImage = Global.AVISO.My.Resources.Resources.docAllgemein
+        Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.pic.ContextMenuStrip = Me.cntxt
+        Me.pic.Location = New System.Drawing.Point(3, 0)
+        Me.pic.Name = "pic"
+        Me.pic.Size = New System.Drawing.Size(32, 27)
+        Me.pic.TabIndex = 0
+        Me.pic.TabStop = False
+        '
+        'cntxt
+        '
+        Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UmbenennenToolStripMenuItem, Me.LöschenToolStripMenuItem, Me.AnhängeVerschiebenToolStripMenuItem, Me.PDFsZusammenführenToolStripMenuItem})
+        Me.cntxt.Name = "cntxt"
+        Me.cntxt.Size = New System.Drawing.Size(206, 114)
+        '
+        'UmbenennenToolStripMenuItem
+        '
+        Me.UmbenennenToolStripMenuItem.Name = "UmbenennenToolStripMenuItem"
+        Me.UmbenennenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.UmbenennenToolStripMenuItem.Text = "Umbenennen"
+        '
+        'LöschenToolStripMenuItem
+        '
+        Me.LöschenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.del
+        Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem"
+        Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.LöschenToolStripMenuItem.Text = "Löschen"
+        '
+        'lbl
+        '
+        Me.lbl.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.lbl.ContextMenuStrip = Me.cntxt
+        Me.lbl.Location = New System.Drawing.Point(36, 0)
+        Me.lbl.Name = "lbl"
+        Me.lbl.Size = New System.Drawing.Size(140, 27)
+        Me.lbl.TabIndex = 1
+        Me.lbl.Text = "NAME"
+        Me.lbl.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'AnhängeVerschiebenToolStripMenuItem
+        '
+        Me.AnhängeVerschiebenToolStripMenuItem.Name = "AnhängeVerschiebenToolStripMenuItem"
+        Me.AnhängeVerschiebenToolStripMenuItem.Size = New System.Drawing.Size(197, 22)
+        Me.AnhängeVerschiebenToolStripMenuItem.Text = "Anhänge verschieben..."
+        '
+        'PDFsZusammenführenToolStripMenuItem
+        '
+        Me.PDFsZusammenführenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdf11
+        Me.PDFsZusammenführenToolStripMenuItem.Name = "PDFsZusammenführenToolStripMenuItem"
+        Me.PDFsZusammenführenToolStripMenuItem.Size = New System.Drawing.Size(205, 22)
+        Me.PDFsZusammenführenToolStripMenuItem.Text = "PDFs zusammenführen..."
+        '
+        'usrCntlSendungAnhangElement
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.BackColor = System.Drawing.Color.White
+        Me.ContextMenuStrip = Me.cntxt
+        Me.Controls.Add(Me.lbl)
+        Me.Controls.Add(Me.pic)
+        Me.Name = "usrCntlSendungAnhangElement"
+        Me.Size = New System.Drawing.Size(180, 28)
+        CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.cntxt.ResumeLayout(False)
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents pic As PictureBox
+    Friend WithEvents lbl As Label
+    Friend WithEvents cntxt As ContextMenuStrip
+    Friend WithEvents UmbenennenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents LöschenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents AnhängeVerschiebenToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents PDFsZusammenführenToolStripMenuItem As ToolStripMenuItem
+End Class

Aviso/Anhänge/usrCntlSendungAnhangElement.resx

@@ -0,0 +1,123 @@
+<?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>
+  <metadata name="cntxt.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
+</root>

Aviso/Anhänge/usrCntlSendungAnhangElement.vb

@@ -0,0 +1,168 @@
+Imports System.ComponentModel
+
+Public Class usrCntlSendungAnhangElement
+    ' Implements INotifyPropertyChanged
+
+
+
+    ' Property FILE_NAME = ""
+    Property FILE_PATH
+    'Property FILE_TYPE
+
+    Property FILE_PAGES
+    Property FILE_DOCID
+    Property FILE_ANHID
+
+
+    Public Event ME_CLICK(STRG_PRESSED)
+    Public Event ME_DELETE(FILE_DOCID, FILE_ANHID)
+
+
+    'Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
+
+    'Private Sub NotifyPropertyChanged(ByVal info As String)
+    '    RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(info))
+    'End Sub
+
+    Private ACTIVE_Value As Boolean = False
+    Public Property ACTIVE As Boolean
+        Get
+            Return Me.ACTIVE_Value
+        End Get
+
+        Set(ByVal value As Boolean)
+            If Not (value = ACTIVE) Then
+                Me.ACTIVE_Value = value
+                ' NotifyPropertyChanged("ACTIVE")
+            End If
+
+            If value Then
+                Me.BackColor = Color.FromArgb(0, 54, 128)
+                Me.lbl.ForeColor = Color.White
+            Else
+                Me.BackColor = Color.White
+                Me.lbl.ForeColor = Color.Black
+            End If
+        End Set
+    End Property
+
+
+    Private FILE_NAME_Value As String = False
+    Public Property FILE_NAME As String
+        Get
+            Return Me.FILE_NAME_Value
+        End Get
+
+        Set(ByVal value As String)
+            If Not (value = FILE_NAME) Then
+                Me.FILE_NAME_Value = value
+                Me.lbl.Text = value
+                ' NotifyPropertyChanged("FILE_NAME")
+            End If
+        End Set
+    End Property
+
+
+
+    Private FILE_TYPE_Value As String = False
+    Public Property FILE_TYPE As String
+        Get
+            Return Me.FILE_TYPE_Value
+        End Get
+
+        Set(ByVal value As String)
+            If Not (value = FILE_TYPE) Then
+                Me.FILE_TYPE_Value = value
+
+                Select Case value
+                    Case "PDF" : pic.BackgroundImage = My.Resources.pdf
+                    Case "EXCEL" : pic.BackgroundImage = My.Resources.Excel_2013_logo_155x110
+                    Case "WORD" : pic.BackgroundImage = My.Resources.word
+                    Case "BILD" : pic.BackgroundImage = My.Resources.ImageIcon
+                    Case "TEXT" : pic.BackgroundImage = My.Resources.android_note
+                    Case Else : pic.BackgroundImage = My.Resources.docAllgemein
+                End Select
+                ' NotifyPropertyChanged("FILE_TYPE")
+            End If
+        End Set
+
+    End Property
+    'Private Sub pic_Click(sender As Object, e As EventArgs) Handles pic.Click, lbl.Click, Me.Click
+    '    RaiseEvent ME_CLICK(My.Computer.Keyboard.CtrlKeyDown)
+    'End Sub
+    Private Sub pic_Click(sender As Object, e As MouseEventArgs) Handles pic.MouseClick, lbl.MouseClick, Me.MouseClick
+        If e.Button = MouseButtons.Left Then
+            RaiseEvent ME_CLICK((My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
+        End If
+    End Sub
+    Public Sub CLICK_Me()
+        RaiseEvent ME_CLICK(False) 'My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
+    End Sub
+
+    Private Sub pic_doubleClick(sender As Object, e As EventArgs) Handles pic.DoubleClick, lbl.DoubleClick, Me.DoubleClick
+        If IO.File.Exists(Me.FILE_PATH) Then
+            Process.Start(Me.FILE_PATH) 'damit Orginial bearbeitet werden kann
+        End If
+        Exit Sub
+
+        'Dim p = New System.Diagnostics.Process()
+        'p.StartInfo.FileName = Me.FILE_PATH
+        '' p.StartInfo.Arguments = "/c echo Foo && echo Bar"
+        'p.StartInfo.RedirectStandardOutput = False
+        'p.StartInfo.UseShellExecute = False
+        'p.StartInfo.CreateNoWindow = True
+        'p.Start()
+
+        Exit Sub
+
+        Dim ds As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(FILE_DOCID)
+        If ds IsNot Nothing Then
+            ds.OPEN_SINGLE()
+        End If
+
+    End Sub
+
+    Private Sub UmbenennenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UmbenennenToolStripMenuItem.Click
+        Try
+
+            Dim ANH As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(FILE_ANHID)
+            Dim f As New frmSendungAnhangUmbenennenUmkateg(FILE_NAME, ANH.anh_Art)
+            If f.ShowDialog = DialogResult.OK Then
+
+                ANH.anh_Name = f.txtBezeichnung.Text
+                ANH.anh_Art = f.cboArt._value
+                ANH.SAVE()
+                FILE_NAME = f.txtBezeichnung.Text
+
+            End If
+        Catch ex As Exception
+            MsgBox(ex.Message)
+        End Try
+    End Sub
+
+    Private Sub LöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LöschenToolStripMenuItem.Click
+        RaiseEvent ME_DELETE(FILE_DOCID, FILE_ANHID)
+    End Sub
+
+    Private Sub cntxt_Opening(sender As Object, e As CancelEventArgs) Handles cntxt.Opening
+        If Not Me.ACTIVE Then  CLICK_Me()
+    End Sub
+
+    Private Sub AnhängeVerschiebenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AnhängeVerschiebenToolStripMenuItem.Click
+        Try
+            Dim f As frmSendungAnhangImport = Me.FindForm
+            f.AnhangVerschieben_Markierte(Me)
+        Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+        End Try
+    End Sub
+
+    Private Sub PDFsZusammenführenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PDFsZusammenführenToolStripMenuItem.Click
+        Try
+            Dim f As frmSendungAnhangImport = Me.FindForm
+            f.PDFszusammenfuehren_Markierte(Me)
+        Catch ex As Exception
+            MsgBox(ex.Message & ex.StackTrace)
+        End Try
+    End Sub
+End Class

Aviso/App.config

@@ -9,7 +9,7 @@
         <add name="AVISO.My.MySettings.AVISO_ConnectionString_TEST" connectionString="Data Source=192.168.0.90\DEVSQL;Initial Catalog=AVISO_new;Integrated Security=false;User ID=sa;Password=BmWr501956;" providerName="System.Data.SqlClient" />
     </connectionStrings>
     <startup>
-        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5" />
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7" />
     </startup>
      
     <userSettings>
@@ -45,6 +45,28 @@
         <assemblyIdentity name="WindowsBase" publicKeyToken="31bf3856ad364e35" culture="neutral" />
         <bindingRedirect oldVersion="0.0.0.0-4.0.0.0" newVersion="4.0.0.0" />
       </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-10.0.0.0" newVersion="10.0.0.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="Aspose.PDF" publicKeyToken="716fcc553a201e56" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-19.3.0.0" newVersion="19.3.0.0" />
+        <publisherPolicy apply="no" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="Aspose.Imaging" publicKeyToken="716fcc553a201e56" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-19.4.0.0" newVersion="19.4.0.0" />
+        <publisherPolicy apply="no" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="BouncyCastle.Crypto" publicKeyToken="0e99375e54769942" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-1.8.2.0" newVersion="1.8.2.0" />
+      </dependentAssembly>
+      <dependentAssembly>
+        <assemblyIdentity name="DocumentFormat.OpenXml" publicKeyToken="8fb06cb64d019a17" culture="neutral" />
+        <bindingRedirect oldVersion="0.0.0.0-2.16.0.0" newVersion="2.16.0.0" />
+      </dependentAssembly>
     </assemblyBinding>
   </runtime>
 </configuration>

Aviso/ApplicationEvents.vb

@@ -0,0 +1,10 @@
+Namespace My
+    ' Für MyApplication sind folgende Ereignisse verfügbar:
+    ' Startup: Wird beim Starten der Anwendung noch vor dem Erstellen des Startformulars ausgelöst.
+    ' Shutdown: Wird nach dem Schließen aller Anwendungsformulare ausgelöst.  Dieses Ereignis wird nicht ausgelöst, wenn die Anwendung mit einem Fehler beendet wird.
+    ' UnhandledException: Wird bei einem Ausnahmefehler ausgelöst.
+    ' StartupNextInstance: Wird beim Starten einer Einzelinstanzanwendung ausgelöst, wenn die Anwendung bereits aktiv ist. 
+    ' NetworkAvailabilityChanged: Wird beim Herstellen oder Trennen der Netzwerkverbindung ausgelöst.
+    Partial Friend Class MyApplication
+    End Class
+End Namespace

Aviso/Auswertung/frmAuswertung.Designer.vb

@@ -28,6 +28,7 @@ Partial Class frmAuswertung
         Me.PictureBox1 = New System.Windows.Forms.PictureBox()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.pnlOptions = New System.Windows.Forms.Panel()
+        Me.Button5 = New System.Windows.Forms.Button()
         Me.Panel1 = New System.Windows.Forms.Panel()
         Me.Button4 = New System.Windows.Forms.Button()
         Me.Button3 = New System.Windows.Forms.Button()
@@ -61,6 +62,7 @@ Partial Class frmAuswertung
         Me.Button10.TabIndex = 9
         Me.Button10.Text = "E-Mails in Fmzoll laden"
         Me.Button10.UseVisualStyleBackColor = True
+        Me.Button10.Visible = False
         '
         'PictureBox1
         '
@@ -85,6 +87,7 @@ Partial Class frmAuswertung
         'pnlOptions
         '
         Me.pnlOptions.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.pnlOptions.Controls.Add(Me.Button5)
         Me.pnlOptions.Controls.Add(Me.Panel1)
         Me.pnlOptions.Controls.Add(Me.Button3)
         Me.pnlOptions.Controls.Add(Me.Button2)
@@ -95,6 +98,18 @@ Partial Class frmAuswertung
         Me.pnlOptions.Size = New System.Drawing.Size(144, 552)
         Me.pnlOptions.TabIndex = 1
         '
+        'Button5
+        '
+        Me.Button5.Enabled = False
+        Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button5.ForeColor = System.Drawing.Color.White
+        Me.Button5.Location = New System.Drawing.Point(7, 180)
+        Me.Button5.Name = "Button5"
+        Me.Button5.Size = New System.Drawing.Size(131, 51)
+        Me.Button5.TabIndex = 3
+        Me.Button5.Text = "VERIMEX"
+        Me.Button5.UseVisualStyleBackColor = True
+        '
         'Panel1
         '
         Me.Panel1.Controls.Add(Me.Button4)
@@ -117,6 +132,7 @@ Partial Class frmAuswertung
         '
         'Button3
         '
+        Me.Button3.Enabled = False
         Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.Button3.ForeColor = System.Drawing.Color.White
         Me.Button3.Location = New System.Drawing.Point(7, 123)
@@ -128,6 +144,7 @@ Partial Class frmAuswertung
         '
         'Button2
         '
+        Me.Button2.Enabled = False
         Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.Button2.ForeColor = System.Drawing.Color.White
         Me.Button2.Location = New System.Drawing.Point(7, 66)
@@ -139,6 +156,7 @@ Partial Class frmAuswertung
         '
         'Button1
         '
+        Me.Button1.Enabled = False
         Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.Button1.ForeColor = System.Drawing.Color.White
         Me.Button1.Location = New System.Drawing.Point(7, 9)
@@ -188,4 +206,5 @@ Partial Class frmAuswertung
     Friend WithEvents Panel1 As System.Windows.Forms.Panel
     Friend WithEvents Button4 As System.Windows.Forms.Button
     Friend WithEvents Button10 As System.Windows.Forms.Button
+    Friend WithEvents Button5 As Button
 End Class

Aviso/Auswertung/frmAuswertung.vb

@@ -8,9 +8,18 @@ Public Class frmAuswertung
 
     Private Sub frmAuswertung_Load(sender As Object, e As EventArgs) Handles Me.Load
         clrPnlMain()
+
+
+
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Gesamt", Me) Then
+            Button2.Enabled = True
             Dim usrCntl As New usrctlAuswertung
             usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
             pnlMain.Controls.Add(usrCntl)
+        End If
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Kunden", Me) Then Button1.Enabled = True
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Mitarbeiter", Me) Then Button3.Enabled = True
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_VERIMEX", Me) Then Button5.Enabled = True
 
     End Sub
 
@@ -28,17 +37,21 @@ Public Class frmAuswertung
     End Sub
 
     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Gesamt", Me) Then
             clrPnlMain()
             Dim usrCntl As New usrctStatistik
             usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
             pnlMain.Controls.Add(usrCntl)
+        End If
     End Sub
 
     Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_Mitarbeiter", Me) Then
             clrPnlMain()
             Dim usrCntl As New usrctlMAUebersicht
         usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
             pnlMain.Controls.Add(usrCntl)
+        End If
     End Sub
 
 
@@ -555,7 +568,7 @@ Public Class frmAuswertung
             Exit Sub
         End If
 
-        If result = System.Windows.Forms.DialogResult.OK Then
+        If result = DialogResult.OK Then
 
 
             Me.Cursor = Cursors.WaitCursor
@@ -631,8 +644,8 @@ Public Class frmAuswertung
                     While dr.Read
 
                         Dim kdnr = dr.Item("KundenNr").ToString
-                        Dim LIST_EMAILS = New SDL.cEmailBenachrichtigungList(kdnr, 1)
+                        Dim LIST_EMAILS = New VERAG_PROG_ALLGEMEIN.cEmailBenachrichtigungList(kdnr, 1)
-                        Dim LIST_EMAILS2 = New SDL.cEmailBenachrichtigungList(kdnr, 2)
+                        Dim LIST_EMAILS2 = New VERAG_PROG_ALLGEMEIN.cEmailBenachrichtigungList(kdnr, 2)
 
                         Dim eMail = (dr.Item("eMail")).ToString.Replace(" ", "")
                         Dim eMail2 = (dr.Item("eMail2")).ToString.Replace(" ", "")
@@ -677,6 +690,15 @@ Public Class frmAuswertung
         admin.doSQL("delete FROM [tblEmailBenachrichtigung] WHERE [eb_EMail] = '' ", "FMZOLL")
 
     End Sub
+
+    Private Sub Button5_Click_1(sender As Object, e As EventArgs) Handles Button5.Click
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Statistik_VERIMEX", Me) Then
+            clrPnlMain()
+            Dim usrCntl As New usrctlStatVERIMEX
+            usrCntl.Dock = System.Windows.Forms.DockStyle.Fill
+            pnlMain.Controls.Add(usrCntl)
+        End If
+    End Sub
 End Class
 
 Public Class listMAZusammenf

Aviso/Auswertung/frmStatFrima.vb

@@ -146,6 +146,13 @@ Public Class frmStatFrima
 
    
     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        If DataGridView1.SelectedRows.Count > 0 Then
+            Dim frmLKWBericht As New frmLKWBericht(DataGridView1.SelectedRows(0).Cells("AvisoID").Value)
+            frmLKWBericht.ShowDialog(Me)
+
+        End If
+        Exit Sub
+
         Dim str As String = ""
         For Each r As DataGridViewRow In DataGridView1.Rows()
             If r.Selected Then