An Haufen Zeug

This commit is contained in:
ms
2019-08-07 10:45:49 +02:00
parent f2d5c20559
commit d67e84486a
35 changed files with 4382 additions and 658 deletions

View File

@@ -20,7 +20,7 @@ Public Class NWEdit
Private Sub NetzwerkBearbeiten_Load(sender As Object, e As EventArgs) Handles MyBase.Load
dbload()
LblInfo.Text = ""
If Main.Debug = True Then
If Class1.DebugMode = True Then
PanDebug.Visible = True
End If
If Class1.Absender = "Main" Then

View File

@@ -11,6 +11,13 @@ Public Class Class1
'Public Shared FilePath As String = "\\192.168.0.253\backup\temp_Sebastian\Spielwiese\Doku"
Public Shared FilePath As String ' = "\\192.168.0.90\f\EDV-Wartung\Dokumentation"
Public Shared Absender As String = "Absender Standard"
'Public Shared sAppPath As String = Application.StartupPath
Public Shared Standorte As New List(Of String)
Public Shared AlleStandorte As New List(Of String)
Public Shared LoggedOnUser As New cBenutzer
Public Shared LoggedOnUserRights As New List(Of cBerechtigungen)
Public Shared DebugMode As Boolean = False
Public Shared GroupUsers As List(Of cBenutzer)
Public Shared Sub EnableDoubleBuffered(ByVal dgv As DataGridView)
Dim dgvType As Type = dgv.[GetType]()
@@ -19,6 +26,30 @@ Public Class Class1
pi.SetValue(dgv, True, Nothing)
End Sub
Public Shared Function CheckDebug()
Dim Startparameter As String = ""
Dim i As Integer
For Each s As String In Environment.GetCommandLineArgs
If i > 0 Then
If s = "/d" Or s = "-d" Then
Startparameter = "debug"
Else
End If
End If
i += 1
Next
If Main.sAppPath Like "*\bin\Debug" Or Startparameter = "debug" Then
DebugMode = True
Class1.DBConString = "Server=DEVELOPER\DEVSQL;Initial Catalog=Doku;User ID=sa;Password=BmWr501956;Connection Timeout=5;"
Class1.FilePath = "\\192.168.0.253\backup\temp_Sebastian\DokuTest"
Else
Class1.DBConString = "Server=192.168.0.94\SQLEXPRESS;Initial Catalog=Doku;User ID=sa;Password=BmWr501956;Connection Timeout=5;"
Class1.FilePath = "\\192.168.0.90\f\EDV-Wartung\Dokumentation"
End If
End Function
Public Shared Function SQLnQ(command As String)

View File

@@ -58,7 +58,7 @@ Public Class SQLVariable
Private prim As Boolean
Public Sub New(ByVal btext As String, ByVal bvalue As String, Optional bprim As Boolean = False)
Me.value = bvalue
Me.Value = bvalue
Me.Text = btext
End Sub

View File

@@ -0,0 +1,162 @@
Imports System.Reflection
Public Class cBenutzer
Property Name As String = ""
Property userPrincipalName As String = ""
Property Domäne As String = ""
Property BenutzeranmeldeName As String = ""
Property Nachname As String = ""
Property Vorname As String = ""
Property Mail As String = ""
Property distinguishedName As String = ""
Property cn As String = ""
Property msDSPrincipalName As String = ""
Property localdistinguishedName As String = ""
Function FillWithLoggedOnUser(Optional ByVal dcabfrage As Boolean = False)
Try
userPrincipalName = System.DirectoryServices.AccountManagement.UserPrincipal.Current.UserPrincipalName
Name = System.DirectoryServices.AccountManagement.UserPrincipal.Current.Name
Catch
End Try
Domäne = System.DirectoryServices.ActiveDirectory.Domain.GetCurrentDomain.ToString
BenutzeranmeldeName = Environment.UserDomainName & "\" & Environment.UserName
If dcabfrage = True Then
FillFromDC(userPrincipalName, "userPrincipalName")
End If
End Function
Function FillFromDC(ByVal searchname As String, Optional ByVal searchfilter As String = "distinguishedName", Optional ByVal LDAP As String = "LDAP://DC=VERAG,DC=OST,DC=DMN")
Try
localdistinguishedName = searchname
Me.Domäne = "verag.ost.dmn"
If searchname.Contains("ForeignSecurityPrincipals") Then
Dim FSlocDirectoryEntry As New DirectoryServices.DirectoryEntry(LDAP)
Dim FSsearcher As New DirectoryServices.DirectorySearcher
With FSsearcher
.SearchRoot = FSlocDirectoryEntry
.Filter = searchfilter & "=" & searchname
.PropertiesToLoad.Add("msDS-PrincipalName")
End With
Dim FSResult As DirectoryServices.SearchResult = FSsearcher.FindOne
searchname = blablabla(FSResult, "msDS-PrincipalName")
Dim DomainName As String = searchname.Substring(0, searchname.IndexOf("\"))
' MsgBox(DomainName)
Select Case DomainName
Case "IMEX"
Me.Domäne = "imex.local"
LDAP = "LDAP://DC=IMEX,DC=LOCAL"
'MsgBox("Me.Domäne = imex.local")
Case "VERAGNEUHAUS"
Me.Domäne = "VERAGNEUHAUS.local"
LDAP = "LDAP://DC=VERAGNEUHAUS,DC=LOCAL"
End Select
searchname = searchname.Substring((searchname.IndexOf("\") + 1), searchname.Length - searchname.IndexOf("\") - 1)
searchfilter = "sAMAccountName"
End If
Dim locDirectoryEntry As New DirectoryServices.DirectoryEntry(LDAP)
' Dim Searcher1 As New DirectoryServices.DirectorySearcher(locDirectoryEntry, searchfilter & "=" & searchname)
Dim searcher As New DirectoryServices.DirectorySearcher
With searcher
.SearchRoot = locDirectoryEntry
.Filter = searchfilter & "=" & searchname
' .ExtendedDN = True
.PropertiesToLoad.Add("sn")
.PropertiesToLoad.Add("givenName")
.PropertiesToLoad.Add("mail")
.PropertiesToLoad.Add("distinguishedName")
.PropertiesToLoad.Add("cn")
.PropertiesToLoad.Add("distinguishedName")
.PropertiesToLoad.Add("msDS-PrincipalName")
.PropertiesToLoad.Add("userPrincipalName")
End With
Dim Result As DirectoryServices.SearchResult = Searcher.FindOne
Me.Nachname = blablabla(Result, "sn")
Me.Vorname = blablabla(Result, "givenName")
Me.Mail = blablabla(Result, "mail")
Me.distinguishedName = blablabla(Result, "distinguishedName")
Me.cn = blablabla(Result, "cn")
Me.Name = blablabla(Result, "cn")
Me.BenutzeranmeldeName = blablabla(Result, "msDS-PrincipalName")
Me.msDSPrincipalName = blablabla(Result, "msDS-PrincipalName")
Me.userPrincipalName = blablabla(Result, "userPrincipalName")
Catch ex As Exception
MsgBox("FillFromDC: " & ex.Message)
End Try
End Function
Function isDokuAdmin() As Boolean
Dim ds As New DataSet
SQL.SQL2DS("select * from TbL_Berechtigungen where Benutzeranmeldename = '" & Me.BenutzeranmeldeName & "' AND Standort = 'DokuAdmin'", ds)
If ds.Tables(0).Rows.Count > 0 Then
Return True
Else
Return False
End If
End Function
Function blablabla(result As DirectoryServices.SearchResult, Prop As String) As String
If result.Properties(Prop).Count = 0 Then
Return ""
Else
Return result.Properties(Prop)(0)
End If
End Function
Function emptyreturn(ByVal ding As String)
If ding Is Nothing Then
Return ""
Else
Return ding
End If
End Function
End Class
Public Class cBenutzergruppe
Public Shared Function GetUsersInGroup(ByVal groupname As String, Optional ByVal LDAP As String = "LDAP://DC=VERAG,DC=OST,DC=DMN") As List(Of String)
Dim Userlist As New List(Of String)
Dim locDirectoryEntry As New DirectoryServices.DirectoryEntry(LDAP)
Dim Searcher As New DirectoryServices.DirectorySearcher(locDirectoryEntry, "sAMAccountName=" & groupname)
Dim Result As DirectoryServices.SearchResult = Searcher.FindOne
If Result IsNot Nothing Then
For Each User In Result.Properties("Member")
Userlist.Add(User)
Next
End If
Return Userlist
End Function
End Class
Public Class cSharedClasses
Public Shared LoggedOnUser As New cBenutzer
End Class

View File

@@ -0,0 +1,124 @@
Imports System.Reflection
Public Class cBerechtigungen
Property Benutzeranmeldename As String = ""
Property Standort As String = ""
Property Zugriff As String = ""
Property MeExist As Boolean = False
Property ID As String = ""
Property StandardZugriff = "0"
Function getparameterlist() As List(Of SQLVariable)
Dim list As New List(Of SQLVariable)
list.Add(New SQLVariable("Benutzeranmeldename", Benutzeranmeldename))
list.Add(New SQLVariable("Standort", Standort))
list.Add(New SQLVariable("Zugriff", Zugriff))
list.Add(New SQLVariable("ID", ID))
Return list
End Function
Public Function getFromSQL() '(ip As String)
Dim ds As New DataSet
Dim test As String = ""
SQL.SQL2DS("SELECT * FROM TbL_Berechtigungen WHERE BENUTZERANMELDENAME = '" & Benutzeranmeldename & "' AND Standort = '" & Standort & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
For Each c As DataColumn In ds.Tables(0).Columns
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(c.ColumnName)
If propInfo IsNot Nothing Then
If Not IsDBNull(c.Table.Rows(0).Item(c)) Then
propInfo.SetValue(Me, c.Table.Rows(0).Item(c))
End If
End If
Next
Else
Me.Zugriff = StandardZugriff
End If
' MsgBox("hier")
End Function
Function checkExist() '(ByVal ip As String)
Dim ds As New DataSet
SQL.SQL2DS("SELECT * FROM TbL_Berechtigungen WHERE BENUTZERANMELDENAME = '" & Benutzeranmeldename & "' AND Standort = '" & Standort & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
MeExist = True
Return True
Else
MeExist = False
Return False
End If
End Function
Function SaveToSQL()
checkExist()
If MeExist = True Then
Dim update As String = ""
Dim where As String = ""
Dim list As List(Of SQLVariable) = getparameterlist()
For Each i In list ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''dieser Host
If Not i.SQLText = "ID" Then
update &= "[" & i.SQLText & "]='" & i.SQLValue & "',"
Else
where &= "ID = '" & i.SQLValue & "'"
End If
Next
update = update.Substring(0, update.Length - 1)
SQL.UpdateSQL("TbL_Berechtigungen", update, where)
Else
Me.ID = Guid.NewGuid().ToString("N")
Dim Spalten As String = ""
Dim Werte As String = ""
Dim InsertString As String = ""
Dim List As List(Of SQLVariable) = getparameterlist()
For Each i In List
' If Not i.SQLText = "Erstelldatum" Then
Spalten &= i.SQLText & ","
Werte &= "'" & i.SQLValue & "',"
' End If
Next
Spalten = Spalten.Substring(0, Spalten.Length - 1)
Werte = Werte.Substring(0, Werte.Length - 1)
SQL.InsertSQL("TbL_Berechtigungen", "(" & Spalten & ") VALUES (" & Werte & ")")
MeExist = True
End If
End Function
Public Shared Function ReadAll(ByVal Benutzeranmeldename As String) As List(Of cBerechtigungen)
Try
Dim ToR As New List(Of cBerechtigungen) ' ToR -> Table of Rights *Badum Tss*
Dim ds As New DataSet
SQL.SQL2DS("SELECT * FROM TbL_Berechtigungen WHERE BENUTZERANMELDENAME = '" & Benutzeranmeldename & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
For Each row As DataRow In ds.Tables(0).Rows
Dim R As New cBerechtigungen
R.Benutzeranmeldename = Benutzeranmeldename
R.Standort = row.Item("Standort").ToString
R.Zugriff = row.Item("Zugriff").ToString
R.ID = row.Item("ID").ToString
ToR.Add(R)
Next
End If
Return ToR
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Function
Public Shared Function BenutzerBerechtigungfuerStandort(ByVal Benutzer As String, ByVal Standort As String)
Dim ds As New DataSet
SQL.SQL2DS("SELECT ZUGRIFF FROM TbL_Berechtigungen WHERE BENUTZERANMELDENAME = '" & Benutzer & "' AND Standort = '" & Standort & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
Return ds.Tables(0).Rows(0).Item(0).ToString
Else
MsgBox("Keine Berechtigung gefunden")
Return "0"
End If
End Function
End Class

View File

@@ -0,0 +1,121 @@
Imports System.Reflection
Public Class cEintrag
Property rubrik As String = ""
Property Titel As String = ""
Property Info As String = ""
Property Link As String = ""
Property Benutzer As String = ""
Property Passwort As String = ""
Property Linked As Boolean = False
Property LinkedWith As String = ""
Property ID As String = ""
Property NewID As Boolean = False
Function getparameterlist() As List(Of SQLVariable)
Dim list As New List(Of SQLVariable)
list.Add(New SQLVariable("rubrik", rubrik))
list.Add(New SQLVariable("Titel", Titel))
list.Add(New SQLVariable("Info", Info))
list.Add(New SQLVariable("Link", Link))
list.Add(New SQLVariable("Benutzer", Benutzer))
list.Add(New SQLVariable("Passwort", Passwort))
list.Add(New SQLVariable("Linked", Linked))
list.Add(New SQLVariable("LinkedWith", LinkedWith))
list.Add(New SQLVariable("ID", ID))
Return list
End Function
Public Function getFromSQL() '(ip As String)
Dim ds As New DataSet
Dim test As String = ""
SQL.SQL2DS("SELECT * FROM TbL_Allgemein WHERE ID = '" & Me.ID & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
For Each c As DataColumn In ds.Tables(0).Columns
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(c.ColumnName)
If propInfo IsNot Nothing Then
If Not IsDBNull(c.Table.Rows(0).Item(c)) Then
propInfo.SetValue(Me, c.Table.Rows(0).Item(c))
End If
End If
Next
Else
ds.Clear()
SQL.SQL2DS("SELECT * FROM TbL_Allgemein WHERE Rubrik = '" & rubrik & "' AND Titel = '" & Titel & "'", ds)
For Each c As DataColumn In ds.Tables(0).Columns
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(c.ColumnName)
If propInfo IsNot Nothing Then
If Not IsDBNull(c.Table.Rows(0).Item(c)) Then
propInfo.SetValue(Me, c.Table.Rows(0).Item(c))
End If
End If
Next
Me.ID = Guid.NewGuid().ToString("N") : NewID = True
End If
' MsgBox("hier")
End Function
Public Function Save()
If checkExist() = False Then '----------------------------------------neuer Eintrag
'' (Spalten, Spalten, ...) VALUES (Werte, Werte, ...)
Me.ID = Guid.NewGuid().ToString("N")
Dim Spalten As String = ""
Dim Werte As String = ""
Dim InsertString As String = ""
Dim List As List(Of SQLVariable) = getparameterlist()
For Each i In List
Spalten &= i.SQLText & ","
Werte &= "'" & i.SQLValue & "',"
Next
Spalten = Spalten.Substring(0, Spalten.Length - 1)
Werte = Werte.Substring(0, Werte.Length - 1)
SQL.InsertSQL("TbL_Allgemein", "(" & Spalten & ") VALUES (" & Werte & ")")
ElseIf checkExist() And NewID = True Then ''----------------------------------------bestehender Eintrag ohne ID
Dim UpdateString As String = ""
Dim WhereString As String = ""
Dim list As List(Of SQLVariable) = getparameterlist()
For Each i In list
'If Not i.SQLText = "EssenCreateDate" Then
UpdateString &= "[" & i.SQLText & "]='" & i.SQLValue & "',"
'End If
Next
UpdateString = UpdateString.Substring(0, UpdateString.Length - 1) 'wg. ','
SQL.UpdateSQL("TbL_Allgemein", UpdateString, "Rubrik = '" & rubrik & "' AND Titel = '" & Titel & "'")
NewID = False
ElseIf checkExist() And NewID = False Then ''----------------------------------------bestehender Eintrag mit bestehender ID
Dim UpdateString As String = ""
Dim WhereString As String = ""
Dim list As List(Of SQLVariable) = getparameterlist()
For Each i In list
If Not i.SQLText = "ID" Then
UpdateString &= "[" & i.SQLText & "]='" & i.SQLValue & "',"
End If
Next
UpdateString = UpdateString.Substring(0, UpdateString.Length - 1) 'wg. ','
SQL.UpdateSQL("TbL_Allgemein", UpdateString, "ID = '" & ID & "'")
End If
End Function
Function checkExist() '(ByVal ip As String)
Dim ds As New DataSet
SQL.SQL2DS("SELECT * FROM TbL_Allgemein WHERE ID = '" & Me.ID & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
Return True
Else
ds.Clear()
SQL.SQL2DS("SELECT * FROM TbL_Allgemein WHERE Rubrik = '" & rubrik & "' AND Titel = '" & Titel & "'", ds)
If ds.Tables(0).Rows.Count > 0 Then
Return True
Else
Return False
End If
End If
End Function
End Class

View File

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

View File

@@ -105,6 +105,7 @@
<Reference Include="System.Deployment" />
<Reference Include="System.Design" />
<Reference Include="System.DirectoryServices" />
<Reference Include="System.DirectoryServices.AccountManagement" />
<Reference Include="System.Drawing" />
<Reference Include="System.Drawing.Design" />
<Reference Include="System.Runtime.Serialization.Formatters.Soap" />
@@ -151,6 +152,22 @@
<Compile Include="Administration\Standorthinzu.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Classes\cEintrag.vb" />
<Compile Include="frmAllgemeinEintrag.Designer.vb">
<DependentUpon>frmAllgemeinEintrag.vb</DependentUpon>
</Compile>
<Compile Include="frmAllgemeinEintrag.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="uscntr_FunktionAdmin.Designer.vb">
<DependentUpon>uscntr_FunktionAdmin.vb</DependentUpon>
</Compile>
<Compile Include="uscntr_FunktionAdmin.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="Classes\cBenutzer.vb" />
<Compile Include="Classes\cBerechtigungen.vb" />
<Compile Include="Classes\cGlobalVariables.vb" />
<Compile Include="Classes\Class1.vb" />
<Compile Include="Administration\CSVImportieren.Designer.vb">
<DependentUpon>CSVImportieren.vb</DependentUpon>
@@ -206,6 +223,12 @@
<Compile Include="Drucken\frmPrintActiveReports.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmLeer.Designer.vb">
<DependentUpon>frmLeer.vb</DependentUpon>
</Compile>
<Compile Include="frmLeer.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="HostBearbeiten_OLD.Designer.vb">
<DependentUpon>HostBearbeiten_OLD.vb</DependentUpon>
</Compile>
@@ -259,6 +282,18 @@
<SubType>Form</SubType>
</Compile>
<Compile Include="PrintDGV.vb" />
<Compile Include="uscntr_Benutzer.Designer.vb">
<DependentUpon>uscntr_Benutzer.vb</DependentUpon>
</Compile>
<Compile Include="uscntr_Benutzer.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="uscntr_Berechtigungen.Designer.vb">
<DependentUpon>uscntr_Berechtigungen.vb</DependentUpon>
</Compile>
<Compile Include="uscntr_Berechtigungen.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="uscntr_Firewalleinstellungen.Designer.vb">
<DependentUpon>uscntr_Firewalleinstellungen.vb</DependentUpon>
</Compile>
@@ -285,6 +320,12 @@
<EmbeddedResource Include="Administration\CSVImportieren.resx">
<DependentUpon>CSVImportieren.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmAllgemeinEintrag.resx">
<DependentUpon>frmAllgemeinEintrag.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="uscntr_FunktionAdmin.resx">
<DependentUpon>uscntr_FunktionAdmin.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="Drucken\frmPrint.resx">
<DependentUpon>frmPrint.vb</DependentUpon>
</EmbeddedResource>
@@ -306,6 +347,9 @@
<EmbeddedResource Include="Drucken\frmPrintActiveReports.resx">
<DependentUpon>frmPrintActiveReports.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmLeer.resx">
<DependentUpon>frmLeer.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="HostBearbeiten_OLD.resx">
<DependentUpon>HostBearbeiten_OLD.vb</DependentUpon>
</EmbeddedResource>
@@ -331,6 +375,12 @@
<EmbeddedResource Include="HostVerschieben.resx">
<DependentUpon>HostVerschieben.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="uscntr_Benutzer.resx">
<DependentUpon>uscntr_Benutzer.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="uscntr_Berechtigungen.resx">
<DependentUpon>uscntr_Berechtigungen.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="uscntr_Firewalleinstellungen.resx">
<DependentUpon>uscntr_Firewalleinstellungen.vb</DependentUpon>
</EmbeddedResource>

View File

@@ -22,6 +22,8 @@
tsbPDF.Image = My.Resources.pdf512
Viewer1.Toolbar.MainBar.Items.Insert(5, tsbPDF)
AddHandler tsbPDF.Click, AddressOf tsbPDF_Click
Print()
End Sub

View File

@@ -10,6 +10,7 @@ Public Class EintragBearbeiten
'Public Titel As String = Main.SenderTitel
Property rubrik As String = ""
Property Titel As String = ""
Property ID As String = ""
Public abfrage As String
Public Linked As String
Public LinkedWith As String
@@ -19,7 +20,7 @@ Public Class EintragBearbeiten
Private Sub EintragBearbeiten_Load(sender As Object, e As EventArgs) Handles MyBase.Load
dbload()
If Main.Debug = True Then
If Class1.DebugMode = True Then
Panelhinten.Dock = DockStyle.Left
CmdTest.Visible = True
End If
@@ -69,6 +70,7 @@ Public Class EintragBearbeiten
TxtBenutzername.Text = reader("Benutzer")
TxtKennwort.Text = reader("Passwort")
TxtLink.Text = reader("LINK")
Me.ID = reader("ID")
'TxtRubrik.Text = reader("Rubrik")
Loop
reader.Close()

View File

@@ -29,7 +29,7 @@ Public Class HostBearbeiten
''''LADEN''''
Private Sub HostBearbeiten_Load(sender As Object, e As EventArgs) Handles MyBase.Load
dbload()
If Main.Debug = True Then
If Class1.DebugMode = True Then
PanDebug.Visible = True
End If
FillAutocomplete()

View File

@@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class Login
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
@@ -20,17 +20,18 @@ Partial Class Login
'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()> _
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Login))
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.LblInfo = New System.Windows.Forms.Label()
Me.LblTitel = New System.Windows.Forms.Label()
Me.PanHilfe = New System.Windows.Forms.Panel()
Me.CmdVerstanden = New System.Windows.Forms.Button()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.btnLogin = New System.Windows.Forms.Button()
Me.txtUser = New System.Windows.Forms.TextBox()
Me.txtPassword = New System.Windows.Forms.TextBox()
Me.lblInfo = New System.Windows.Forms.Label()
Me.PanHilfe.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Timer1
@@ -38,53 +39,73 @@ Partial Class Login
Me.Timer1.Enabled = True
Me.Timer1.Interval = 10
'
'LblInfo
'LblTitel
'
Me.LblInfo.AutoSize = True
Me.LblInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LblInfo.Location = New System.Drawing.Point(3, 106)
Me.LblInfo.Name = "LblInfo"
Me.LblInfo.Size = New System.Drawing.Size(51, 15)
Me.LblInfo.TabIndex = 0
Me.LblInfo.Text = "Label1"
Me.LblTitel.AutoSize = True
Me.LblTitel.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LblTitel.Location = New System.Drawing.Point(59, 6)
Me.LblTitel.Name = "LblTitel"
Me.LblTitel.Size = New System.Drawing.Size(79, 15)
Me.LblTitel.TabIndex = 0
Me.LblTitel.Text = "Anmeldung"
'
'PanHilfe
'
Me.PanHilfe.Controls.Add(Me.CmdVerstanden)
Me.PanHilfe.Controls.Add(Me.PictureBox1)
Me.PanHilfe.Controls.Add(Me.LblInfo)
Me.PanHilfe.Location = New System.Drawing.Point(13, 13)
Me.PanHilfe.Controls.Add(Me.lblInfo)
Me.PanHilfe.Controls.Add(Me.txtPassword)
Me.PanHilfe.Controls.Add(Me.txtUser)
Me.PanHilfe.Controls.Add(Me.btnLogin)
Me.PanHilfe.Controls.Add(Me.LblTitel)
Me.PanHilfe.Location = New System.Drawing.Point(12, 13)
Me.PanHilfe.Name = "PanHilfe"
Me.PanHilfe.Size = New System.Drawing.Size(695, 377)
Me.PanHilfe.Size = New System.Drawing.Size(196, 145)
Me.PanHilfe.TabIndex = 1
Me.PanHilfe.Visible = False
'
'CmdVerstanden
'btnLogin
'
Me.CmdVerstanden.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdVerstanden.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdVerstanden.Location = New System.Drawing.Point(157, 351)
Me.CmdVerstanden.Name = "CmdVerstanden"
Me.CmdVerstanden.Size = New System.Drawing.Size(377, 23)
Me.CmdVerstanden.TabIndex = 2
Me.CmdVerstanden.Text = "Verstanden"
Me.CmdVerstanden.UseVisualStyleBackColor = False
Me.btnLogin.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnLogin.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.btnLogin.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnLogin.Location = New System.Drawing.Point(3, 86)
Me.btnLogin.Name = "btnLogin"
Me.btnLogin.Size = New System.Drawing.Size(186, 23)
Me.btnLogin.TabIndex = 9
Me.btnLogin.Text = "Login"
Me.btnLogin.UseVisualStyleBackColor = False
'
'PictureBox1
'txtUser
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(359, 29)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(333, 269)
Me.PictureBox1.TabIndex = 1
Me.PictureBox1.TabStop = False
Me.txtUser.Location = New System.Drawing.Point(3, 34)
Me.txtUser.Name = "txtUser"
Me.txtUser.Size = New System.Drawing.Size(186, 20)
Me.txtUser.TabIndex = 10
Me.txtUser.Text = "Benutzername"
'
'txtPassword
'
Me.txtPassword.Location = New System.Drawing.Point(3, 60)
Me.txtPassword.Name = "txtPassword"
Me.txtPassword.Size = New System.Drawing.Size(186, 20)
Me.txtPassword.TabIndex = 11
Me.txtPassword.Text = "Passwort"
Me.txtPassword.UseSystemPasswordChar = True
'
'lblInfo
'
Me.lblInfo.AutoSize = True
Me.lblInfo.Location = New System.Drawing.Point(4, 116)
Me.lblInfo.Name = "lblInfo"
Me.lblInfo.Size = New System.Drawing.Size(35, 13)
Me.lblInfo.TabIndex = 13
Me.lblInfo.Text = "lblInfo"
'
'Login
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.ClientSize = New System.Drawing.Size(720, 402)
Me.ClientSize = New System.Drawing.Size(222, 171)
Me.Controls.Add(Me.PanHilfe)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "Login"
@@ -93,13 +114,14 @@ Partial Class Login
Me.WindowState = System.Windows.Forms.FormWindowState.Minimized
Me.PanHilfe.ResumeLayout(False)
Me.PanHilfe.PerformLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents Timer1 As Timer
Friend WithEvents LblInfo As Label
Friend WithEvents LblTitel As Label
Friend WithEvents PanHilfe As Panel
Friend WithEvents PictureBox1 As PictureBox
Friend WithEvents CmdVerstanden As Button
Friend WithEvents btnLogin As Button
Friend WithEvents lblInfo As Label
Friend WithEvents txtPassword As TextBox
Friend WithEvents txtUser As TextBox
End Class

View File

@@ -121,452 +121,6 @@
<value>17, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAYABgAAD/4QAiRXhpZgAATU0AKgAAAAgAAQESAAMAAAABAAEAAAAAAAD/2wBD
AAIBAQIBAQICAgICAgICAwUDAwMDAwYEBAMFBwYHBwcGBwcICQsJCAgKCAcHCg0KCgsMDAwMBwkODw0M
DgsMDAz/2wBDAQICAgMDAwYDAwYMCAcIDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwM
DAwMDAwMDAwMDAwMDAz/wAARCAEBAUoDASIAAhEBAxEB/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQF
BgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAk
M2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWG
h4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx
8vP09fb3+Pn6/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQFBgcICQoL/8QAtREAAgECBAQDBAcFBAQA
AQJ3AAECAxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAVYnLRChYkNOEl8RcYGRomJygpKjU2Nzg5
OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOEhYaHiImKkpOUlZaXmJmaoqOkpaanqKmq
srO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq8vP09fb3+Pn6/9oADAMBAAIRAxEAPwD+
f+jGaKktk82ZVPRmANAEfSivs7WP+Cc3w/0PV57Obxd4zaW3fY5i0y1dc4GcEzDPPHQZ9ulVR/wT7+Hu
P+Rq8b9v+YVa/j/y2rqWEqtbHO8VS7nx3RX2If8Agn58PB/zNXjjnOP+JTa8+n/Lf/PvX3d+z3/wZ9ah
+0h8EPCnjzR/jBY2Wl+LtNh1S1t7zT2FxDHKgYK4QMu4ZwcMR71FShKGsjSnWhN2ifibRX7xD/gyP8RH
/mtOh9s/6BL+P8NB/wCDI/xFj/ktOid8f6BL17fw1loaH4O0V+8f/EEf4i3f8lq0Tr/z4SdP++a8g/bd
/wCDVz/hhD4HN488T/Fb+2NMW/t9ONvpWnbrjfMWAbEhRdo2nvk04xu7ImUkldn490V9iH/gn38Pf+hq
8b9P+gVa9f8Av/R/w77+He7/AJGzxx1/6BNp0/7/ANb/AFOr2MfrdLufHeKCMCvrTxl+wT4J0b4eeJtW
07xN4suLzQdHuNTjhudPt44pTEudrMsrEDJHOPXpXyYxzWNSnKDtI1p1IzV4iUUUVmWFFFFABRRRQAUU
UUAFFFFABRRRQAUUUUAFFFKFJp8rAAM0pXArW0Xwnc6uQVUqh/iIruPC/wAGft7LuVm7kleK/W+DfBfi
fiOKq4WjyU39qei+XU8/F5ph8Mr1GeZxW7S/dVjVy18N3l7/AKu3kbt0r6C8OfBK3tdrNbRsOnzJkV11
j4AWCHZHCi44ACjFf0Fk/wBEZ2U80xvygv1Z8li+OsPT0pq5x/7LX7IF141vLfVtVt2+xLINke4Ayf8A
1q+7vh58NF0K3it7e3hhjjAChcVxP7PXhxvD/h795/FyOK9w8EJ9qu1yOuO1fbYnw9yTJcDLBYCmvdVu
Z7v1P5a8SeNMbmOJmpy9yOy6HV+EfCDrErNjGM4roR4TYLlVxU+lD7OqKveuv06zWS2XcK/k7irw2+s1
3U5tz+b8wzSpGfMzjYPDE396qmqeD5Xb69a9LTTo8D5V/KotR0lTFkfyr4qPg7hpy95v7zy6edzUzyC7
8CSuPvn8DVQ/D6Qn71el3emBWPT8qomy56j8q+ko+BuXTV3f7z3Ked1baM/npqSz/wCPqP8A3x/Oo6kt
P+PmP/fH86/Lo7n+tR+nHxGz/wAJ1qn/AF3PX6CsX8/yra+IYz461T/rue2OwrHr6mnpFHzVT4mNUc1+
6n/BPX9rPx6vwl+FPwf+H/w/8IeIr/Qfg/4d8YXuo+IfGNxocPl3s97apDEkGm3hZlaxZizFBiQADg1+
Fo+9/n1Fftv/AME4/hR8UPh/B8Nviz4V8H6L4w8N+JPgX4V8J+VJ4hXTbq1urK81O5kYo0LqyMl7Hghg
cqwx3rzc0+FHfl3xM9N+Ff8AwVI179q34o+G/hv8N/BunaF8Qm8P6nrfjWLxTema18Ey2GrSaPJZgW3F
+0l9a3yLJDKirHbpIwxKq1D+zh/wV5k+NH7QPw7+F+p+A10vxR4k8S+OvB3iC6tdV8/T9O1HwsbYTyWp
aNZLi3uPtKlDIsTpggq2Ax5D9mb/AIJ6/Fj9jz9oHTPjPYaV4Z8ZeLPHGga7p/jnw/HrzWFrotzqHiO6
8QQnT53t2M8UUl/dW0hm2swSGRQPnSvEvG//AARP8efEf4r+Bbrxh4u8M+FfCviTx/8AEnxZ8QdPstbM
OoJo3iaayZdHtpjF+9Msdq0FxKnlYjmkCHJDV456x9XfCD/gq5N8Xvid8FLCD4e3Wn+E/j94n8R6X4Q1
m51HbNe6TpWmS3kWsG3MQKx3jQyCKIkEQmKYsfMCD5u/4LpftaL8VPhl8bPhENBNifhHq3gq/OqG68z+
1P7WTUJNvlbR5flfZMZ3Nu8zouOe18L/ALC/jL4DX3wlu/C2seAfEVj+zX8R9bvPAWkXPiM2h1LwhrOn
y28tpcTMkmy9sZLyVIAoWFoLWFGwzFx4b/wVM+BniqP4SfH/AOL3ij/hG9P1X4teJPB2nad4Y0XVP7Yl
0+y0e3vIxczTqiBpJpLyXMSRlY0iQ+Y5chNsP/Ej6mVb+G/Q/LsnBpM/5xV7/hGtS/6Bupf+Asn+FH/C
Nal/0DdS/wDAWT/CvpeZdz55RfYx/GnPwd+InT/kVNQx/wB8CvzoNfpJ4w8N6k3wg+ICDTdS3zeFr+NF
+zOC7FBgDjn6da/PpvhZ4oz/AMi3r3/gvl/+JrxMwknU0PYwCtAwKK3v+FWeKP8AoW9e/wDBfL/8TR/w
qzxR/wBC3r3/AIL5f/ia887jBore/wCFWeKP+hb17/wXy/8AxNH/AAqzxR/0Levf+C+X/wCJoAwaK3v+
FWeKP+hb17/wXy//ABNH/CrPFH/Qt69/4L5f/iaAMGit7/hVnij/AKFvXv8AwXy//E0f8Ks8Uf8AQt69
/wCC+X/4mgDBore/4VZ4o/6FvXv/AAXy/wDxNH/CrPFH/Qt69/4L5f8A4mgDBore/wCFWeKP+hb17/wX
y/8AxNH/AAqzxR/0Levf+C+X/wCJoAwaK3v+FWeKP+hb17/wXy//ABNH/CrPFH/Qt69/4L5f/iaAMFTz
XQeDtBW+ulaRdyjt60i/CzxPn/kW9e/8F8v/AMTXpPw2+EuvuLdZNB1tckZ/0CXj/wAdr9p8DOFMLnnE
cKeNa5KdpNO1nZ7annZpiHRoOUTofh98P11GFWZVVR91fWvU/C/gNbFVO1dvoa1vBnw01KxtY9+l6muB
0NpJ/hXcaX4WvIAN2m6i2P8Ap0k/wr/TR5jgMJTVDDzglFW0cT+fs9zfFVaklGLt6Mw9M8KIQv7tee/p
Wtp3w+Kyq235c10lhol0x+XStQXjqbZ+T+VdZ4M0G/e+WOSwu1TORmBh/SvCxnEVKKb9rH/wJf5n57js
ZjYRclF/czc8EeG/K0OFQqrtXHTrXeeDNL+z3anstVrDQp4I41WGfAx/yzb/AArp9C0yaPrHIM/7Br8k
4gzii6cnGabfmj8fzZ4upzNwlr5P/I6jw/btdyjb0BrtrO12R/hXK+HojZxfdbPHauptT50f3ttfzln+
c1/a2prReh+Y5lgcXKWlOVv8L/yLsMXTpU0lv5iYJGKrwQc/eU/jVpLXJ6mvmv7Uxz96MWfN4ilUpStU
TT800c/qVjtLfUisw2fP8VdZqWlFY92KzDZH0r6vAZxjXT1R2UMV7p/N7Uln/wAfUf8Avr/Oo6ks/wDj
6j/3x/Ov5ijuf7NH6cfEM58d6p/13PfPYd6x62PiJ/yPmq9f9eev0FY+a+ph8KPmqnxMQtg1+n37Jf8A
wXM+J37P37MvgXwTo/7H/wAUvGul+FdGt9MttesJb37Lq6RIFE8WzTpF2sRkYdhz941+YH8VfrF4f8J/
E74+fsTfsh/C/wAAvd+G7fxFo97e3HiiO4ubdLNrfzibcvCw+9HufYQS5RMFQrGtKdOjUqRhXScXfVtq
1ldvRq+hLlVjBzotp9kk29Ura7Gb4/8A+DrnWfhVrMWmeLP2W/E3hbUriEXEdprHiaSwuHiLMokCS6cr
FCysNwGMqw7V9I/8Etv+CmWn/wDBWO58eeKm8Aw+D/8AhERYaP8AZp9TTVvP3/aJvMDeRFs+9jGDnAOe
1fn1/wAF0vED/DDxZ8PfAnjDxWsOtL4O8M6d4l04X97NLe2yB0vJwo09o3UvG/737dHOSvFueHb7m/4I
3/tD/D39pPxh8dta+HMOpWmg2PiSLTrS3eOOHThYRedHYS2cQt4JYVltlSSSOdWkErMWdixqcwweFWAW
Io0OVv7XNJre3Xv+g8DisT9ddCrVul0sk9r9Ox9rHwzpv/QN0/8A8BY/8KdDoFjA25LGxRvVbdAf0FXK
M18mfTFS5tLOytZppLWJo4I2kfy7XzG2qMnCqpZjgHAUEnoATxWF4A+IPhz4neGptY0mG4XT4JRC8upa
JdaVhvLjk4W7hiZlAlQFgCobchIdGUeL/wDBXCC/vv8Agn14+ttO1rSdElulsopzqGvQaFHqdr9tgNzY
LeTPHHFLc24lgTdImWlA3LnI+GvE/wAN9A/bU8SfEOH9n+e1034Sa14/+HNy/gbwzHpJLw2d6f7W1ifR
5IZha2gQ2q/vYkWeSwZnSSPb5gB+tcdrZPKyJDYmSPBZVRNyZ5Ge4z2/GphZQg/6mD/v2v8AhX5h23wI
/aY+BXjz4kXXw7vviLpc/wAQvil4y1PVdXj8M6Bd3V5p1nocr6C4lm09/wBxNeiKBAwYbRsj8vczNe1z
4yft1a0fFmobPEHhXVrPwTFd+HvDln8P7bVLDWbxvDXnSSG88gi2vl1gunkTz7B5ccYtpUcy0Afpd9jh
/wCeEH/ftf8ACj7HD/zwg/79r/hXzx/wT41j40z2nxE034x3Gv6o2l6tpr+HNV1jSrLT7m+tp9GsZruM
LZwQQskN+13GreXvHKs7lAa+ix0oAj+xw/8APCD/AL9r/hR9jh/54Qf9+1/wqSigCP7HD/zwg/79r/hR
9jh/54Qf9+1/wqSigCP7HD/zwg/79r/hR9jh/wCeEH/ftf8ACpKKAI/scP8Azwg/79r/AIUfY4f+eEH/
AH7X/CpKKAI/scP/ADwg/wC/a/4UfY4f+eEH/ftf8KkooAj+xw/88IP+/a/4UfY4f+eEH/ftf8KkooAj
NnD/AM8Lf/v2v+FNOnwMebe3/wC/S/4VNRQBX/sy2/59bb/v0v8AhR/Zlt/z623/AH5X/CrFFAFf+y7U
/wDLra/9+l/wo/sm1PW0tP8Avyv+FWKKLgVRo9p/z52v/flf8KP7Gsyf+POz/wC/K/4VaooAq/2LZ5/4
8rP/AL8rz+lDaJZf8+dn/wB+E/wq1QeaPULI+W/+CrWs2fgX9mzR777JCu/xRZWx8qMI37yG5UdB0zg4
9q+RbW0+RWPHAIFfUn/BaZd/7JOhj/qdNL/9Bnr5vsrPMEf0FftfhziqcMuqQqfztr7kf53/AEuowp8S
4aqt5UUn8pSt+bK82lme16dvSs06Vg12UFsr2uPas1rBdx4r72jmlKN0j+SaOMauj+XupLT/AI+Y/wDf
H86jqWyGbuL/AH1/nX8sR3P9xj9NviJx451X/rue2Owp/g7wXD4o03XNQvvEvhbwppXh2K2kvL/Xrm4h
t1NzP5EKgwwTNlpONzKqKMlmUc1c8a+HbjVfFeoXVvLpskE0pdH/ALTthuXj1kz26HmqcOh2kXhLxb4d
8ReGbjxRo3i+1sYJV0rxhp+lT2z2l0bhSXliuA6PkqQFQjqrAjFfQzrWpXg9dPzV/wALngxpc1S0tin4
q8Kap4I1TXrLVrCe0n8L6m+j6qwAlt7K7STyzG08ZaI5bG0qxVwQVLAgnpNZ8cfEH4bavqHhk+KvF1qn
h3UbjQvKsdYu/sQnt53tmjgKsqsvmxugCgZKkYyCKPGPxn8e+MvAHiizv9FhGu+IpdbWP7B41trfQkt9
UmikZLixYM889ukIihmM4KqkRZWMfzdl4h/a21j4g/H7WPHHiD4a3UVrrPiDR/EzaFovxGsLOxsLnSdR
mubOO2D20ghhkjmkFwirmWdmnQxBmjrl+tTbSlFWOj6rBJ8r10/4J5XrdlrnxRvLe+1K31rxNcMDa291
eQzX7kKDIYkdwxwoLOVU4GWOOpr9Uf8Ag2UsIbL4dfF6S3t4oYZtT07DRxhFkKxTg8gYJHQ+nevzPsv2
ivi7aeHYbC1a/wBJgtdN0ewtobfx/Esdq1hrc2qySoowFMyzNEQOR8zEvkoP1e/4N5/ijq3xH+FnxCt9
W8P6b4dbQtUKW0Vjf215HNBd3+pagpZoY1bzE+1mJi7NuESlRGCVrOvjKs6Xs5Ky9fQ2o4KnCvzRd99b
H6KpG0rbVVmbGcAZ4qHUr2HRxb/a5Y7X7VIsUPmsE81ycBVz1JOOO9cj+0DFDN8FvFCT2OpajA+nOslt
p8Ms1xOu9MqqxfvGB7hecZxXi/wNlu5dL8VNpuk+INO8B2eu6AdEj8QWd1b3lveSTQre+St1+9WDBTB6
FmkAP3hXg1K1R0sTOnF3oxjK7XuSTbXKpfzWTduzTM6mZcmZYfASjdVbq6esXZu/LbWPRu+7R9NCLz22
bRJnjbjOaDbrbOV8pY27jZtNeb/tfeFrbxn+zh4o0y91LWNItLqGPzrjTdHuNZl2rMjGOSytwZrq3k2+
XNCnLwvKuQCSPnDwP8f/AIoeC/AGl+FfDPw/sfCb3Xha/wDE+h2Fn4euUtrG101buKe2js5tk8X2u6Gm
SW8DoJI49Qmjxut1L9XQ9Q+2DxSsm3blT83I4618Wa/+0L8fPBmhtY61JqUS/wBo2zzeKNL+Gt5qL2yT
6It4tqmnw+Yzqt/ut2m58sAK5V/nrnvEXxm+OXwy1zx9qNt4f8QeHLzxPqjavvg8F3viSK61eHwp4aW1
0iOKLPk2lxcnUle7yI45LF0MqMWJAPvPg/zp8MTXDbY1Z29FGa+K/HH7W/xk0T9oXUPD0ccOmyxxa7qC
6Ff+D7mKzS00yO0nia31VyIrv7VE8ys0ZYRtIgIQoVfa/aE15vjp+yv8M/FHjfwvqWveEvEfj3TtfutB
i8LXOqzWvh+Vrh7WK8sbdJ5JXELWzTDYwWRyDgKDQB9deW3mbdrbv7uOfypm6vhfTb74seCPhlPoOkeH
dUu/AOm2F7rei6Jrvhi41W7mtZvErx6dZSvIzPH9n09o5kgI82KOOEMEEbLW38c/2lP2ivDHw41e48P+
GYRfeG9fg8J6hf3Xh6/KXThrqWXWbaK2tb2eSzaP+zYQYrSZRLdXOdqweagB9nZorB+GWr6h4g+G3h3U
NYW2TVr7S7a4vVt45ooRO8KtIESeOOZV3E4EsaOBjcinIG9QAUUUUAFFFFABRRRQAUUUUAFFFFABRRRQ
AUUUUAFBoooAjnnW1hklkZY441LuzcBQBkk+wqHR9YtPEGkWuoafdW19YX0KXFtc28gkhuImAZXR1yGU
ggggkEGrSZ8xdud2RjHWvG/2eMah8RfEmpeDdsHwnvd0lssg3W+oaoZSZ7rTAMBLFhuLsd0c8rGSEIu5
5qjG7f8AX9XCWx5T/wAFoj/xiXof/Y6aX/6DPXzpZXB+zp/uivor/gtP8v7JOhn08aaZ/wCg3FfMkWoK
tuvP8IrswnEawC9i5Wvqf55fS+puXEeF/wCvX/tzNiPVRBnNV21lSeq1hz3TO33u9M/76r6fB8RqrG8Z
n8mxwUVqz+ZygHFFFfFH+34UoGaSii4BRRRQAZwa/oU/4Mqx/wAY/wDx4P8A1MGl/wDpNPX89df0K/8A
BlX/AMm/fHj/ALGDS/8A0mnoA/YX4nyaDIlpBrWsa1pLHc8TabqV5YPIOh3NbMpYdOGJ9q5Gz0v4e2+p
21zN4o8Xal9lmjuI7fUvEesXtqZI3WSNmhlkaNirorDcpwyg16L428f6X8NdA/tLV7w2lm0ywBgpYs7K
zAdfRG/KodE+Kei+JvFV5oum6j/aV5YAm4a3BeGDthnBxnPy49eOxxnKpC/LJ69v+AdlPBYiVL6xTg+T
vrbS19dtLr70VP8Ahc3hfd/yF4/+/E3/AMRWPp/ij4faT411TxJbzWceva1DDbXt95E5mniiz5aEleFX
cThcAk5OTzXT/EL4laT8KvB194g8QX72Ok6eFMsiwy3Ers7hI444YlaWaV3ZUSKNGkkdlVVZmAM/gTxp
bfEjwlZ65pS6t9gvV3It9pl1pt1EQSpWW2uY454XBBBSVFYdxWhxmT/wufwx/wBBiP8A78Tf/EUD4z+G
B/zGI/8AvxN/8RXXeRcgsPLuMqMn5TxXNXvxZ0Ww+KOm+C3vLuTxNq1jLqcFnBY3NwqW0bBDLNLHG0Vu
rOdiGZ08xlZU3srAAHmniD4bfA/xX4l1zWNU0fR9Q1XxLbi01K6uIruSS5h8yOQxZP3I2eGIsqbQ+wBg
w4r0KP4yeFokVU1aFFVQqqtvMoUAYAA2cDHGK61kuE3blmGz73B+X61T1TWho72qzR6k5vLlbWP7PYz3
IR2BIMhiRhEnynMkm1BwCwJGQDnv+FzeF8/8hiP/AL8Tf/EUD4zeFw2f7Yjz0/1E3/xFda6TxHDLMp64
IIpTFcDd8kw2jLZBGBQByJ+M3hc/8xiP/vxN/wDEUf8AC5/C/wD0F4/+/E3/AMRXWS+dAcP5i5GRnIzT
fOb+8350Acr/AMLn8L/9BeP/AL8Tf/EUf8Ln8L/9BeP/AL8Tf/EV1XnN/eb86POb+8350Acr/wALn8L/
APQXj/78Tf8AxFH/AAufwv8A9BeP/vxN/wDEV1XnN/eb86POb+8350Acr/wufwv/ANBeP/vxN/8AEUf8
Ln8L/wDQXj/78Tf/ABFdV5zf3m/Ojzm/vN+dAHK/8Ln8L/8AQXj/AO/E3/xFH/C5/C//AEF4/wDvxN/8
RXVec395vzo85v7zfnQByv8Awufwv/0F4/8AvxN/8RR/wufwv/0F4/8AvxN/8RXVec395vzo85v7zfnQ
Byv/AAufwv8A9BeP/vxN/wDEUf8AC5/C/wD0F4/+/E3/AMRXVec395vzo85v7zfnQByv/C5/C/8A0F4/
+/E3/wARR/wufwv/ANBeP/vxN/8AEV1XnN/eb86POb+8350Acr/wufwv/wBBeP8A78Tf/EUf8Ln8L/8A
QXj/AO/E3/xFdV5zf3m/Ojzm/vN+dAHJTfF/wpcwvFJqkMkcilHR7aVldTwQQUwQemKueGvH2g65cx6f
pd5C7RRYjgjgeNUjQAADKhQAMADsK6HzW/vN+dNeRmXG5j9TQHQ+Pf8Agt7Kbf8AY40du48aaX/6DPXy
Tpuqtc2qZIzgc19Z/wDBcMZ/Y00n/sdNL/lPXxrZxMI0PqAK/mHxsz7E5dnNCNGT5XDbzuz+CfpXUozz
7DX39l/7czfD5YVY2E1mWW6M/Mc1prIpX71eXwr4h42NB81z+SatOzsj+Z+iiiv6yP8AawKKKKACiiig
Ar+hX/gys/5N9+PH/YwaX/6Tz1/PVX9Cn/BlYf8AjH747/8AYw6X/wCk89AH6Pf8FS/2ePH/AO1F8B/C
vhH4dalPouqXfjKymv8AUkumt49NsFtL0SzyFCGZVZoxsXJZ2jHGcjlf2e/DvxG/Y6/ad8O/B3QvA/ir
xn8J9UslvdU+Il4iMLW6FncMwuJnmEjyNNHGoVEaKNZo0XaQ9fV3ijxXpngrSDqGrXsVhaiRYvNkVmy5
BIA2gnorVHaeNdH1DxTcaLBqVvcapaqzSwRq7GPHXcwXavYcnqcdTiuGOFoRxLxH22kt9l5drn09TPM0
rZJTyhL/AGaEpT0jvJ2TcpbvlVkuivtdmH8e/AsnxL+D+uaHH4f8P+KpNQhCppWt6lPplldFXVhuureG
aa2dSodJo4neN1RlAIBHz54S/ZF+Lek+J9H1jxBd/D/x5rVr4Vn0fTdT8Sa3fX0/gO83aiY3tA9if7UE
sV1Z21xcTtaTyJZb28wv5Y+q9U1S10LS7q+v7m3sbGxie4uLm5lWGG3jQFmd3YhVVVBJYkAAEk1yPw7/
AGkfAXxbls4/DXizR9Ym1CS4itYoZCslw1ukck21GAZtiyxsSBjDggmu4+YPjvw//wAEo/HVz8IJtH1j
VvCq6lpuheLR4bih1y4ktvDms6j/AGQ+mXcTW2n2UQFrPY3MnmR2kbRGZSiOzSNXtP7T37EGofGj4ueL
fG2iv4Zsdf1nwDb+E4L24aaC6nePU/tc1vLNDGXjtLiD/R3dCzhZGPluBhvpHbx3NZ9h4r0vU/E2oaLb
39rNq2jxQT3tmkgaa0SbeYmdeqh/Lfae+0+lAHzz+zb+xVq/wy+LXhXxVrlr4TsLPw3p+trpnh7R9Ru7
6x8Kz391A8cNi00EIeGO3SdPMMURU3LqkSoTVG7/AGHfGkmvtJD4m0r+z9B8Sxv4Via+uw+m6AWu7iW1
kwhHnfaLqOJQMr9nsLUF9ylT9TbcikK/5NAHxx4S/YN+I/wwtfBeg+HLzwXD4cs7Pwg2v3B8Raja3cF5
o91NPem1jW0cT/bWndjNLNC4YZZH3ZXj9B/4Jo/FLT7T4TrNeeC7Cw8AajeSzaHo/iU2fl77i0lg1E37
aC7XeoBbeZZJI7Wxkf7RxOPnL/eH9pW39pfYhcQfbBF5/wBn81fOEedu/Z97bu43YxniqeseL9J8PTNF
eaha28qNbI0RfMqG4mMMGUGWCySAorEYJVuflOADy39h/wCBHiD9nf4ValoPiC08KWMkmrzXVnHot019
I8DKgEl5dtaWZubt3V2eT7OpwVDNIwLn2agLgYqnqevWekXun291cLDNqk5trRCDmeQRvIVGP9iN25x9
38KALlFZvizxXpvgLwtqOua3f2ulaPpNs93e3lzJ5cNrCg3PI7HgKoBJJ7VyviP9p/4d+EfEMek6l400
G11KTVDoq2zXO6T7aBGWgIAOGXzoQxOAhlUMQSBQB3lFcl4a+O3gvxlpek3uk+KtC1K017VrnQdOmtrt
JEvNQthcGe0Qg8zRi0uSydR5D+ldaOlABRRRQAUUUUAFFFFABRRRQAUUUUAFFFFABQaKDQB8e/8ABboD
/hjrR93T/hM9LP8A47PXx7BIFiXnsPwr69/4Ljvs/Yz0j/sc9L/lPXxdaXxjt1/3RzX8j/SFm/7Uw8Y7
8n6s/g36VVNyz/DNf8+v/bmaz3bQLVc6ww/hasy41B5m9BVfz5PU1+GYXHYmjHlhKx/MEcLF/EfzuUUU
V/pWf7IhRRRRYAooooAK/oU/4MrP+Tfvjx/2MGl/+k89fz11/Qr/AMGVfP7P3x4/7GDS/wD0mnoA/RX/
AIKt/Cz4mfGv4BeFfDPwpa6h8Sap40skuLuM7ILCzFpfGWe4cghIVPl5OMliiKGd1U8d+zb4j8Yfsb/t
U+HfgLJ4G8f/ABC0bxLZrf6n8Ul8N3q6ZbzLZ3ExW6vPLFtHmSIJHCsjrGJowXaVpM/XPiLxBeaJLCtr
oOra0sgJZrOa0jER9D588RyecbQenbjOd/wm+rZ/5EbxR/4FaV1/8DK444GmsQ8V9ppLyVuyPo63FGMn
k1PIlaNGEpTdklKUpW+KW7SS0Wy1e5iftR/CnUPjb8CNc8N6VJp6apcNbXVpHqBYWV3LbXUVytvcFVZh
BMYfKchXIWRjtbG0+N/tI/A34lftgP4d1i60XWPhpqnh3SPEdvAmneOGt78XtzZW4sX+12LIwhFzGcqH
5EY8xSjFG+gP+E51bP8AyI/in/wL0r/5Mo/4TrVv+hH8Uf8AgVpX/wAm12Hzh8m6n+y/+0LP8R/iBrM3
jPxxeya1a2Y0+1tPGsdnodxZJ/Z7XWmxQhRNp97KsF9Cl9D9xrkSbxwE674Y/s1fELwt+19p/jY22rWX
w9utC0vTZfDlz4xuLvVLG+t47sfbby8M7tqccaTGL7PNJIrNcLN87Qrt+hP+E61b/oR/FH/gVpX/AMm0
f8J1q3/Qj+KP/ArSv/k2gD5U+Ov7H/xo8VanPqGj+N/iVDb6h471XVL6z8P+PnsLsaYyAaWLf7SWt4oY
WMhktU2B/MUt5nlqtc18LfhX8bviK/jrxFoeseNrX7D4s8SIg1Tx9dyx+JxZ+NlntLO1tmfytNjjsbK7
tC4VEkjvY0PmQjCfaH/Cdat/0I/ij/wK0r/5NoPjzWG6+B/FTcYybvSv/kygD5Af9k741XPjvxN48m0/
VG8XeJdB8QaRbIPiPeqNCgudfuLy0gURzxwmRbCcRxMg2QSxIMhFDVF8IP2IfjJ4C8TQa3d6t4ou/E2o
aP4U0y71y8+IV3dXEVvpni66vrq2uE8xY5zLo88ce5UKsy3MZI8+RpPsT/hOtW/6EfxR/wCBWlf/ACbR
/wAJ1q3/AEI/ij/wK0r/AOTaAPlH4f8A7H/xo1CytdO8TeKPG1jay6poq+J7iH4malNJ4jME922pX9k6
SrJptvcRyQKLOAwgDgJH5Ss3ZeNPgJ8aL79kPwH4X0nxRqcPjfQW1aLVNQ/4Sa4juLyF9F1q0sPNus+Z
O63VxpkhZyWDwiXJeINXvn/Cdat/0I/ij/wK0r/5No/4TrVv+hH8Uf8AgVpX/wAm0AeA6z+yL47k/ZT+
P3w7TXtc1j/hO9Ka28LTa14putUuraafRreC6zc3TSSQob5Z5FQEom/KKqkKM27/AGcPid4D8OeCNH8K
6LZr4o+H93PpWjeOrPXYbOO80m4uLae4bVrCRGNybjZm5VC0ktzbGeN4fP8Ak+kP+E61b/oR/FH/AIFa
V/8AJtH/AAnWrf8AQj+KP/ArSv8A5NoA+YPhT+wz44+FfxB+Dt9Y/wBjx6Fpfi7UfEnjTTzfE+RcfYdZ
tLS9tRt2ySTRX9vFOvynFtE3JDZ+xE6VzX/Cdat/0I/ij/wK0r/5No/4TrVv+hH8Uf8AgVpX/wAm0AdN
RXM/8J1q3/Qj+KP/AAK0r/5No/4TrVv+hH8Uf+BWlf8AybQB01Fcz/wnWrf9CP4o/wDArSv/AJNo/wCE
61b/AKEfxR/4FaV/8m0AdNRXM/8ACdat/wBCP4o/8CtK/wDk2j/hOtW/6EfxR/4FaV/8m0AdNRXM/wDC
dat/0I/ij/wK0r/5No/4TrVv+hH8Uf8AgVpX/wAm0AdNRXM/8J1q3/Qj+KP/AAK0r/5No/4TrVv+hH8U
f+BWlf8AybQB01Fcz/wnWrf9CP4o/wDArSv/AJNo/wCE61b/AKEfxR/4FaV/8m0AdNSNXNf8J3q3/Qj+
KP8AwL0r/wCTauaJ4o1DVr7ybjwzrekx7S3n3VxYvHkdFxDcyPk/7uPUigD5L/4LtS+T+xJprf8AU6aV
/Kevg+LXQkC7WDcDoa+5v+C+Qx+wrp+D/wAzppX8p6/O61E0ka49BX8seO+HVTNaMn/J+rP4r+kthY1M
6w8pf8+//bmdSfELZpp8St6/rWPa6dNK4C/Nu4rWXwZcFR8y9K/Bp06MN2fzROjQjoz+fuiiiv8ASKx/
rWFFFFUAUUUVDVgCv6Fv+DKr/k3748f9jBpf/pNPX89Nf0Lf8GVX/Jv3x4/7GDS//SaenbQD9sgMGiii
pA4H9qH47L+zP8BvEPjltD1LxN/YKQlNJ091S61B5biKBIoy3G4tKuAevTvXC+PP2/fCfhb4q+F/DOmp
Fq1v4q8Hz+Notcn1COw0qysVaMW/nysrFGnV5GT5TgQMCASK9O+Nfwnsvjh8ObzwzqF1e2NpeXFnctNa
FRMrW13DdIBuDDBeFQeD8pOMHBHjmv8A/BMzwPrVlqkMWr+J7IarPrE0hSeKQwpqC2yeRHvjO2G3S1RI
YxwoZydxYmgDq/Dn7cfgXx58Cta8feGZtQ8QafpGv3HhWKytolW71HVk1H+zYbSIM2wG4ujEsbuyoEmR
5DGobbZ8B/tZaLe29ra+NLzwj4Q8SX2oXmn2emWnim31tb5rRIWuDFJEiNuiMyrJG8atGw5+VkZkg/ZJ
01/hD4n8F3XiDxBdafrvie88W6fdDyIbzw7ez6qdWja3dY8N5F8fNjMwckAI29cg8ro3/BPjTLLVvEGt
XXjrxlN4r8UWOu2eo65Yi10q58zVbXSrR7mEW0SLBNDDo9p5bRgZYyu25mBAAeKP+Cj/AIBt/iXovhrw
7q3hvxB/anh7UfE1xqU2upp9lp9pZzC3bezRuTIZiVKlV2Kjk5ICnofD/wC3Z8N7nQ9XvPEHibRPCE2i
61qWjT2up6hGsoNpql5pqS49LiSylaJPvEcYJFcL4F/4JZeCvAPwz1bwtY61qlrp+saRqukSppum6dpd
tAmo3dvdTNDa21ukERV7ZAoVNuGYkMTkZnjH/gm/ceFLhZPh14s13SpPEXxO/wCFha21wLSdbK8mvLy6
mvbdZYmBdPtEcKwnKMkSsR5m52APZLv9sv4TWNq00vxH8HrCukW+vlxqSMosJ5RFBc8H7kkhCJ3duACQ
QFg/bI+FNxqem2a/EPwn9o1jS5dbsU+3ri5sokeSW4RvulEWNyxz8u0g4IrhtP8A+CeHh/QvC01lpvir
xVY6kw0Ke31X/RZp7W90q6ubuG7CPEY3aSa7mZ0dShBAUJjNZ/iT/gm5pvjLRNU0TV/iB4t1Pwxr3hu+
8PalpNxY6c8Vw19NPc3t4jG3zHLPczJI6L+6ItoY9mxSpAPTIP2vvhbcwQSp4+8M+XcafcashN2F22lv
5gnmbP3FQxS534/1bYzg1NY/tW/DXU/EXhvR4fHPhttW8XwrcaLZtdqk2pRsXVGjVsH5mjcLnG4owXJF
eReH/wDgl74Z8NadZ2djrVtpdjDpN9pF5Y6T4O0PStP1yO6WdSt/aW1qkF5ChuJHFtMjwmT5ym4knd8H
f8E/7Hwpruj3k3xB8e61DbR6V/bUGqzwXjeJJtMu57uxlnnkjaePypZz8sUiqUjRTwDkA9EtP2ovh1f/
AAgj+IFv400G58DyttTXYbnzbF88ZWRQQV/2hke/pa1P9orwDo1hNdXXjPw1b2ttO9tLK+oRhElSx/tB
492cbhZf6Rj/AJ5/N0rzn4h/sB+HviJ+x/4O+C8+vaxH4Z8G2NnpqPcWllqC6tBbWrWypeWtxC9rOCGE
oDRYSaOKRQrRqRiX3/BNHQLvUtv/AAl2uy6Cu6f+wL7S9Mv9Omu20D+wXnmSa3YzI1mFJgcmIuCduCVo
A3NJ/wCChXgbxP8AGvVfCGi3VnrMOj6HperS38WpQW5up9TvGtLKzgjnMatJI6cs8kYBkiUbmf5b+gft
5+ANU+NUPgW/1aw0HVr6yspbBb/U7Rmvr241HUtOfTkEMkiG4iuNNkRgsjDfKiA7gQcex/4J/afZeDL7
T5PiB48v9YurXQYo9c1G4hvry2n0fU7nU7O4AmR1Yia5KmOTcgjjRAABUfhD/gnV4c8LWl+JvFHijVL3
VLrSb27vLhLRJZZtP8UXniVWASJVXzby8kjcAACJEChWBcgHoGgftcfC/wAV3Okw6Z4+8L6hJr1zJZ6c
Le+WQXksbBWVCODhiFz03ZUZIIGl8GP2i/AX7RWm3l54D8Y+HvGFrYeSbiXSb1LlIRMnmRElT910yyt0
YA4PBrx2H/gl74DtPF/w01xZ1vtS+GWmRaTZy6voGlatJcQxXb3cbo9xbO9pMskkn721aJjkE5KIV9E/
Z5/ZT0X9nGSxbSdS1a++weC9B8DoLwxfNa6R9sMEx2Iv71/tsm/Hy/Ku1V5yAepUUUUAFFFFABRRRQAU
UUUAFB6UUUAMlVjEyxsqOQQrMu9VPYkZGR7ZGfUda4j4W/Fe613WLrwv4otbXRfHOlxedPaws32TVbbI
UX1kzcvbsxAZSS8DsEk6o8nbTM6wu0aI8gUlUd9is3YFgGKjPcKSPQ9K4v4VfCebwhf3viHxDfQ69421
pFS/1JYjHDawglksrNGLGG0jJOFyWdsyOWc5FRtrcHtY+YP+C93zfsKaf/2Omk/ynr899LtZJI1+VjwK
/Q//AILup5n7EemKf+h00r+U9fDOmWSJAm0Dp1r+U/HrEezzSgv7n6s/ij6TWKVPOsOv+nf/ALcynp1t
JHj5ccda0/3n96rcdmrKM1N9hX1/Wv55qYhN3Z/K1XEqTuz+dY8DtQB9KX5aAoNf6aH+wAflSdfSn7aQ
rmgBmOadjHpS7aTZU3QXGkYNf0Lf8GVX/Jv/AMeP+xg0v/0mnr+ezGTX9Cf/AAZV/wDJAPjx/wBjBpf/
AKTT0XA/bKijNGakDj/j38ZrP9nz4Tat4u1DS9Y1u30owINP0kW5vbySe4jt4o4vtEsMIJklTmSVFAyS
wxXN+Bf2xPBviOxmTxJcf8Kw1618QDwtPoHjS+sNO1BdTaCG4itozHcSwXLSwXEMiG2mlDh8A7lZV2f2
lvg7P8fvgnrPhO11aHQbvUntZ7a/msDfw201vdw3UZkgWWEyIWhAZVljJBOGBwa8Y+MP/BOvW/jf4ZuI
NY+KMkereKNYfWPF81voU1vp+ryfZ7S2gFvaRXyNAtvFZxpEtzLeJ+9maRJJHV0APVPh7+2n8JPin4fs
9U0T4leB7qx1LxJceD7GRtatovt+rwTvA1jCGcGWZmTdGiZMiOjoGR1Y6Nj+094BMGlrqvjDwj4b1DV7
SW+g03VPEemrd+REjySyYiuJEdI40d2eN3VVViSNpx826J/wT08YfEzW9I1zxbfeHdAvfC/ijxLd2GmX
MN5rFnqGka5q1tq9xFObXULItcx3UBRJGJhMf+stZGAcXfhH/wAE79e8CfHl1l1rTx4D0W38MTrePocL
at4hudLuNQu40inW53WccU1ym9ZIJPMDYjeIl2oA9m/Zu/be+HX7UPg3wbqmg6/pWn33xA06TWfD+g6j
rOmnWtTsEZ1N1Ha29zMxj+RiwzviKssqxSI6LtfCP9qPwV8dtW8YQ+EtYs9esfBMkEV9q1hd215ptw0s
LSkQTQyuHMexlkDBSrqRzjNeG33/AAS3k1yT4V6bqXxM1a98K/DHwhbeF4tLOmur3EsWlahpcl5CftRt
4Wmhv9zrJbTuGtowsqoXQ9T4O/YJm/4U38XvCnjDxlba1L8YtCh8PaheaH4cTQ00+2h0v+zEaKBprkNJ
5O1m8xipZSoVU2xqAVPiB/wVx+Bfw98M+Gdam8X2GpaP4qs9W1O1vbLUtO8lLLS0DXlzmW6j85VcrEI7
bzpnk3hYyIpWT1D4QftVeB/jNY+F47DxD4fs/EXi3TBq1j4bn8QaXdaw0HlJKWEVndTpIFjlicvDJIgW
RDuwQa8v1X/gn7feOJPFureJvHVnceLPHWg+IdF1q60bw2dN0121TTtL02OaC1e6mePyLfSrclZLiUyy
O53xII4k0/G//BPvRfiB4l1rUL7X7qI694htdbu3t7CNLkpD4Zm8P/Z1mLE8xzyTq7KQrMybGBLEA9FT
9q34VyaLYakvxQ+G7adq18+l2N2PFFh5F7dpLHC9tE/m7XmWWWKMxqSweRFIyy577oxBGCOCPSvjzwv/
AMEmLWw+GN94e1bxdpF9cXHgnxJ4Hh1C08OXSTeRq9rptsLqb7XqN2zzwx6cgxE0MTiTaEhCgH7AhXy4
1Us0jKoG5urYAGfxxQA+iijNABRRRmgAooooAKKKKACiiigAooooAKKKKACiiigBuOaMYp1I3WgD4x/4
LuNs/Yk0wn/odNK/lPXwtp82+BdvpX3J/wAF5+P2HNN/7HTSv5T18C2Vy0UC7W7DvX8p+PlPmzWh/g/V
n8S/Sbo82dYf/r3/AO3M6a38wt1q0EfH3hXPQ30hH3v1q0LpsdWr+fZ0Wfy3PDtM/ny+zyFsbG/Kg28g
/hP5V3w8PQlv9UOnfvQPD8ZP+r+b3r/Rz+1I7WP9ZP7Xh2OB+zyZ+6fypRbsByrflXe/8I7E2f3ZyvWk
bQYw21UyG9qP7Sh2K/taD6HBGJhzhvypoB9DXoH/AAj8IbDR5yPyqEeGIH/5Z/p1o/tKHYf9q0+qOb8K
eAdc8fXU0Gh6PqWsTW6eZKllbPO0a5xuIUHAzxmv3o/4NIPHGh/sw/BH40WfxK1zRfh7d6trmmy2MPiW
/i0mS8RLeYO0azshdVJAJXOCRX5e/wDBPLQ49M+IfiHywVWTTUU/9/lr9Mf+CCv7KHhv/gpp4Q+K2ofE
qbWrOfwTrVtp+nDQJ47RXikjlZvN81JdzZQYI2jrxXnvNsTUxMqGGhF2Sertv8mfuOTcJ8LLhrCZ9nmM
q03iJVIxjTpxn/DlZ3blHc/S/wDa0/4K4fC39mnwdZX2hahpfxS1TU2lit7DwzrtncLbsiqQ1zIruYY2
zgMEYkqcA4rz/wDZ3/4LH2/ijSPD918RLXwDpsPia6ggEmi+I4Y5/D/nXQtwL61u5BJ5cYYSvPGxxHuY
xIFJOL8Y/wDggp4Ct/Ak1x4C1LxZceI7WRJo7PVtXgW31GJTmS3Ei248mRxwkhDKrY3DBJHh/wCyn/wR
s1b42fHTxFeeLtM8WeBvhPpEpt7KDUjHB4g1SbywCq4DxrHHJu3S7Sr4Aj3As41q1s2q2o0acISj77k5
NqUVaPs0raSu1K9tk+l0Ecp8Oac/a1MxxMov3VFUIKz1fO37TbS3a7XkfpEf23PgsuT/AMLg+FvHJx4r
sGPHpiXOa5Xwd/wU1+BnjSw8M3Fv8RvDlinii1mu4V1K+hsZNOEQQmO8SRwbWRt42RygM5DY6GvnP44f
8ENvht4S8APfeEbX4teKNYhvLXOm2Gp6Q9zcW5nQT+WLxrKAN5RfDPONpwQkhGw8T4P/AOCJGn/EbV9e
u49H+JHw70+2XbpmneNLzRrme7doVCnztJvLtTGkqSM29YnImRVB2M5v2+a/8+of+BP/ACKjlPhxbXMM
T/4Ih/8ALD7T+IP/AAUQ+CHw48IXmtXXxR8E6nDZ+XutdH1m21K+k3uqDy4IZDI+N244HChmPAqfxR/w
UA+CfhW2tZJPip4BvlvL2CxUWGv2d00TSuEEjqsh2RLnLyNhUGSeM18yeHP+CAXw+gTwz/a3ivxNcNb2
co8QizljiW9uiqbDa7o2MMSt5uRJ5jMNnKndnmo/+DfPT08V6SzeP2k0NJEbVI/sbLeTItxJuSBs7E32
7RLudW2SRswDK4VT6xmv/PqH/gT/AMh/2T4cdcwxP/giP/yw+0v+G2/gv/0WD4Wt248WWH/x2qOmft5f
BnUfDkOoN8UPh5aNNbi4+xXHijTkuoyV3eWyicr5nbAYjPGT1r5N0z/g358Kx6VZreeNtWmvVsdHju5I
olSOW6juGbVpEUglY57faluhJMEgLu0wOwR6L/wb7eHYNKtV1Dx1qM98rWZuJILcRxSBYCLvap3FfMn2
vHknYgKtvPzA+sZr/wA+of8AgT/yF/ZPhz/0McT/AOCI/wDyw+tP+G/PgnHo1neXHxX+H1v9uMKiA+IL
OWeBpcALIkUr7NpYb3J2LgksFGa0P+G2PguT/wAlg+Fv/hV2H/x2vimT/g35tTFcbfG8AeG2sVti0MhF
zOrRG9aUfwI6iZYlTJTzELF9pDXNS/4N99FOq6H9i8dXS2Ed3I2si4gLTTW321XjW2I+VJPsYaFmkDDz
SJQMDyivb5r/AM+of+BP/IP7I8OP+hjif/BEf/lh9gaP+3h8Edd0q2vLf4vfDZYbuNZY1uPEVpazBWGR
uildZEb/AGXUMO4FWh+218F8/wDJYPhb/wCFXYf/AB2vivTf+DfWxS+0D7Z48WS1jl2655NqyS3ESz7g
9tnKxySQ5jZZN6o/zqWHyVtav/wb/wDg8fDG3h03xdrH/CZR3CPLdXbA6XPEJiWQQoglRjD8obzDhxu2
kfLT9vmv/PqH/gT/AMgeU+HF9MxxP/giP/yw+uv+G2vguP8AmsHwt/8ACrsP/jtc7r3/AAUj+B/h3xfF
o8nxJ8KXOdNm1Sa/s9UtrmxtY4zjy2lSQ7p3w2yCISSNjJUbl3fJVv8A8G+ltb65oe/x9Fc6XBZwf2uD
aPFcXd0ttIkwgIJSKF7gxSLuDuiB48sSJBZ03/g340lvC+ofbvHEq67LYH7F9mhb7DbXn2iRgXDDzJID
B5KEAq+8SPnBVFPb5r/z6h/4E/8AIFlHhxfXMcT/AOCI/wDyw+stK/4KL/A3W/EEen2/xR8Fr51pJeLd
XGqQWtqAk3kmNpJWXbKTllQjLIN4yuGO5/w238F8/wDJYPhbzz/yNlhz/wCRa+MdD/4N9tLGgXA1Tx5K
2rSQXHktZ2pW2gma5DQZD5d0S3zGwyC8mHBUfJVjWf8Ag398Ppc6NJpvjK6kjjv7w6tDeqV+0Wb3G61E
DxrmOeK3Gxy4dJXJcCMDYT2+a9aUP/An/kOWU+HHTMcT/wCCI/8AyZ9jf8Nt/Bf/AKLB8Lf/AAq7D/47
R/w258F/+iw/C3/wq7D/AOO18oeCf+Df/wCH9ld27eIvFnibUYF01I51094rVpL7zXLzKWjcLCYzGojI
LBlY7yCAOl/4cIfA3/oK/Er/AMG9r/8AItHts1/59Q/8Cf8AkT/ZPhz/ANDDE/8AgiP/AMsPor/htz4L
/wDRYfhb/wCFZYf/AB2gftt/Bf8A6LB8LP8AwrLD/wCO186/8OEPgb/0FfiV/wCDe1/+RaX/AIcIfA7/
AKCvxJ/8G9r/APItHts1/wCfUP8AwJ/5C/snw5/6GGJ/8EQ/+WH0T/w238F/+iwfCz/wrLD/AOO0f8Nt
/Bf/AKLB8LP/AArLD/47Xzt/w4R+B3/QV+JP/g3tf/kWj/hwj8Dv+gr8Sf8Awb2v/wAi0e3zX/n3D/wJ
/wCQf2T4c/8AQwxP/giH/wAsPon/AIbb+C//AEWD4Wf+FZYf/HaP+G2/gv8A9Fg+Fn/hWWH/AMdr52/4
cI/A7/oK/En/AMG9r/8AItH/AA4R+B3/AEFfiT/4N7X/AORaPb5r/wA+of8AgT/yD+yfDn/oYYn/AMEQ
/wDlh9E/8Nt/Bf8A6LB8LP8AwrLD/wCO0f8ADbfwX/6LB8LP/CssP/jtfO3/AA4R+B3/AEFfiT/4N7X/
AORaP+HCPwO/6CvxJ/8ABva//ItHt81/59w/8Cf+Qf2T4c/9DDE/+CIf/LD6J/4bb+C//RYPhZ/4Vlh/
8do/4bb+C/8A0WD4Wf8AhWWH/wAdr52/4cI/A7/oK/En/wAG9r/8i0f8OEfgd/0FfiT/AODe1/8AkWj2
+a/8+4f+BP8AyD+yfDn/AKGGJ/8ABEP/AJYfRP8Aw238F/8AosHws/8ACssP/jtB/bb+C/8A0WD4Wf8A
hWWH/wAdr52/4cI/A7/oK/En/wAG9r/8i0f8OEfgd/0FPiT/AODe1/8AkWj2+af8+of+BP8AyD+yfDn/
AKGGJ/8ABEP/AJYcd/wWv/aT+HvxT/Y1sdL8J+PvBXijVY/FumXTWWka7a31wsSedvkMcUjNtXcMtjAz
zXxLoGu2esywW8N9pslxMQiRLex+Y59Auck19Df8FNv+CXvwz/Y3/Zws/F3hS+8YT6lceIrHSnXU7+Ce
ERTeZvIVIEO4bBg5I68V8mJ4LsfBPx48I2dg1w0Nw9tcN5zh23NM6noBx8q1+CeKuDWMx8Y4z3KsaUpJ
LVNRu9Xp+R+b8WfR58O+PsZUeEzPFLEUcPVqRTowjBqnFzs5c8mm3oe06T8PbmZVaSRY/UAVrD4atj/W
vXfeGNOt0VXdNxAxXRDUbcD/AFX/AI7X8iYnOqynaKP4ho+D+XuN2m/W5/POPCZY4/iXtihPBzOTgcY7
mvVB4Ihx056j3FA8FxbmEaq3HGRzX+lEuG84jtA/V/8AWLszyxvB7OuT2604+D5G6LuVueO1eor4LUYX
1OQM0jeDm8w/xN09MVyyyPOY70mL/WK/U8w/4QmRvuq0mDxxTD4Lm5xGQ3Tnsa9Pm8IzAghWYrj8TUba
U0StvhI9BjrXl4inmND+JTf3FLPpPZm1+xVoUmkeOdYZkK7rFRz/ANdVr9T/APg1hS58OfBf9oOSN2hm
bxPppDDrgxT1+bv7N1v9n8Tah97/AI9wOR/trX6c/wDBtMu34KfHj38Q6Z/6LmquHsVOWYtSW6/JH9QV
8dKr4ccOt/aq4v8ACSP0sPjPVv8An/n/AE/wpD4z1Y9b64/T/Cs7NJxX6IfJmhN461K0gklk1KSKKFS8
juyqqKBkkkjgAZOTXIeAv2tdD+J1p4Rn8P8AiqTUofHVrcXmgtHazL/aEVuE85sNGDGU3rlZArHPAODj
G/aR+HOs/GD4J+IPCeg6rbaHd+JIBptxfyqWNtaSsqXRjUKd0pgMioGwu5hkgCvB/E37CHjTVG1azvPE
Wg+LtFlk1y4sYJ5z4dl/4mlvZLJat5FncwxQC4tp5MiKbclyUaMgUAfY6+JtaeRkW6uy6csoXlfrxQ3i
bWgqN9pvNshwp2/ePtxXyH+0h+xr46+NH7I3gLwDp83w503WNAtAmoNbQDT7HTbpLRo7efTSLCYxLbzE
ELFFayOoBSW1Py1S8Qf8E+/ELX/iPVtJ1Tw7BrnihfFSaxLLe3sY1+G/1201HTrO5kRC4gjtobm3faD5
X2uXy0lWSQMAfWXhL4wSeO49VbSdWubxdD1CfSb4iB4/s11AdssZ3qM7T/EMqexPWtg+I9bVWJuLz5cF
vl6Z6dq+F9C/4JzeLtK8Y+DNUx4NstI8P+JdU1xfDGjeIJrKy0H7Ve29zBLZXEulTu8kMcTwbY4rIsjY
WaJCY6f4e/4JreJPCPiD4U3kGoaDfJ4N8PW1hqCxazJpzWerK8jXeqW7Np11LdG7WREmQS2LulrEjyyI
QkQB9a/GL9puz+A2n6XceJdS8RRnXNQGl6fb6X4e1DXLy8ufs81z5aW1hbzznENvPIW2bQIzkgkA7/hH
4oT+PvCema9ousNqmi61bRXlhe2x3w3cMqB45EbHIZGVh7Gvl3xz+xPrCfsyfBXwX4btdCnvPhnqMOoa
pbR+MdW8Ix6o50jULO5eLUtOgkvEeS4vfOYlB5o8wOfnIPA+If8Agmj481PWNXebxZouuT6h4Fh8KWes
i+OgPpDJpS2T28djb6fK32N50Nyqw39ukTzFhbu8YdwD7wfxNrUb7TdXatkDBXnJ6dqp6B8R7zxXaXFx
pmrHUILO5msriS2dZVgnhcxzRMVyA6SKysp5UqQa+O/iR+wf420rRfF2m/Di58E6Zo+v6f4p0LS9Lu9U
vdPtPD1prNlpai4iWG2m3SxXdhcSeQoRSLxnEytuRuZ1z9kzUPg18XPDNpY/BPwD4s0OX4g6l4xk1zSm
kt9Qthc3KyW5lI01/KMDSMzRLNidbWEGVEMkRAPvZvEmtKObm8Hy7+V/h9enT3oHifWTGr/arrY3AbHB
/Svif9ln/gnPr/wg13wjJ4uvNB8QL4Z1mbWL68OsPfN4ivfshgi1R7X+zrVILtpQkz+bNeSbwrfaZGjQ
m98Vf2IPiB47/aR8eeOLHVvB9jDrWmpa6akdy9pLqJgutIu7WK+ENj5ihH0+6iM7XF2Ql2pjhj2vG4B9
f638Qr7w1oF9qt/qUlnpul273l5dSkLFbQopd5HYjAVVBJPoK5rS/wBqPS9V8P2OpL4ivLWDUtN/ti2h
1CwuNPvZLTbI/mm1uIkuFBWGVgGjDEISB0z8n+Pv2AvHPxYjvJPEFh8Lbq+17/hKvtsl9qlxrFtpMWq/
amgt7OGfTFbzFaWFZLtJbchEdfIlG1R0esfsWeNNL1e00XwxP4J03wP5+mX0iDULu1msGs9Dn0trO3s4
7UwtC7tFN5hmjI+ceUSA5APq/wAMfEq98Z+G9N1jTNQurrTdWtIr+0nERTzoJEDpJtZQwBUg4IBHcCtA
eIdcLbftF5uxuxs7evSvjf4a/wDBOWXwHrfgq387w6vhfw7qOkazfaek1zMLrULTQr+wnvNki7ZZnu57
ScNIcv8AZ97/ALxVB4f4b/8ABKnxBp/wug8N+Krzw5q8lrY6t59zJrs95DrerXFhDb2+sSW6adaCC4E8
K3D+Y13KsixyC4lkjVgAffX/AAmGqf8AP9P+n+FH/CYap/z/AE/6f4VzvhOxutK8K6Xa6hcLd6ha2UEN
1OCSJ5VjVXfJwfmYE8jPNaG6gDS/4TDVP+f6f9P8KP8AhMNU/wCf6f8AT/Cs3dRuoA0v+Ew1T/n+n/T/
AAo/4TDVP+f6f9P8Kzd1G6gDS/4TDVP+f6f9P8KP+Ew1T/n+n/T/AArN3UbqANL/AITDVP8An+n/AE/w
o/4TDVP+f6f9P8Kzd1G6gDS/4TDVP+f6f9P8KQ+MdVH/AC/T/p/hWduprGgD5Z/4Lp+Kb0f8E61upJHu
Jrfx1o4Qt2BE2a/N2z8dy33xK8O6pNGd2nmAbR6LIzf+zV+jX/BcKNpv+CcrKv3j460bH5TV+Z/2OWLx
Rp8XzeY3l7ccEncen5Gvw3xKp05ZpFS39lL7mmf0t9HzK6Vepiqk1q6VWPycNT7C8A/GXTdYjRGfY3TD
DBJrsP7ctW585ef9oV8teHPDepSsrZkXAztzXTro+rBR++m6f3zX8g47h3De1bp1LHyOL8KMrlUcoXjc
+ARZ5A+U8dB6VJHYc/dbr6VoJZuyLuKrt5HHWnNDI68gZBHSv9xv7PodvwP833X7Mox2vK/Ju9M057L5
cbcZ5x6VofZm3Lt/nUhtWI5bhTxkVX9m4dvZfcZyxFjLW1DS7mzjqOKjfT1cYx37jrWyto7f1PrTxab8
Buvv3rGeR4OatKK+4n61Y0vg/YC1127YcFoBwB/tA1+on/Bsp4bt774dfG63miaSGTW9OZgGYbiIp8cg
1+Xfh3VDoF1JIsKzecmwgvtwM5yeDX2f/wAEyf8AgnxH/wAFFNB8ZXk3jCTwZ/widza24jj0oaiLrzkd
s586LZt2Yxg5z2r8E4w4Vx2W5piMwwuF56MlBRlzRVnaz0vfV+R/a3hxnfBWe8GZRkGZ5v8AVcXhZ4iT
h7CrUuqkrr3ox5dtdz9sf+Fb6T/z5t/39k/xo/4VvpP/AD4t/wB/ZP8AGvzw/wCIda1/6LLdf+EkP/ky
j/iHWtf+iy3X/hJD/wCTK+O+vZh/0C/+TxP0L/U/gn/ofr/wlrH3r8RF8F/CTwVf+I/E00Gi6Hpaq11e
XE03lwhnVF4GSSzsqgAEksABR8O08GfFrwrb654bmh1jSbp5Io7iGWYDfG5SRGVsMrq6lWVgCCCCK/NX
9oj/AIIYS/A74Qar4m0v4h694s1DTzCLfSdP8CX15PeM8qIQEsWupxhSzbhCyjb8xRcuOJ+Ef/BGzxh8
YtE0bWLHUtZtdPur+ey1iHWPDOoeH9S0cq0TRSrb6nHavdo0MhZniGwSIyI8hVyp9ezG/wDuv/k8Sv8A
U/gi3/I//wDLasfrR4M0jwn8RfCGl+INCaDVtE1u1ivrC9triR4buCRQ8cqHPKspBB7g1pf8K30n/nyb
/v7J/jX5S6z/AMEEPiZYeHbS4s9d0LUNQbT7GW6shIIRDdyeeLuBJGba8cG22KykKZRNJ8iGNQ+gv/Bv
/wCPn07d/wAJloMd6brytjxP5Kw/2X5xlLqxbjUv9F2BSfI/0gHP7ij69mP/AEC/+TxD/U7gi/8AyUC/
8Jqx+nGi6L4V8R6vrGn2DQXl94eukstTgiuJGexneCK4SOQZ4YwzwyY/uyKe9HhXR/CfjjTZrzR2t9St
be8utOllt7iR1S5tZ5La4iJz96OaKSNh2ZCO1flXZ/8ABCL4sNoMd5dXOkR3Lal5D6bFexPcLZm1jYXH
mFhCZBc+bEYt3+rRJAxLGNd6D/g3/wDHUj3wfxho8ax3ES2eINxuIm1OWKWRxv8AkZdPEF0Fy26aV4Mg
IJnPr2Yf9Av/AJPEP9TuCP8AooP/AC2rH6kf8K30n/nyb/v7L/jR/wAK30n/AJ8m/wC/sv8AjX5m69/w
b1+IIPF0lrpfxJ0+60U6PPcRahd6U1vJ/aSughtWhWZ8QuhdmnDkpsAETZyOe8L/APBA34hato0Vxqfi
LSdFu5PtW6zJW6aHZbo0GXRwp8248xDtz5cYRzuLGNT69mH/AEC/+TxJ/wBTuCf+igX/AITVj9MfHGqe
AfhnP5XiDUdP0eT+zbrVwl1dyIzWlq0KXEwGeVja5t1OOd0yAAlgK3rbwBot5axzR2btHMgkQ+ZKMqRk
HBOeh71+Y/iH/g318WWulWr6X4+0u+vZNEubqeK5sDbxw6mgtzb2auJW3QyFrjdcYHlmGM+W3mfJjf8A
Dg/4jS6xrUP/AAkGjx2dpF5mm3Lsv/Ezdni2xsgctCyo0xdm3LujUJvVy6r69mP/AEC/+TxK/wBTuCLf
8lB/5bVj9Vf+Fb6T/wA+Tf8Af2X/ABoHw20kn/jxb/v7J/jX5M/Hr/giH4s+Cvwn8X+LIvFdnrVv4XtN
Uv47eKyZJr6G3tvMtcKJGIeeXMbIN3lD5gZCdtTN/wAEGPii9ro8yapoqtf3bx30MlynmaTbiWAJMxDF
ZmeJrl9kZypjhUn947Rv69mH/QL/AOTxD/U3gn/ooF/4TVj9PNW1n4f6Gtq91qWnxw3ssEFvOLqR4JpJ
rpLSKNZFJQu9w6RBQc72xin+J7/wL4K1eHT9WuYdPvLh4o4YpnnBneVZ3RE7O5W2nO1ctiJjjpn8xL7/
AIILfE+20S6ktdY0Wa8t5mWK1adY1vEF7GnmK+4hN1oZJwrgESIIjgP5ouWH/BAr4iS29i1x4o0S2aWC
CWePBkazkc3fmxZ3YYxrHY/Mpw7XU+MCAGWfr2Y/9Av/AJPEr/U7gf8A6H//AJbVv8j9Mp7rwFZ6FNql
xqmi2en25VZ7i61T7PHbM0KzhZDI48tjCyybXw2xgxABrWsPBnh7Vkma0SG6W3me3lMN00gilQ4eNtrH
DKeCp5B4Nfk/4n/4INfFiz0y8bTb3w/q14rQeRHJeLbw3G+xLyMzMWK+VeDyD8pLwkSryDCNqT/ggZ47
HiM2UfiC0ls5NZW2TUAsSx/2eShN40Zm8zzADIPJAOWQYfa24P69mP8A0Df+TxE+DuB7aZ//AOW1b/I/
U7/hW+k/8+Tf9/Zf8azfEui+FPBlrazas0Gnw317Bp1u89xIomuZnEcUS88s7EKB3Jr8mv2aP+CKvjz4
+/C/wv4t1DWbLwtpviWDTb5YZo/tF1Fa3EMks8pj3rhos26LE5V3Lyk7Ai79eT/ggx8Uo9I1WT+1NBkv
LG7hhsrcXKhdWhMzCaZHLYiKw7XVJQCzllJRRvL+vZj/ANAv/k8RLg7gjrxAv/Casfqdb6N4UvPGF74f
iaCTXNNsrfUbqxFxIZre2uHnjglYZ4V3trhVPcwv6Vpf8K30n/nxb/v7J/jX5Tan/wAEEviZZ+HYry31
zQ76++zWMsunpIIpDJJJcC6hSV28stBGto6sxVZTNMoK+Upk2dN/4N/fF11JAbnxtYWccl1IsgNmJJIL
cWYkjfibazm6JgKA4CDzQzZ8uj69mH/QL/5PEP8AU/gn/ooF/wCE1Y/UD/hW+k/8+Tf9/ZP8aP8AhW+k
/wDPi3/f2T/Gvyjj/wCCC3xOXUZLeTWNFaNrG2uIbuKZTCtw0cZuLaRGYSDy5DMEkRWWRUjY7C5VO68N
/wDBvJeX39o/2t8VF0/yb6WKy+z6ALr7VajHlzP/AKSnlu3OY/m24HzHNH17MP8AoF/8niL/AFP4J/6K
Bf8AhNWP0i/4VvpP/Pi3/f2T/Gj/AIVvpP8Az5N/39k/xr88P+Ida1/6LLdf+EkP/kyj/iHWtf8Aost1
/wCEkP8A5Mo+vZh/0C/+TxF/qfwT/wBD9f8AhLWP0P8A+Fb6T/z4t/39k/xo/wCFb6T/AM+Lf9/ZP8a/
PD/iHWtf+iy3X/hJD/5Mo/4h1rX/AKLLdf8AhJD/AOTKPr2Yf9Av/k8Q/wBT+Cf+h+v/AAlrH6H/APCt
9J/58m/7+yf40f8ACt9J/wCfNh/21k/xr88P+Ida1/6LLdf+EkP/AJMo/wCIda1/6LLdf+EkP/kyj69m
H/QL/wCTxD/U/gn/AKH6/wDCWsd//wAF8PDlrof7ANrHawtDHL410hm+Ytk/vx/Ea/MS4tzb/FLw4GX7
/kHB7/vHFfQv/BRT/glXb/sDfs8xePD8QJ/FSSa1Z6O1k+h/Ygv2jf8AvN/2iT7uz7u3nPUV4L8PfANn
HrdhqC6t5jW8qTCPyPv4OcZ3f0r8V8SsWqeNWIxq9nL2cko/Fe9+q0R+4eFOH4XyTDYivgs0+sc0ZxX7
mpDWUbJe8u57t4V0AysAqe5NdJ/wja/3krmdG8WpEqov8OPmrok10MgO/qPWv5IxUa/Pc8KWIkmfmzIj
FmLKOnQetNy6jBHzZ6AcGmvq0cifK3HFNkvEJ++v59K/6RK3hZUesJM/yKjGXVDhdNuB2sPYdqd9q4I2
v7k9DVf7YN33/vetRyTgfLle5rysR4XY1fBK5p7O/QvJernkLtU45qT+0od304OBjbWWLraM4XP1qOS5
XDfLnPvXg4jw7zeHwq/yD6unobQv4d20t97+Kv1o/wCDaORZfAnxd24wuo6aPr+6nr8eUuY1/wBnnP0r
9eP+DYh1f4f/ABi2MzD+09N69v3M9fmPiNw3meByadXEwtFOOvqz7nw7w/JncJeUvyP1KxRiiiv53P6L
BV3OqqMsxwAOpqj4c8Sab4y0G01XR9Q0/WNK1CITWt7Y3CXNtdRno8ciEq6n1UkVxf7Vei+MPFX7Pvij
RfAMcDeKvEFp/ZFpPPcCCPTkuWEM12zEg/uYXkkATLlkUKCSBXzGn7Lfx40Lwtd+CdLmbwj4Z0E+Ir/w
+/gLxCNLtJTcWNvNpVofNkW4CwakLoYKpEYzErlo2lUgH2dqPirSdG1az0+81TTbO/1Ld9jtZ7qOOe72
7d3loxDPt3LnaDjcucZFZ3w2+LfhL4zaHNqng3xV4Z8X6ZbXUljNeaHqsGpW8VxHjzIWkhdlWRNy7kJ3
LuGQMisTXPhRpvxK8EaTdeMPDen694lsdEe2dJCqSJNPboLqGORWCx+Y6hdwbAwDkAAj5H8M/AH4zaV8
RvC/i+HwN48vLfwN4b8S+GvBum6z4x0rT9YtYZ7TSnsI9ZfTb4Wk1uJ7O6gSaBprgRixadTIjXAAPvPj
Ht6mqGn+KdJ1fV77T7TVNNu9Q0vb9stIbqOSez3bgvmxglo87WxuAztPoa+ANe/ZA/aC+Nf7L2teGPG1
58RLj/imfEKWGm/8JhFp9zqF5JfWz6bBdPFql0ZGFsLlF8++miXIEkv3cfbfg74fad4N8O3ms6F4ZbTv
E2saVD9oTUrtWv7ueOEmGG8ukklEkiu7K8qySAszuHfO4gHZZH9Kq6Vr2n68Ln7BfWV99juHs7j7NcJN
9nnTG+J9pO2RcjKHDDIyBmvgvwZ8Bf2qPFXws1a21vVviJ4bvobDxLf6NaweL7eK6j1JtO0dtJtppv7S
vpJIF1GPUyoku3Qp/rBFDKLcY8GrePl+KfxE0j4Y+Orqz+JHjLVPGKRaPPqK/wBlW1x9jjksZI4PliSY
XEF1+9LeYNxDyCMRBAD9AtQ8d6DpPjDTfD13rmjWviHWIJrrT9Kmvoo76/hh2+dJDAzCSRI96bmVSF3r
nGRWrnNfnHqv7BHxT+JHhLxNrfiSx+LGpa5N4f8ADttaWd34yi0/UrttP8Tz6jNaKItcvIfMS1KtDNcX
x+eQAyxnO30Ffg/+0h4h+MnjiHUda+Ien+H9Y8R6abG4sNas7e1i0IavaO8cM/8Aass8V1Hpgnim8rT4
DK4lYT3MnlSuAfbiMUYMpKsOQRRivPv2XfD3izwj8F7HSvGtzqF7rmm32o20dzfXqXt3cWK39wLF5plJ
8yQ2f2cszHeTkv8APur0GgAxQBiiigAxRiiigAc+YxZssx5JJ60bc0UUAFGKKKADHFGKKKADFGKKKADF
GKKKADFIcClzzSH5qAPgT/g5Ovk03/gmxHNJu2r410YEjqMtMK/KP4beMNsEbR3W/dgjnkYr9Zv+DjTS
l1n/AIJzw28n3ZPGmkfp59fkfpnw1tbGFfLRl75BxzX4T4syoSxNOFW9+X9T4ziLxkxHB2IjhKceZTXN
+n6HtHhvxbLNHH5jKenA4NdWvikhf/sq8GttKvYTGtvNMvl8j5sitdbnXgP9cv5V+AYrJ6U5XUkcmH+l
fSt+/otP1PnJvD8ygjpn0BoOgSjP3ua9Pfw7GDkbTt9qi/4RzH931r/qB/tKL3R/Myz655lJosir1aoT
pskZ6tnvxXp83hjzQeF/Ks+58JhvbpzitI46k1Zo3p53F6M85lgkjU4ZvzzVO6nmVT1r0S48KqrH5Vx6
1RufCikn5F9vcVvGph5dD0KOa0up5zeajcRHo30xX7Ff8Grl9Je/Db40GTqur6aBx/0wmr8qrzwhG279
2v1xX61f8Gw+krpHgH4xKq7d+p6a2P8AtjNX4X9JCnR/1Hrygteen/6Uj9G8P8dRq5rCMVraX5H6l0UU
V/m4fvRV1rWrLw7pst5qF5Z6faQgF57qZIYo+cDLsQo545PeqsfjPRpvDr6xHrGkvo6gk3y3sRtAAcEm
XdswDxyeDx1qj8XIon+GHiCSXw1D4yNrp091FoclvHcDVpYo2kjtwknyFndVUbuASOnWvGZvhb4h/ZX/
AGYbrSdD8I+FPH2gaL4beV/CNj4fd77xBr80xlmkz5v2f7K88jO0fkF1UEhzgLQB7ponjLRfFG06brGk
6nuDFfsl5HcZC7dxGxj93cuT23r6jOpivz28R2/i79lT4G+Gr34b6H4o8HRTO/8Awl2rP4IsbHUNS1/U
/E/hiKSa3trmNiqz29xqccEKERKkUadYISv1/wDsk3XjK9+CNnJ46m1y51ltR1H7NNrlpbWerzacL2cW
L3sNtHHDHcNaiIsqRpjK7lVtwAB6Tt/+t7UbeKWigBNv+FSNdSvHsaWRkxjaWOKZRQAhXP8A+qjbzS0U
AA4ooooAKKKKACiiigAooooAKKKKACiiigAooooAKKKKAI5ZRDC0jCRlRSxEaF2OOcBVBLH0ABJ6AE1R
8H+L9L8feGbLWtF1C11TSdSiEttdW7bo5V6fUEEEFSAykEEAgir01xHbQvLLJHFFGpd5HYIsajksScAA
DkknivJfgLp9x4l+JniTxtocM2g+A/EkYe3sJoireIb3cC+tLE2DapImEAA3XAAmdVO0s4q7f9f1cHsf
PP8AwcJAN/wT/tc/9DnpP/tevzH0LRlu4VPsBX6af8HDP/KPm1/7HTSP/a9fmn4SJjtY/pX84eNEnHHU
nH+X9T+S/pCNxzKi4/yfqza0/wAKeWQ23j6VoDw6v/PNfyq9pl/sh+YcVc+3x/3TX8+1MTVcj+Xa2Lrc
x8rrdyL91m+tOa+lXozCoPszEc+mCaVbdtp5Pr9a/wCo7liftPLAm/tGXH3/ANOtRvqMnfBz+tMNrIw6
cj9KiktJSo+Ur68VUYwHGECSXUwf7v5VVudQjOOlR3Fsy44OPpVG7t3b+ldNOnHoddKjBssTXsbfxCv1
Y/4NqHEngf4u7f8AoI6aP/IM1fkfcB4+3Tiv1l/4Nk5GfwH8YN3bUtN/9EzV+K/SMp24Grtfz0//AEpH
6b4aUVHO4Nfyy/I/UWijNGa/zgP6UDvUn2C4LbfImzjJGw8V5n+1zpfibWv2dfE1v4QXWpNbeOBhDo17
9i1O5tluIzdQ2s4ZTFcSWwmSN1dGDuu10bDD47/ac/ZZ8K/H7w54Nsfgr8GbHQfCWnxeJr690zWvhLqG
hwretZ2YSa1tbqK0az1R14ttQaJx5seAJSj+WAfoJqegW+v6eYr2xhv7RJY5ilxAs0SyRyLJG+GBG5JF
V1OMqyqRyBVpbaZ41YRyMrEgHbwev+B6V8pfBXRPDN7+0bNqXjn4f+PdY8eXN/Dd+B/FWt+DNRvW0rRX
soPKhXUTbmLSZFKzi5tppLeSSVpN6SGRd3ln7XXwt1m5+PXxZ/4QfwXrPibxR4wsbSW58TXfw+1M3fhc
wT6OIrK21QCODVtKmEXnmwtphJbzR3Dswy5twD7/AEjdwu1WYMcDAPJpuef5+1fDHx3+Hvxn1P41eP8A
wz4g0mT4mr8StB8J6DPqfg7w9deFdKg0uC/8QXWpwNcXV/dxJcNCFgLi4jP/ABMbYbAQC/05+yB4h8U6
/wDs7eHI/HGi6poPi7RI5ND1WC+U77mWzka2F2j42yR3CRpOroWQ+bgM2M0AemUUUUAFFFFABRRRQAUU
UUAFFFFABRRRQAUUUUAFFFFABRRRQAUUUHpQBHLOtrE0jNtSNS7N/dA5JqvoWvWXivRLPVNNvLfUdN1K
FLm1ureUSw3MTjcrq44ZSCDkf41a37Oc7dvOc9K8e/Z6j/tb4keJdc8IL9j+FmqbpbeN13QavqbSkz6h
pyjAhs3G4s/zJdSP5sQjUNLcuOt15A9Fc+ev+Dho4/4J82v/AGOmkf8AtavzQ8Ovi2j+gr9LP+DiA5/4
J7WvOP8AitNI/wDa1fl/oV8beyU5yMDmvwbxbyXF4vE06uHjzJRt+J/J/wBIGm5ZjQ/wfqz0HSn3w1pB
FxXK+GteWcbW7YHFdUske0fN2r+dcfluJw9Tlqwkvkz+WcZRlCdmj4Jn/aLt4Dhrj9KqyftP2sY/12Pq
OtfM19qG6RjuznvVKW7JPWv+njGcRYOh7qim/U/uWn4f4Br3rn0837VdoT80344p6/tS2f8AFMtfLRuj
jrSfam9a8iXGWH/59o3/AOIfZb0TPqlP2orGUfNLH759Kcf2k9NdeZIq+VRctj71N+0se9C40oL/AJdE
/wDEPcuvpc+qJvj1o8p/10bN6Kf8a/YT/g1s8YWvjH4c/Gaa1OVg1XTY2x6+TMa/nUE7fnX70/8ABnIS
fgl8dD/1HdL/APSeavxnx74njjOD62HjTtecOvaR9FwzwnhcBjo16Td0n+KP188UfEvQvBuq29jqWoLb
3lzC1xFCsEs0jxq6oXwitgBnUZPdhWPe/tG+BNM0rT7648VaTb22qa9b+F7UySFWl1SeUQw2ewjcsryE
KFYDnrgc153+1N+0L4a/Zy+Iljq3iq60qzsb7SksYJdRKrCszTyyDkkAEpFIOvfHeuD/AGW/iX4R/aF/
ad/tjw1NpOoaTotpeuklhf8A2iNNQXyA527mVdsV6yrtwB5j4wMCv86MZn1Glj6eWwi5VZ22WiWrbctu
m25+nYX2VScoykvcV2uvZL5s+tY1LMAPm9MUrJtbaVII7Y6V4X/wUnvNQ079iLx1Npk1xbXca2H7yG5u
LXbF/aNqJt0tv++jj8svvaP5gm4jOK8F+IX7QeuLN8NfAfhPVvDmneF7i+8GX0A0WLWtXvPEay+J0j1D
7HqjSqI7W1ht1E63MUjOl0QzRKY/M94zPu0jaxB4PcGlUbzxya+OP2A/jD8VfH2leNhrWoaBb6g3gbw9
rXhXwrNoV/brpNxPo8bPma4vXkmtvtgaN0OyXcDmUGs+/wD24/iZ8SvCl9Ivw6tbPS7m2tfENkLzT9RS
b+zjf2dgsMojmjcXT3n2u4GNqi1jjDxklnYA+1+2e1G3jO09euK/Ovwn8ePj14ZVPE7eJNC8Ya14L0Xx
YdctLjwvqcNveC28RWiRWK2637eXem3ZmiuGaTZE8a+RIA0je0/tMy+PPBv7WHi/xr4cTxdqPh3wn8Nt
NOoaNZJcTW+oWtxfayLyW2hX5ZNQt0itZ1EQaZ0iMShjKikA+qzweh/KkDbhX54SftXfHG1+BV54L0B9
Ps/E+m/D5ILGyufDOqXfijA8IR6gPERvDdJC6f2iTYCAwB/PwTMZAbdtX4hf8FJPi14Au/FRtW+EOqaF
4W8Af2/p97fadqlpeeLbgaV9r/tG0hW5kVrIXAkt5IFd5VMErGYErGQD77zRj2P5V8O+KP8Agoh8TtCP
gmDS4PAfiaLXvGx0ptYg8K6pZ6b4l0dbnS4Jm08NeySQ3kTX865k8+KQWE8pESoymPwD+1F8XvHnxm+I
GuaNpej+LPEGgeBb0WHhCCy1PRrXSr6PVXRbO8kmaVLu9WNFbdCkLSLIqqiKySMAfc27iivG/G/xW+MW
jaT8PJtG+Feg6le69f8AkeJ7ZvE7KmhRGGVgySi2+bLKmZGUBSwj2sXDr7Ghyozwe49KAFooooAKKKKA
CiiigAooooAKKKKACiiigAooooAbJEs0bI6q6OCrKwyrA8EEe9CQrDCkcarHHGoRFUYVFAwAB2AHGKdS
NQB8Gf8ABxtdfZP+Cc0Mn93xppH856/KPwjqn9pxRqzDaoHSv1M/4OYNQj0z/gmR50jbUXxrowJz0y01
fjv8OPHdrEY1WdMcDOe3avUyXK8PjcbShXtq0rM/nLxsy2dfE06sVtG34nsVtftYndG2Np4FX18a3QH3
v0rkIdaWXnzFNTDV+P8A69f11R8D8ixtKNTEUIN26xR/OFTLlJ+8j8wbjpUNFFfqOZfxj+7oAelNTpRR
XAUOoooreICjqtfvZ/wZxf8AJD/jp/2HdL/9J5qKK/MvGH/kmav+KH5o7Mv/AI6P0u+Pf/JXk/7F5P8A
0sNV/g5/yWPw7/2Cda/9D0eiiv4dp/8AIwj/AIf8zsj/AL6/8KPfdG/5C9v/AL39DWxP9zUP+un/ALIK
KK9aOyPTjsjN1b/kG/8AbZv/AEGnSf68f9d3/wDQaKKoZNcf8u/1T/0E1/OP/wAHLf8AylMvv+xX0X/0
W9FFAH7af8Eof+UWnwB/7FDS/wD0nFdF/wAFIP8AlH/8Z/8AsX7z/wBAFFFAHtUf/H7ff9cU/lVLXP8A
kB2f/XIf+gmiigDMn++P96nDpRRQAUUUUAFFFFABRRRQAUUUUAFFFFABRRRQAUUUUAFNfpRRQB+cf/B1
F/yieuv+x10T/wBDlr8H/hj/AMfMP1X+dFFelkf/ACNsP/iR+Y+Iv8OHo/0Po7Sv+PKL6Ct9PuD6UUV/
pjlf+7Q9F+R/J+I+M//Z
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAgIAAAAAAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAA

View File

@@ -1,42 +1,51 @@
Imports System.Net.Dns
Public Class Login
Private Sub Login_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Property userPrincipalName As String = ""
Property BenutzeranmeldeName As String = ""
Private Sub Login_Load(sender As Object, e As EventArgs) Handles MyBase.Load
cSharedClasses.LoggedOnUser.FillWithLoggedOnUser(True)
Class1.CheckDebug()
Try
userPrincipalName = System.DirectoryServices.AccountManagement.UserPrincipal.Current.UserPrincipalName
Catch
End Try
BenutzeranmeldeName = Environment.UserDomainName & "\" & Environment.UserName
' MsgBox(userPrincipalName & vbCrLf & BenutzeranmeldeName)
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
lblInfo.Text = ""
Login()
' Timer1.Enabled = False
End Sub
Public Sub Login()
Timer1.Enabled = False
Try
Dim Addresslistcounts As Integer = Resolve("verag.ost.dmn").AddressList.Count
'MsgBox(Environment.UserName)
Abfrage(Environment.UserName)
'Main.Show()
'MsgBox(Addresslistcounts)
Abfrage(userPrincipalName)
Catch
MsgBox("Fehler beim Anmelden!")
PasswortabfrageLogin.Show()
Catch ex As Exception
End Try
'Abfrage("ZollDE14")
End Sub
Public Function Abfrage(user As String)
Public Function Abfrage(user As String, Optional ByVal txt As Boolean = False)
Dim locGroups As List(Of String) = GetUserGroupMembership(user)
Dim gefunden As Boolean = False
For Each group As String In locGroups
' LblDebugInfo.Text &= group
If group = "CN=SG_Doku_User_FULL" Then
'MsgBox("Benutzer " & Environment.UserName & " in Gruppe " & group & " gefunden!")
Class1.LoggedOnUser.FillWithLoggedOnUser(True)
Class1.LoggedOnUserRights = cBerechtigungen.ReadAll(Class1.LoggedOnUser.BenutzeranmeldeName)
gefunden = True
Main.Show()
'Main.Show()
Class1.GroupUsers = uscntr_Benutzer.LoadAllGroupmembers()
showusersinlist()
ShowMain()
Me.Hide()
'Exit Function
End If
Next
If gefunden = True Then
@@ -44,20 +53,47 @@ Public Class Login
Else
Me.WindowState = Me.WindowState.Normal
PanHilfe.Visible = True
LblInfo.Text = "Benutzer " & user & " hat keine Zugriffsrechte." & vbCrLf & vbCrLf &
"Temporäre Anmeldung mit privilegierten User mit " & vbCrLf &
">Rechtsklick< bei gedrückter >Shift<" & vbCrLf &
"Taste --> 'Als anderer Benutzer ausführen'" & vbCrLf & vbCrLf &
"Sonst bitte bei Sebastian melden..."
If txt = True Then lblInfo.Text = "Benutzer ist nicht berechtigt!"
End If
End Function
Function showusersinlist()
Dim stringi As String = ""
For Each ben As cBenutzer In Class1.GroupUsers
stringi &= ben.BenutzeranmeldeName & ", " & ben.distinguishedName & vbCrLf
Next
MsgBox(stringi)
End Function
Public Function ValidateADUser(ByVal Username As String, ByVal Password As String, Optional ByVal Standort As String = "VeragSub") As Boolean
Dim LDAP As String = ""
Select Case Standort
Case "VeragSub"
LDAP = "LDAP://DC=VERAG,DC=OST,DC=DMN"
Case "IMEX"
LDAP = "LDAP://DC=IMEX,DC=LOCAL"
End Select
'Find valid user in Active Directory
Dim Success As Boolean = False
Dim Entry As New System.DirectoryServices.DirectoryEntry(LDAP, Username, Password, DirectoryServices.AuthenticationTypes.Secure)
Dim Searcher As New System.DirectoryServices.DirectorySearcher(Entry)
Searcher.SearchScope = DirectoryServices.SearchScope.OneLevel
Try
Dim Results As System.DirectoryServices.SearchResult = Searcher.FindOne
Success = Not (Results Is Nothing)
Catch ex As Exception
Success = False
End Try
Return Success
End Function
Friend Function GetUserGroupMembership(ByVal locUsername As String) As List(Of String)
Dim locResult As New List(Of String)
Try
Dim locDirectoryEntry As New DirectoryServices.DirectoryEntry("LDAP://DC=VERAG,DC=OST,DC=DMN") ' ActiveDirectory-Pfad anpassen
Dim locDirectorySearcher As New DirectoryServices.DirectorySearcher(locDirectoryEntry, "sAMAccountName=" & locUsername)
Dim locSearchResult As DirectoryServices.SearchResult = locDirectorySearcher.FindOne
If locSearchResult IsNot Nothing Then
@@ -70,18 +106,68 @@ Public Class Login
Else
Debug.WriteLine("User nicht gefunden!")
End If
Dim locDirectorySearcher2 As New DirectoryServices.DirectorySearcher(locDirectoryEntry, "userPrincipalName=" & locUsername)
Dim locSearchResult2 As DirectoryServices.SearchResult = locDirectorySearcher2.FindOne
If locSearchResult2 IsNot Nothing Then
Dim locUserEntry As New DirectoryServices.DirectoryEntry(locSearchResult2.Path)
Dim locGroups As Object = locUserEntry.Invoke("Groups")
For Each locGroupObj As Object In DirectCast(locGroups, IEnumerable)
Dim locGroupEntry As New DirectoryServices.DirectoryEntry(locGroupObj)
locResult.Add(locGroupEntry.Name)
Next
Else
Debug.WriteLine("User nicht gefunden!")
End If
Catch ex As Exception
MessageBox.Show(ex.Message, "GetUserGroupMembership", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
Return locResult
End Function
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Login()
' Timer1.Enabled = False
Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
If ValidateADUser(txtUser.Text, txtPassword.Text) Then
Abfrage(txtUser.Text, True)
Else
lblInfo.Text = "Benutzername / Passwort falsch"
End If
End Sub
Private Sub CmdVerstanden_Click(sender As Object, e As EventArgs) Handles CmdVerstanden.Click
Application.Exit()
Private Sub txtPassword_KeyDown(sender As Object, e As KeyEventArgs) Handles txtPassword.KeyDown
If e.KeyCode = Keys.KeyCode.Enter Then
btnLogin.PerformClick()
End If
End Sub
Function getLDAPPAth(ByVal DomainName As String) As String
Select Case DomainName
Case "VERAGOST"
Case "VERAG-NCTS"
Case ""
End Select
End Function
Function ShowMain()
Dim main As New Main
For Each right As cBerechtigungen In Class1.LoggedOnUserRights
If right.Standort = "DokuAdmin" And right.Zugriff = "Y" Then
main.BenutzerToolStripMenuItem.Enabled = True : Exit For
Else
main.BenutzerToolStripMenuItem.Enabled = False
End If
Next
main.Show()
End Function
End Class
'userPrincipalName

View File

@@ -49,10 +49,14 @@ Partial Class Main
Me.AnsichtDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ExportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ImportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.BenutzerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.UpdateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.lblCount = New System.Windows.Forms.Label()
Me.btnNeu = New System.Windows.Forms.Button()
Me.ChkDHCPClients = New System.Windows.Forms.CheckBox()
Me.ChkFreieHosts = New System.Windows.Forms.CheckBox()
Me.ChkKompAnsicht = New System.Windows.Forms.CheckBox()
@@ -85,11 +89,13 @@ Partial Class Main
Me.PingToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
Me.PanTools = New System.Windows.Forms.Panel()
Me.btnTest3 = New System.Windows.Forms.Button()
Me.LblDebugInfo = New System.Windows.Forms.Label()
Me.CmdPing = New System.Windows.Forms.Button()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.TimerUhrzeit = New System.Windows.Forms.Timer(Me.components)
Me.TimerUpdate = New System.Windows.Forms.Timer(Me.components)
Me.TimerWillkommen = New System.Windows.Forms.Timer(Me.components)
Me.Panel2.SuspendLayout()
Me.Panel4.SuspendLayout()
Me.PanType.SuspendLayout()
@@ -150,7 +156,7 @@ Partial Class Main
'
Me.LblVersion.Anchor = System.Windows.Forms.AnchorStyles.Right
Me.LblVersion.AutoSize = True
Me.LblVersion.Location = New System.Drawing.Point(868, 81)
Me.LblVersion.Location = New System.Drawing.Point(858, 81)
Me.LblVersion.Name = "LblVersion"
Me.LblVersion.Size = New System.Drawing.Size(42, 13)
Me.LblVersion.TabIndex = 17
@@ -280,13 +286,13 @@ Partial Class Main
'
'LblUhrzeit
'
Me.LblUhrzeit.Anchor = System.Windows.Forms.AnchorStyles.Right
Me.LblUhrzeit.AutoSize = True
Me.LblUhrzeit.Location = New System.Drawing.Point(1061, 83)
Me.LblUhrzeit.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.LblUhrzeit.Location = New System.Drawing.Point(946, 81)
Me.LblUhrzeit.Name = "LblUhrzeit"
Me.LblUhrzeit.Size = New System.Drawing.Size(54, 13)
Me.LblUhrzeit.Size = New System.Drawing.Size(235, 13)
Me.LblUhrzeit.TabIndex = 7
Me.LblUhrzeit.Text = "LblUhrzeit"
Me.LblUhrzeit.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Panel1
'
@@ -310,7 +316,7 @@ Partial Class Main
'MenuStrip1
'
Me.MenuStrip1.BackColor = System.Drawing.SystemColors.GradientActiveCaption
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1})
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1, Me.ToolStripMenuItem2})
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Size = New System.Drawing.Size(1477, 24)
@@ -319,7 +325,7 @@ Partial Class Main
'
'ToolStripMenuItem1
'
Me.ToolStripMenuItem1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NetzwerkeToolStripMenuItem, Me.AnsichtDruckenToolStripMenuItem, Me.ExportToolStripMenuItem, Me.ImportToolStripMenuItem, Me.ToolStripSeparator1, Me.UpdateToolStripMenuItem, Me.ExitToolStripMenuItem})
Me.ToolStripMenuItem1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NetzwerkeToolStripMenuItem, Me.AnsichtDruckenToolStripMenuItem, Me.ExportToolStripMenuItem, Me.ImportToolStripMenuItem, Me.BenutzerToolStripMenuItem, Me.ToolStripSeparator1, Me.UpdateToolStripMenuItem, Me.ExitToolStripMenuItem})
Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
Me.ToolStripMenuItem1.Size = New System.Drawing.Size(49, 20)
Me.ToolStripMenuItem1.Text = "Extras"
@@ -327,47 +333,60 @@ Partial Class Main
'NetzwerkeToolStripMenuItem
'
Me.NetzwerkeToolStripMenuItem.Name = "NetzwerkeToolStripMenuItem"
Me.NetzwerkeToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.NetzwerkeToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.NetzwerkeToolStripMenuItem.Text = "Tabellen bearbeiten"
'
'AnsichtDruckenToolStripMenuItem
'
Me.AnsichtDruckenToolStripMenuItem.Name = "AnsichtDruckenToolStripMenuItem"
Me.AnsichtDruckenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.AnsichtDruckenToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.AnsichtDruckenToolStripMenuItem.Text = "Drucken"
'
'ExportToolStripMenuItem
'
Me.ExportToolStripMenuItem.Name = "ExportToolStripMenuItem"
Me.ExportToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.ExportToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.ExportToolStripMenuItem.Text = "Export"
'
'ImportToolStripMenuItem
'
Me.ImportToolStripMenuItem.Name = "ImportToolStripMenuItem"
Me.ImportToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.ImportToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.ImportToolStripMenuItem.Text = "Import"
'
'BenutzerToolStripMenuItem
'
Me.BenutzerToolStripMenuItem.Name = "BenutzerToolStripMenuItem"
Me.BenutzerToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.BenutzerToolStripMenuItem.Text = "Benutzer"
'
'ToolStripSeparator1
'
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
Me.ToolStripSeparator1.Size = New System.Drawing.Size(177, 6)
Me.ToolStripSeparator1.Size = New System.Drawing.Size(174, 6)
'
'UpdateToolStripMenuItem
'
Me.UpdateToolStripMenuItem.Name = "UpdateToolStripMenuItem"
Me.UpdateToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.UpdateToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.UpdateToolStripMenuItem.Text = "Update"
'
'ExitToolStripMenuItem
'
Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem"
Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(177, 22)
Me.ExitToolStripMenuItem.Text = "Exit"
'
'ToolStripMenuItem2
'
Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2"
Me.ToolStripMenuItem2.Size = New System.Drawing.Size(12, 20)
'
'Panel3
'
Me.Panel3.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.Panel3.Controls.Add(Me.lblCount)
Me.Panel3.Controls.Add(Me.btnNeu)
Me.Panel3.Controls.Add(Me.ChkDHCPClients)
Me.Panel3.Controls.Add(Me.ChkFreieHosts)
Me.Panel3.Controls.Add(Me.ChkKompAnsicht)
@@ -386,12 +405,35 @@ Partial Class Main
Me.Panel3.Size = New System.Drawing.Size(200, 771)
Me.Panel3.TabIndex = 2
'
'lblCount
'
Me.lblCount.AutoSize = True
Me.lblCount.Location = New System.Drawing.Point(13, 746)
Me.lblCount.Name = "lblCount"
Me.lblCount.Size = New System.Drawing.Size(45, 13)
Me.lblCount.TabIndex = 18
Me.lblCount.Text = "lblCount"
'
'btnNeu
'
Me.btnNeu.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnNeu.FlatAppearance.MouseOverBackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
Me.btnNeu.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnNeu.Image = Global.Dokumentation.My.Resources.Resources.Bearbeiten20
Me.btnNeu.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnNeu.Location = New System.Drawing.Point(25, 447)
Me.btnNeu.Name = "btnNeu"
Me.btnNeu.Size = New System.Drawing.Size(151, 28)
Me.btnNeu.TabIndex = 17
Me.btnNeu.Text = "Neuer Eintrag"
Me.btnNeu.UseVisualStyleBackColor = False
'
'ChkDHCPClients
'
Me.ChkDHCPClients.AutoSize = True
Me.ChkDHCPClients.Checked = True
Me.ChkDHCPClients.CheckState = System.Windows.Forms.CheckState.Checked
Me.ChkDHCPClients.Location = New System.Drawing.Point(25, 582)
Me.ChkDHCPClients.Location = New System.Drawing.Point(25, 651)
Me.ChkDHCPClients.Name = "ChkDHCPClients"
Me.ChkDHCPClients.Size = New System.Drawing.Size(136, 17)
Me.ChkDHCPClients.TabIndex = 16
@@ -401,7 +443,7 @@ Partial Class Main
'ChkFreieHosts
'
Me.ChkFreieHosts.AutoSize = True
Me.ChkFreieHosts.Location = New System.Drawing.Point(25, 559)
Me.ChkFreieHosts.Location = New System.Drawing.Point(25, 628)
Me.ChkFreieHosts.Name = "ChkFreieHosts"
Me.ChkFreieHosts.Size = New System.Drawing.Size(122, 17)
Me.ChkFreieHosts.TabIndex = 15
@@ -413,7 +455,7 @@ Partial Class Main
Me.ChkKompAnsicht.AutoSize = True
Me.ChkKompAnsicht.Checked = True
Me.ChkKompAnsicht.CheckState = System.Windows.Forms.CheckState.Checked
Me.ChkKompAnsicht.Location = New System.Drawing.Point(25, 536)
Me.ChkKompAnsicht.Location = New System.Drawing.Point(25, 605)
Me.ChkKompAnsicht.Name = "ChkKompAnsicht"
Me.ChkKompAnsicht.Size = New System.Drawing.Size(124, 17)
Me.ChkKompAnsicht.TabIndex = 14
@@ -424,7 +466,7 @@ Partial Class Main
'
Me.PanNetzwerk.Controls.Add(Me.CmdNWDateien)
Me.PanNetzwerk.Controls.Add(Me.CmdNetzwerkbearbeiten)
Me.PanNetzwerk.Location = New System.Drawing.Point(3, 445)
Me.PanNetzwerk.Location = New System.Drawing.Point(6, 491)
Me.PanNetzwerk.Name = "PanNetzwerk"
Me.PanNetzwerk.Size = New System.Drawing.Size(191, 85)
Me.PanNetzwerk.TabIndex = 13
@@ -436,7 +478,7 @@ Partial Class Main
Me.CmdNWDateien.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdNWDateien.Image = Global.Dokumentation.My.Resources.Resources.Folder20
Me.CmdNWDateien.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.CmdNWDateien.Location = New System.Drawing.Point(22, 11)
Me.CmdNWDateien.Location = New System.Drawing.Point(19, 11)
Me.CmdNWDateien.Name = "CmdNWDateien"
Me.CmdNWDateien.Size = New System.Drawing.Size(151, 28)
Me.CmdNWDateien.TabIndex = 15
@@ -450,7 +492,7 @@ Partial Class Main
Me.CmdNetzwerkbearbeiten.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdNetzwerkbearbeiten.Image = Global.Dokumentation.My.Resources.Resources.Netzwerk20
Me.CmdNetzwerkbearbeiten.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.CmdNetzwerkbearbeiten.Location = New System.Drawing.Point(22, 45)
Me.CmdNetzwerkbearbeiten.Location = New System.Drawing.Point(19, 45)
Me.CmdNetzwerkbearbeiten.Name = "CmdNetzwerkbearbeiten"
Me.CmdNetzwerkbearbeiten.Size = New System.Drawing.Size(151, 28)
Me.CmdNetzwerkbearbeiten.TabIndex = 8
@@ -468,7 +510,7 @@ Partial Class Main
Me.CmDBearbeiten.Name = "CmDBearbeiten"
Me.CmDBearbeiten.Size = New System.Drawing.Size(151, 28)
Me.CmDBearbeiten.TabIndex = 6
Me.CmDBearbeiten.Text = "Host Bearbeiten"
Me.CmDBearbeiten.Text = "Eintrag Bearbeiten"
Me.CmDBearbeiten.UseVisualStyleBackColor = False
'
'CmdFiles
@@ -482,7 +524,7 @@ Partial Class Main
Me.CmdFiles.Name = "CmdFiles"
Me.CmdFiles.Size = New System.Drawing.Size(151, 28)
Me.CmdFiles.TabIndex = 12
Me.CmdFiles.Text = "Host Dateien"
Me.CmdFiles.Text = "Eintrag Dateien"
Me.CmdFiles.UseVisualStyleBackColor = False
'
'LstAllgemein
@@ -497,7 +539,7 @@ Partial Class Main
'ChkTools
'
Me.ChkTools.AutoSize = True
Me.ChkTools.Location = New System.Drawing.Point(25, 640)
Me.ChkTools.Location = New System.Drawing.Point(25, 709)
Me.ChkTools.Name = "ChkTools"
Me.ChkTools.Size = New System.Drawing.Size(107, 17)
Me.ChkTools.TabIndex = 10
@@ -521,7 +563,7 @@ Partial Class Main
'ChKZugangsdaten
'
Me.ChKZugangsdaten.AutoSize = True
Me.ChKZugangsdaten.Location = New System.Drawing.Point(25, 618)
Me.ChKZugangsdaten.Location = New System.Drawing.Point(25, 687)
Me.ChKZugangsdaten.Name = "ChKZugangsdaten"
Me.ChKZugangsdaten.Size = New System.Drawing.Size(141, 17)
Me.ChKZugangsdaten.TabIndex = 4
@@ -585,6 +627,7 @@ Partial Class Main
Me.DgVMain.ContextMenuStrip = Me.DGVMainContext
Me.DgVMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.DgVMain.Location = New System.Drawing.Point(200, 130)
Me.DgVMain.MultiSelect = False
Me.DgVMain.Name = "DgVMain"
Me.DgVMain.ReadOnly = True
Me.DgVMain.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
@@ -670,6 +713,7 @@ Partial Class Main
'PanTools
'
Me.PanTools.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.PanTools.Controls.Add(Me.btnTest3)
Me.PanTools.Controls.Add(Me.LblDebugInfo)
Me.PanTools.Controls.Add(Me.CmdPing)
Me.PanTools.Controls.Add(Me.CmdPutty)
@@ -682,6 +726,16 @@ Partial Class Main
Me.PanTools.TabIndex = 4
Me.PanTools.Visible = False
'
'btnTest3
'
Me.btnTest3.Dock = System.Windows.Forms.DockStyle.Right
Me.btnTest3.Location = New System.Drawing.Point(1052, 0)
Me.btnTest3.Name = "btnTest3"
Me.btnTest3.Size = New System.Drawing.Size(75, 100)
Me.btnTest3.TabIndex = 13
Me.btnTest3.Text = "Test3"
Me.btnTest3.UseVisualStyleBackColor = True
'
'LblDebugInfo
'
Me.LblDebugInfo.AutoSize = True
@@ -711,7 +765,6 @@ Partial Class Main
'
'TimerUhrzeit
'
Me.TimerUhrzeit.Enabled = True
Me.TimerUhrzeit.Interval = 1000
'
'TimerUpdate
@@ -719,6 +772,11 @@ Partial Class Main
Me.TimerUpdate.Enabled = True
Me.TimerUpdate.Interval = 10000
'
'TimerWillkommen
'
Me.TimerWillkommen.Enabled = True
Me.TimerWillkommen.Interval = 5000
'
'Main
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -822,4 +880,10 @@ Partial Class Main
Friend WithEvents ChkFreieHosts As CheckBox
Friend WithEvents ChkDHCPClients As CheckBox
Public WithEvents DgVMain As DataGridView
Friend WithEvents btnNeu As Button
Friend WithEvents lblCount As Label
Friend WithEvents BenutzerToolStripMenuItem As ToolStripMenuItem
Friend WithEvents TimerWillkommen As Timer
Friend WithEvents btnTest3 As Button
Friend WithEvents ToolStripMenuItem2 As ToolStripMenuItem
End Class

View File

@@ -289,6 +289,9 @@
<metadata name="TimerUpdate.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>666, 17</value>
</metadata>
<metadata name="TimerWillkommen.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>788, 17</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAgIAAAAAAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAA

View File

@@ -1,4 +1,5 @@
Imports System.Data.SqlClient
Imports System.DirectoryServices.AccountManagement
Public Class Main
Public con As New SqlConnection
@@ -14,11 +15,12 @@ Public Class Main
Public SenderRubrik As String
Public SenderTitel As String
Public Neu, geaendert As Boolean
Public Debug As Boolean
Public Suchbegriff As String
Public Shared SucheAktiv As Boolean = False
Public Tabelle As String
Public DHCPRefresh As Boolean = True
Public Startparameter As String = ""
Public sAppPath As String = Application.StartupPath
Public Updatequelle As String = "\\192.168.0.91\f\Programme\Doku\"
@@ -33,23 +35,21 @@ Public Class Main
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
LblUhrzeit.Text = "Willkommen " & cSharedClasses.LoggedOnUser.Name
Class1.EnableDoubleBuffered(DgVMain)
Me.KeyPreview = True
'MsgBox(sAppPath)
If sAppPath Like "*\bin\Debug" Then
Debug = True
'If Class1.DBConString = "Server=DEVELOPER\DEVSQL;Initial Catalog=Doku;User ID=sa;Password=BmWr501956;Connection Timeout=5;" Then
If Class1.DebugMode = True Then
LblDEBUGMODE.Visible = True
LblDEBUGMODE.ForeColor = Color.Red
LblDEBUGMODE.Text = "DEBUG "
Class1.DBConString = "Server=DEVELOPER\DEVSQL;Initial Catalog=Doku;User ID=sa;Password=BmWr501956;Connection Timeout=5;"
Class1.FilePath = "\\192.168.0.253\backup\temp_Sebastian\DokuTest"
Else
Class1.DBConString = "Server=192.168.0.94\SQLEXPRESS;Initial Catalog=Doku;User ID=sa;Password=BmWr501956;Connection Timeout=5;"
Class1.FilePath = "\\192.168.0.90\f\EDV-Wartung\Dokumentation"
End If
If Class1.DBConString = "Server=DEVELOPER\DEVSQL;Initial Catalog=Doku;User ID=sa;Password=BmWr501956;Connection Timeout=5;" Then
TimerUpdate.Enabled = False
dbload()
LstStandortLoad()
@@ -69,6 +69,9 @@ Public Class Main
End With
End If
TypeFilter()
ChkTools.Checked = Class1.DebugMode
End Sub
''LISTEN
@@ -90,7 +93,8 @@ Public Class Main
SenderNetzwerk = LstNetzwerk.SelectedItem
Tabelle = "TbL_Netzwerkclients"
PanSuche.Enabled = True
PanNetzwerk.Enabled = True
PanNetzwerk.Visible = True
btnNeu.Enabled = False
If SenderNetzwerk = "" Then
CmdNetzwerkbearbeiten.Enabled = False
Else
@@ -103,7 +107,8 @@ Public Class Main
Private Sub LstAllgemein_SelectedIndexChanged(sender As Object, e As EventArgs) Handles LstAllgemein.SelectedIndexChanged
LstNetzwerk.ClearSelected()
'LstStandort.ClearSelected()
PanNetzwerk.Enabled = False
PanNetzwerk.Visible = False
btnNeu.Enabled = True
PanSuche.Enabled = False
PanType.Enabled = False
TxtSuche.Enabled = True
@@ -163,11 +168,21 @@ Public Class Main
Public Function LstStandortLoad()
Dim ds As New DataSet()
LstStandort.Items.Clear()
LstStandort.Items.Clear() : Class1.Standorte.Clear() : Class1.AlleStandorte.Clear()
SQL.SQL2DS("SELECT NWSTANDORT from TbL_Netzwerke where main='True' order by NWSTANDORT", ds)
Try
For Each dr As DataRow In ds.Tables(0).Rows
Dim b As New cBerechtigungen
b.Benutzeranmeldename = Class1.LoggedOnUser.BenutzeranmeldeName : b.Standort = dr.Item(0)
b.getFromSQL()
Class1.AlleStandorte.Add(dr.Item(0))
Select Case b.Zugriff
Case "0"
Case Else
LstStandort.Items.Add(dr.Item(0))
Class1.Standorte.Add(dr.Item(0))
End Select
Next
Catch ex As Exception
@@ -296,7 +311,8 @@ Public Class Main
End If
ElseIf tabelle = "TbL_Allgemein" Then
SQL.SQL2DS("select * from " & tabelle & " WHERE Rubrik = '" & LstAllgemein.SelectedItem & "'", ds)
'SQL.SQL2DS("select * from " & tabelle & " WHERE Rubrik = '" & LstAllgemein.SelectedItem & "'", ds)
SQL.SQL2DS("select * from TbL_Allgemein left join TbL_Berechtigungen on TbL_Allgemein.ID = TbL_Berechtigungen.Standort where ((Benutzeranmeldename = '" & Class1.LoggedOnUser.BenutzeranmeldeName & "' AND not Zugriff = '0') OR (Zugriff is null )) AND (Rubrik = '" & LstAllgemein.SelectedItem & "')", ds)
dgvfill(ds, "Allgemein")
End If
@@ -334,13 +350,15 @@ Public Class Main
If Not ChkFreieHosts.Checked Then
'AND (DHCP = '0' OR DHCP is Null)
Suchparameter &= " and FQDN is not NUll"
Suchparameter &= " and FQDN is not NULL"
Else
Suchparameter = "IPAdresse is not NULL"
End If
'''ABFRAGE DEFINIEREN'''
'''
'Dim SelSQL4DGV As String = "*"
Dim SelSQL4DGV As String = "FQDN, IPAdresse, Modell, Standort, Type, Seriennummer, QINFO, Info, DHCP, Host, Link"
Dim SelSQL4DGV As String = "FQDN, IPAdresse, Modell, Standort, Type, Seriennummer, QINFO, Info, DHCP, Host, Link, NWSTANDORT"
If ChKZugangsdaten.Checked Then
SelSQL4DGV &= ", Benutzer, Passwort"
End If
@@ -448,7 +466,7 @@ Public Class Main
.Columns("QINFO").HeaderText = "Quick-Info"
' .Columns("NWSTANDORT").DisplayIndex = 8
.Columns("NWSTANDORT").Visible = False
'If ChKZugangsdaten.Checked = False Then
' .Columns("Benutzer").Visible = False
@@ -533,6 +551,7 @@ Public Class Main
End If
.AutoSizeRowsMode = DataGridViewAutoSizeColumnsMode.AllCells
.DataSource = ds.Tables(0)
.Columns("ID").Visible = False
.Columns("Rubrik").Visible = False
.Columns("Linked").Visible = False
.Columns("Link").Visible = False
@@ -552,16 +571,57 @@ Public Class Main
End If
lblCount.Text = DgVMain.Rows.Count - 1
End Function
Private Sub CmdTest_Click(sender As Object, e As EventArgs) Handles CmdTest.Click
frmHostBearbeiten.IP = (DgVMain.CurrentRow.Cells("IPAdresse").Value)
frmHostBearbeiten.Show()
Dim i As Integer = 0
Dim Width As Integer = 0
Dim frm As New frmLeer
frm.Text = "Berechtigungen"
Dim tempUser As New cBenutzer
tempUser.FillWithLoggedOnUser()
For Each Standort As String In LstStandort.Items
Dim usrcntrl As New uscntr_Berechtigungen
usrcntrl.User = tempUser
usrcntrl.lblName.Text = Standort
usrcntrl.Name = Standort
usrcntrl.Standort = Standort
usrcntrl.Location = New Point(0, i * usrcntrl.Height)
i = i + 1
frm.PanMain.Controls.Add(usrcntrl)
Width = usrcntrl.Width
Next
frm.Width = Width
frm.Show()
End Sub
Function GetUsersInGroup(ByVal groupname As String, Optional ByVal LDAP As String = "LDAP://DC=VERAG,DC=OST,DC=DMN") As List(Of String)
Dim Userlist As New List(Of String)
Dim locDirectoryEntry As New DirectoryServices.DirectoryEntry(LDAP)
Dim Searcher As New DirectoryServices.DirectorySearcher(locDirectoryEntry, "sAMAccountName=" & groupname)
Dim Result As DirectoryServices.SearchResult = Searcher.FindOne
If Result IsNot Nothing Then
For Each User In Result.Properties("Member")
Userlist.Add(User)
Next
End If
Return Userlist
End Function
Private Sub CMdTest2_Click(sender As Object, e As EventArgs) Handles CMdTest2.Click
LstNetzwerkLoad()
NetzwerkInfoAnzeige()
Dim test As New Object
Dim testuser As New cBenutzer
testuser.FillFromDC("CN=S-1-5-21-585332750-1805456821-3920631953-1235,CN=ForeignSecurityPrincipals,DC=verag,DC=ost,DC=dmn")
End Sub
Public Function GetDHCPClients(Netzwerk As String, DHCPServer As String, Fill As Boolean, ByRef ds As DataSet)
@@ -574,21 +634,28 @@ Public Class Main
Dim b As UInteger = DHCP.StringIPAddressToUInt32("255.255.255.255")
DHCP.ListSubnetClients(DHCPServer, Netzwerk, dhcpclients)
DHCP.StringNWAdressToNWAdressSHORT(Netzwerk, NWShort)
Try
For i = 0 To DHCP.Client_Array.NumElements - 1
DHCPClientIP = NWShort & (b - ((dhcpclients(i).ClientIpAddress * -1) + a - 1)).ToString
''----------------------------------------Fill True: Wenn DHCP Clients bereits im DS enthalten sind werden diese Hosts geändert.
If Fill = True Then
' If Fill = True Then
Dim HostRow() As Data.DataRow
HostRow = ds.Tables(0).Select("IPAdresse = '" & DHCPClientIP & "'")
' MsgBox(DHCPClientIP & HostRow.Length)
If HostRow.Length > 0 Then
HostRow(0)("FQDN") = "*" & dhcpclients(i).ClientName
HostRow(0)("QINFO") = "DHCP Client"
''----------------------------------------Fill False: DHCP Clients werden hinzugefügt
Else
'MsgBox("fill not true")
Dim rows() As DataRow = ds.Tables(0).Select("IPAdresse = '" & DHCPClientIP & "'")
If rows.Count > 0 Then
Dim FQDN As String = rows(0).Item("FQDN")
@@ -608,6 +675,10 @@ Public Class Main
Next
ds.Tables(0).DefaultView.Sort = "Host"
Catch ex As Exception
MsgBox("GetDHCPClients() " & ex.Message)
End Try
End Function
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerUhrzeit.Tick
@@ -653,18 +724,23 @@ Public Class Main
NetzwerkInfoAnzeige()
End Sub
Private Sub TxtSuche_TextChanged(sender As Object, e As EventArgs) Handles TxtSuche.TextChanged, RadNurNetzwerk.CheckedChanged, RadGlobal.CheckedChanged, RadStandort.CheckedChanged, LstType.SelectedIndexChanged, TxtSuche.MouseClick
Private Sub TxtSuche_TextChanged(sender As Object, e As EventArgs) Handles TxtSuche.TextChanged, RadNurNetzwerk.CheckedChanged, RadGlobal.CheckedChanged, RadStandort.CheckedChanged, LstType.SelectedIndexChanged ', TxtSuche.MouseClick
If TxtSuche.TextLength < 1 And LstType.SelectedItem = "" Then
Suchbegriff = "%%"
ChkFreieHosts.Checked = False
dgvload_filter(Suchbegriff)
ElseIf TxtSuche.TextLength < 1 And Not LstType.SelectedItem = "" Then
ChkDHCPClients.Checked = False
ChkFreieHosts.Checked = False
dgvload_filter(Suchbegriff)
Else
Suchbegriff = "%" & Class1.hochkomma(TxtSuche.Text) & "%"
ChkDHCPClients.Checked = False
ChkFreieHosts.Checked = False
dgvload_filter(Suchbegriff)
End If
End Sub
Private Sub ComTypeClick(sender As Object, e As EventArgs) Handles LstType.Click
TypeFilter()
@@ -672,22 +748,37 @@ Public Class Main
Private Sub DgvMainContextMenuItemHost_Click(sender As Object, e As EventArgs) Handles DgvMainContextMenuItemHost.Click, CmDBearbeiten.Click, DgVMain.CellDoubleClick, DgVMain.RowHeaderMouseDoubleClick
If Tabelle = "TbL_Netzwerkclients" Then
Dim frm As New frmHostBearbeiten
Try
frmHostBearbeiten.IP = (DgVMain.CurrentRow.Cells("IPAdresse").Value)
frm.IP = (DgVMain.CurrentRow.Cells("IPAdresse").Value)
Catch
frmHostBearbeiten.IP = (DgVMain.Rows(0).Cells("IPAdresse").Value)
frm.IP = (DgVMain.Rows(0).Cells("IPAdresse").Value)
End Try
frmHostBearbeiten.Show()
ElseIf Tabelle = "TbL_Allgemein" Then
Dim Eintrag As New EintragBearbeiten
Eintrag.Titel = Class1.DBNull2emptyString((DgVMain.CurrentRow.Cells("Titel").Value))
If Class1.DBNull2emptyString((DgVMain.CurrentRow.Cells("Rubrik").Value)) = "" Then
Eintrag.rubrik = Class1.DBNull2emptyString((DgVMain.Rows(0).Cells("Rubrik").Value))
Else
Eintrag.rubrik = Class1.DBNull2emptyString((DgVMain.CurrentRow.Cells("Rubrik").Value))
If cBerechtigungen.BenutzerBerechtigungfuerStandort(Class1.LoggedOnUser.BenutzeranmeldeName, DgVMain.CurrentRow.Cells("NWSTANDORT").Value) = "R" Then
frm.Panel1.Enabled = False : frm.PanFirewall.Enabled = False
End If
Eintrag.Show()
AddHandler frm.FormClosing, Function()
End Function
frm.Show()
ElseIf Tabelle = "TbL_Allgemein" Then
SelectedDGVIndex = Class1.DBNull2emptyString(DgVMain.CurrentRow.Index)
Dim Eintrag As New cEintrag
Eintrag.ID = Class1.DBNull2emptyString(DgVMain.CurrentRow.Cells("ID").Value)
Eintrag.rubrik = Class1.DBNull2emptyString(DgVMain.CurrentRow.Cells("Rubrik").Value)
Eintrag.Titel = Class1.DBNull2emptyString(DgVMain.CurrentRow.Cells("Titel").Value)
Eintrag.getFromSQL()
Dim frm As New frmAllgemeinEintrag
frm.Eintrag = Eintrag
AddHandler frm.FormClosing, Function()
dgvload(Tabelle)
LstAllgemein.SelectedItem = Eintrag.rubrik
DgVMain.Rows(SelectedDGVIndex).Selected = True
End Function
frm.Show()
End If
End Sub
@@ -923,6 +1014,11 @@ Public Class Main
Private Sub ChkKompAnsicht_CheckedChanged(sender As Object, e As EventArgs) Handles ChkKompAnsicht.CheckedChanged, ChkFreieHosts.CheckedChanged, ChkDHCPClients.CheckedChanged
'dgvload(Tabelle)
If ChkFreieHosts.Checked Then
TxtSuche.Text = ""
LstType.SelectedItem = ""
RadNurNetzwerk.Checked = True
End If
dgvload_filter(Suchbegriff)
End Sub
@@ -1026,7 +1122,7 @@ Public Class Main
End Sub
Private Sub TimerUpdate_Tick(sender As Object, e As EventArgs) Handles TimerUpdate.Tick
CheckUpdate("Timer")
If Class1.DebugMode = False Then CheckUpdate("Timer")
End Sub
@@ -1036,6 +1132,39 @@ Public Class Main
FirstDisplayedDGVEntry = DgVMain.FirstDisplayedScrollingRowIndex
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnNeu.Click
Neu = True
Dim Eintrag As New EintragBearbeiten
'Eintrag.Titel = Class1.DBNull2emptyString((DgVMain.CurrentRow.Cells("Titel").Value))
If Class1.DBNull2emptyString((DgVMain.CurrentRow.Cells("Rubrik").Value)) = "" Then
Eintrag.rubrik = Class1.DBNull2emptyString((DgVMain.Rows(0).Cells("Rubrik").Value))
Else
Eintrag.rubrik = Class1.DBNull2emptyString((DgVMain.CurrentRow.Cells("Rubrik").Value))
End If
Eintrag.Show()
End Sub
Private Sub TimerWillkommen_Tick(sender As Object, e As EventArgs) Handles TimerWillkommen.Tick
TimerWillkommen.Enabled = False
TimerUhrzeit.Enabled = True
End Sub
Private Sub BenutzerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BenutzerToolStripMenuItem.Click
Dim frm As New frmLeer
frm.Text = "Benutzerverwaltung"
Dim usrcntrl As New uscntr_Benutzer
usrcntrl.Dock = DockStyle.Fill : frm.PanMain.Controls.Add(usrcntrl)
' frm.Size = usrcntrl.Size
frm.Show()
End Sub
Private Sub btnTest3_Click(sender As Object, e As EventArgs) Handles btnTest3.Click
MsgBox("Jupp")
End Sub
Private Sub ObjektLöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ObjektLöschenToolStripMenuItem.Click
If Tabelle = "TbL_Netzwerkclients" Then

View File

@@ -169,7 +169,7 @@ Namespace My.Resources
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die 0.0.1.29 ähnelt.
''' Sucht eine lokalisierte Zeichenfolge, die 0.0.1.30 ähnelt.
'''</summary>
Friend ReadOnly Property Version() As String
Get

View File

@@ -131,7 +131,7 @@
<value>..\Resources\Link.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Version" xml:space="preserve">
<value>0.0.1.29</value>
<value>0.0.1.30</value>
</data>
<data name="Link" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Link.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>

View File

@@ -0,0 +1,382 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmAllgemeinEintrag
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(frmAllgemeinEintrag))
Me.CmdTest = New System.Windows.Forms.Button()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.TxtInfo = New System.Windows.Forms.TextBox()
Me.PanWrite = New System.Windows.Forms.Panel()
Me.btnBerechtigungen = New System.Windows.Forms.Button()
Me.Label7 = New System.Windows.Forms.Label()
Me.ChkKennwortAnzeigen = New System.Windows.Forms.CheckBox()
Me.TxtBenutzername = New System.Windows.Forms.TextBox()
Me.TxtKennwort = New System.Windows.Forms.TextBox()
Me.Label6 = New System.Windows.Forms.Label()
Me.CmdLink = New System.Windows.Forms.Button()
Me.LblLink = New System.Windows.Forms.Label()
Me.CmdDateien = New System.Windows.Forms.Button()
Me.TxtLink = New System.Windows.Forms.TextBox()
Me.CmdDelete = New System.Windows.Forms.Button()
Me.CmdSave = New System.Windows.Forms.Button()
Me.CmdAbbrechen = New System.Windows.Forms.Button()
Me.CmdReset = New System.Windows.Forms.Button()
Me.Panelhinten = New System.Windows.Forms.Panel()
Me.PanTop = New System.Windows.Forms.Panel()
Me.Label1 = New System.Windows.Forms.Label()
Me.TxtTitel = New System.Windows.Forms.TextBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.TxtRubrik = New System.Windows.Forms.TextBox()
Me.Panel4 = New System.Windows.Forms.Panel()
Me.PanContr = New System.Windows.Forms.Panel()
Me.Panel2.SuspendLayout()
Me.PanWrite.SuspendLayout()
Me.Panelhinten.SuspendLayout()
Me.PanTop.SuspendLayout()
Me.Panel4.SuspendLayout()
Me.PanContr.SuspendLayout()
Me.SuspendLayout()
'
'CmdTest
'
Me.CmdTest.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdTest.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdTest.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdTest.Location = New System.Drawing.Point(15, 10)
Me.CmdTest.Name = "CmdTest"
Me.CmdTest.Size = New System.Drawing.Size(94, 23)
Me.CmdTest.TabIndex = 108
Me.CmdTest.Text = "Test"
Me.CmdTest.UseVisualStyleBackColor = False
Me.CmdTest.Visible = False
'
'Panel2
'
Me.Panel2.Controls.Add(Me.TxtInfo)
Me.Panel2.Controls.Add(Me.Panel4)
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel2.Location = New System.Drawing.Point(0, 100)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(790, 591)
Me.Panel2.TabIndex = 108
'
'TxtInfo
'
Me.TxtInfo.Dock = System.Windows.Forms.DockStyle.Fill
Me.TxtInfo.Location = New System.Drawing.Point(0, 0)
Me.TxtInfo.Multiline = True
Me.TxtInfo.Name = "TxtInfo"
Me.TxtInfo.ScrollBars = System.Windows.Forms.ScrollBars.Both
Me.TxtInfo.Size = New System.Drawing.Size(790, 426)
Me.TxtInfo.TabIndex = 3
'
'PanWrite
'
Me.PanWrite.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.PanWrite.Controls.Add(Me.btnBerechtigungen)
Me.PanWrite.Controls.Add(Me.Label7)
Me.PanWrite.Controls.Add(Me.ChkKennwortAnzeigen)
Me.PanWrite.Controls.Add(Me.TxtBenutzername)
Me.PanWrite.Controls.Add(Me.TxtKennwort)
Me.PanWrite.Controls.Add(Me.Label6)
Me.PanWrite.Controls.Add(Me.LblLink)
Me.PanWrite.Controls.Add(Me.TxtLink)
Me.PanWrite.Controls.Add(Me.CmdDelete)
Me.PanWrite.Controls.Add(Me.CmdSave)
Me.PanWrite.Controls.Add(Me.CmdReset)
Me.PanWrite.Dock = System.Windows.Forms.DockStyle.Left
Me.PanWrite.Location = New System.Drawing.Point(0, 0)
Me.PanWrite.Name = "PanWrite"
Me.PanWrite.Size = New System.Drawing.Size(587, 165)
Me.PanWrite.TabIndex = 109
'
'btnBerechtigungen
'
Me.btnBerechtigungen.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnBerechtigungen.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.btnBerechtigungen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnBerechtigungen.Location = New System.Drawing.Point(203, 91)
Me.btnBerechtigungen.Name = "btnBerechtigungen"
Me.btnBerechtigungen.Size = New System.Drawing.Size(90, 23)
Me.btnBerechtigungen.TabIndex = 109
Me.btnBerechtigungen.Text = "Berechtig."
Me.btnBerechtigungen.UseVisualStyleBackColor = False
'
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Location = New System.Drawing.Point(8, 10)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(78, 13)
Me.Label7.TabIndex = 90
Me.Label7.Text = "Benutzername:"
'
'ChkKennwortAnzeigen
'
Me.ChkKennwortAnzeigen.AutoSize = True
Me.ChkKennwortAnzeigen.Location = New System.Drawing.Point(393, 9)
Me.ChkKennwortAnzeigen.Name = "ChkKennwortAnzeigen"
Me.ChkKennwortAnzeigen.Size = New System.Drawing.Size(70, 17)
Me.ChkKennwortAnzeigen.TabIndex = 6
Me.ChkKennwortAnzeigen.Text = "Anzeigen"
Me.ChkKennwortAnzeigen.UseVisualStyleBackColor = True
'
'TxtBenutzername
'
Me.TxtBenutzername.Location = New System.Drawing.Point(11, 26)
Me.TxtBenutzername.Name = "TxtBenutzername"
Me.TxtBenutzername.Size = New System.Drawing.Size(282, 20)
Me.TxtBenutzername.TabIndex = 4
'
'TxtKennwort
'
Me.TxtKennwort.Location = New System.Drawing.Point(299, 26)
Me.TxtKennwort.Name = "TxtKennwort"
Me.TxtKennwort.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
Me.TxtKennwort.Size = New System.Drawing.Size(282, 20)
Me.TxtKennwort.TabIndex = 5
'
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(296, 9)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(55, 13)
Me.Label6.TabIndex = 91
Me.Label6.Text = "Kennwort:"
'
'CmdLink
'
Me.CmdLink.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdLink.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdLink.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdLink.Location = New System.Drawing.Point(15, 94)
Me.CmdLink.Name = "CmdLink"
Me.CmdLink.Size = New System.Drawing.Size(90, 23)
Me.CmdLink.TabIndex = 102
Me.CmdLink.Text = "Link öffnen"
Me.CmdLink.UseVisualStyleBackColor = False
'
'LblLink
'
Me.LblLink.AutoSize = True
Me.LblLink.Location = New System.Drawing.Point(8, 49)
Me.LblLink.Name = "LblLink"
Me.LblLink.Size = New System.Drawing.Size(85, 13)
Me.LblLink.TabIndex = 92
Me.LblLink.Text = "Link zum Dienst:"
'
'CmdDateien
'
Me.CmdDateien.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdDateien.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdDateien.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdDateien.Location = New System.Drawing.Point(15, 65)
Me.CmdDateien.Name = "CmdDateien"
Me.CmdDateien.Size = New System.Drawing.Size(90, 23)
Me.CmdDateien.TabIndex = 98
Me.CmdDateien.Text = "Dateien"
Me.CmdDateien.UseVisualStyleBackColor = False
'
'TxtLink
'
Me.TxtLink.Location = New System.Drawing.Point(11, 65)
Me.TxtLink.Name = "TxtLink"
Me.TxtLink.Size = New System.Drawing.Size(282, 20)
Me.TxtLink.TabIndex = 7
'
'CmdDelete
'
Me.CmdDelete.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdDelete.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdDelete.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdDelete.Location = New System.Drawing.Point(11, 91)
Me.CmdDelete.Name = "CmdDelete"
Me.CmdDelete.Size = New System.Drawing.Size(90, 23)
Me.CmdDelete.TabIndex = 97
Me.CmdDelete.Text = "Eintrag löschen"
Me.CmdDelete.UseVisualStyleBackColor = False
'
'CmdSave
'
Me.CmdSave.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdSave.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdSave.Location = New System.Drawing.Point(393, 91)
Me.CmdSave.Name = "CmdSave"
Me.CmdSave.Size = New System.Drawing.Size(90, 23)
Me.CmdSave.TabIndex = 8
Me.CmdSave.Text = "Speichern"
Me.CmdSave.UseVisualStyleBackColor = False
'
'CmdAbbrechen
'
Me.CmdAbbrechen.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdAbbrechen.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdAbbrechen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdAbbrechen.Location = New System.Drawing.Point(98, 130)
Me.CmdAbbrechen.Name = "CmdAbbrechen"
Me.CmdAbbrechen.Size = New System.Drawing.Size(90, 23)
Me.CmdAbbrechen.TabIndex = 9
Me.CmdAbbrechen.Text = "Schließen"
Me.CmdAbbrechen.UseVisualStyleBackColor = False
'
'CmdReset
'
Me.CmdReset.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdReset.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdReset.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdReset.Location = New System.Drawing.Point(107, 91)
Me.CmdReset.Name = "CmdReset"
Me.CmdReset.Size = New System.Drawing.Size(90, 23)
Me.CmdReset.TabIndex = 94
Me.CmdReset.Text = "Reset"
Me.CmdReset.UseVisualStyleBackColor = False
'
'Panelhinten
'
Me.Panelhinten.Controls.Add(Me.Panel2)
Me.Panelhinten.Controls.Add(Me.PanTop)
Me.Panelhinten.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panelhinten.Location = New System.Drawing.Point(0, 0)
Me.Panelhinten.Name = "Panelhinten"
Me.Panelhinten.Size = New System.Drawing.Size(790, 691)
Me.Panelhinten.TabIndex = 110
'
'PanTop
'
Me.PanTop.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.PanTop.Controls.Add(Me.Label1)
Me.PanTop.Controls.Add(Me.TxtTitel)
Me.PanTop.Controls.Add(Me.Label3)
Me.PanTop.Controls.Add(Me.TxtRubrik)
Me.PanTop.Dock = System.Windows.Forms.DockStyle.Top
Me.PanTop.Location = New System.Drawing.Point(0, 0)
Me.PanTop.Name = "PanTop"
Me.PanTop.Size = New System.Drawing.Size(790, 100)
Me.PanTop.TabIndex = 107
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(8, 11)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(41, 13)
Me.Label1.TabIndex = 100
Me.Label1.Text = "Rubrik:"
'
'TxtTitel
'
Me.TxtTitel.Location = New System.Drawing.Point(11, 66)
Me.TxtTitel.Name = "TxtTitel"
Me.TxtTitel.Size = New System.Drawing.Size(618, 20)
Me.TxtTitel.TabIndex = 2
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(8, 50)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(30, 13)
Me.Label3.TabIndex = 88
Me.Label3.Text = "Titel:"
'
'TxtRubrik
'
Me.TxtRubrik.Location = New System.Drawing.Point(11, 27)
Me.TxtRubrik.Name = "TxtRubrik"
Me.TxtRubrik.Size = New System.Drawing.Size(618, 20)
Me.TxtRubrik.TabIndex = 1
'
'Panel4
'
Me.Panel4.Controls.Add(Me.PanContr)
Me.Panel4.Controls.Add(Me.PanWrite)
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel4.Location = New System.Drawing.Point(0, 426)
Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(790, 165)
Me.Panel4.TabIndex = 110
'
'PanContr
'
Me.PanContr.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.PanContr.Controls.Add(Me.CmdLink)
Me.PanContr.Controls.Add(Me.CmdTest)
Me.PanContr.Controls.Add(Me.CmdDateien)
Me.PanContr.Controls.Add(Me.CmdAbbrechen)
Me.PanContr.Dock = System.Windows.Forms.DockStyle.Right
Me.PanContr.Location = New System.Drawing.Point(590, 0)
Me.PanContr.Name = "PanContr"
Me.PanContr.Size = New System.Drawing.Size(200, 165)
Me.PanContr.TabIndex = 110
'
'frmAllgemeinEintrag
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(790, 691)
Me.Controls.Add(Me.Panelhinten)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmAllgemeinEintrag"
Me.Text = "frmAllgemeinEintrag"
Me.Panel2.ResumeLayout(False)
Me.Panel2.PerformLayout()
Me.PanWrite.ResumeLayout(False)
Me.PanWrite.PerformLayout()
Me.Panelhinten.ResumeLayout(False)
Me.PanTop.ResumeLayout(False)
Me.PanTop.PerformLayout()
Me.Panel4.ResumeLayout(False)
Me.PanContr.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents CmdTest As Button
Friend WithEvents Panel2 As Panel
Private WithEvents TxtInfo As TextBox
Friend WithEvents PanWrite As Panel
Friend WithEvents Label7 As Label
Friend WithEvents ChkKennwortAnzeigen As CheckBox
Friend WithEvents TxtBenutzername As TextBox
Friend WithEvents TxtKennwort As TextBox
Friend WithEvents Label6 As Label
Friend WithEvents CmdLink As Button
Friend WithEvents LblLink As Label
Friend WithEvents CmdDateien As Button
Friend WithEvents TxtLink As TextBox
Friend WithEvents CmdDelete As Button
Friend WithEvents CmdSave As Button
Friend WithEvents CmdAbbrechen As Button
Friend WithEvents CmdReset As Button
Friend WithEvents Panelhinten As Panel
Friend WithEvents PanTop As Panel
Friend WithEvents Label1 As Label
Friend WithEvents TxtTitel As TextBox
Friend WithEvents Label3 As Label
Friend WithEvents TxtRubrik As TextBox
Friend WithEvents btnBerechtigungen As Button
Friend WithEvents Panel4 As Panel
Friend WithEvents PanContr As Panel
End Class

View File

@@ -0,0 +1,980 @@
<?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="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAgIAAAAAAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAA
AACIYDh5TSB6TSF2SRt3Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh12SRt6TSF5TSCIYDh6TSFqOAZqOQdmMwBoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNmMwBqOQdqOAZ6TSF5TB9pNwVqOQdo
NQNoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNQNqOQdpNwV5TB9uPQ1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBuPQ1tPAtmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBt
PAtxQhNmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBxQhN3SRxnNAFoNQNmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNQNnNAF3SRx4Sx5oNQNoNgRm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN4Sx53Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwDm4N3/////////
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
//////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwCMblj///////////////////////////+M
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwC3
p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwDm4N3/////////////
//+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
//////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
//////////////+3p5xmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwCjjH3/
///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
//////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
9fRmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwDUy8X///////////////+t
mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
//+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
6+n///////////////+jjH1mMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwCYfWv/////
///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
//////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
//+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
//////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
mo1mMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwDLv7j////////////////Bs6pm
MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
//////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwB0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
//////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh14Sx5oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN4Sx53SRxnNAFoNQNm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNQNnNAF3SRxxQhNmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBxQhNtPAtmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBt
PAtuPQ1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBuPQ15TB9pNwVqOQdoNQNoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNQNqOQdpNwV5TB96TSFqOAZqOQdm
MwBoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNmMwBqOQdqOAZ6TSGIYDh5TSB6TSF2SRt3Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh12SRt6TSF5TSCIYDj/////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARQUFB+fn6oqKjZ2dn/////
///////////////////////////////////////////////////////Z2dmoqKh+fn5QUFAEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAR+fn6oqKjZ2dn///////////////////////////////////////8E
BAQEBAQEBAQEBAQEBATh4eH////////////////////////////////////////////////////////Z
2dkEBAQEBAQEBAQEBAQEBATZ2dn////////////////////////////////IyMicnJxqamoEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBARQUFB+fn6+vr7p6en/////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAR+fn7h4eH////////////////////////////////////////////h
4eF+fn4EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARqamrh4eH/
//////////////////////////////8EBAQEBAQEBAQEBAQEBARqamr/////////////////////////
//////////////////////////////9+fn4EBAQEBAQEBAQEBAR+fn7/////////////////////////
///Z2dlQUFAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBASoqKj/
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATIyMj/////////
///////////////////////////IyMgEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBATIyMj///////////////////////////8EBAQEBAQEBAQEBAQE
BAQEBAS+vr7////////////////////////////////////////////////Z2dkEBAQEBAQEBAQEBAQE
BATZ2dn////////////////////////IyMgEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBARqamrx8fH/////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT////////////////////////////////////////x8fHR0dGcnJwE
BAQEBAQEBAQEBAQEBAQEBATR0dH////////////////////////////Z2dkEBAQEBAQEBAQEBAQEBAQE
BAScnJzR0dHx8fH////////////////x8fHR0dGcnJwEBAQEBAQEBAQEBAQEBAQEBATZ2dn/////////
//////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBATp6en/////////////////////////////////
//////////9+fn4EBAQEBAQEBAQEBAR+fn7////////////////////////h4eEEBAQEBAQEBAQEBAQE
BAQEBASoqKjR0dHh4eH////////////p6enZ2dm+vr5QUFAEBAQEBAQEBAQEBAQEBAScnJz/////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
///////////////////////////////p6elqamoEBAQEBAQEBAQEBARQUFD/////////////////////
//////9QUFAEBAQEBAQEBAQEBARqamrh4eH////////////////////////////////////////h4eFq
amoEBAQEBAQEBAQEBARQUFD///////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBASOjo7/
///////////////////////////////////////h4eEEBAQEBAQEBAQEBAQEBATIyMj/////////////
//////////9QUFAEBAQEBAQEBAQEBARqamrh4eH///////////////////////////////////////+c
nJwEBAQEBAQEBAQEBAQEBATZ2dn///////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT////////////////////////////////////////////////////////x8fEEBAQEBAQE
BAQEBAQEBATIyMj////////////////////R0dEEBAQEBAQEBAQEBAQEBATx8fH/////////////////
///////////////////////////////x8fEEBAQEBAQEBAQEBAQEBATIyMj///////////////////8E
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBATR0dH///////////////////////////////////+cnJwEBAQE
BAQEBAQEBARQUFD////////////////////////R0dEEBAQEBAQEBAQEBAQEBATh4eH/////////////
//////////////////////////////////+Ojo4EBAQEBAQEBAQEBASOjo7/////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////+0tLQEBAQEBAQEBAQEBAScnJz///////////////////+cnJwEBAQEBAQE
BAQEBAS0tLT///////////////////////////////////////////////////////+0tLQEBAQEBAQE
BAQEBAScnJz///////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATx8fH/////////
///////////////////p6ekEBAQEBAQEBAQEBAQEBATIyMj///////////////////////+cnJwEBAQE
BAQEBAQEBAScnJz////////////////////////////////////////////////////h4eEEBAQEBAQE
BAQEBAQEBATx8fH///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
///////////////////////////////////////////////////////h4eEEBAQEBAQEBAQEBARqamr/
//////////////////9+fn4EBAQEBAQEBAQEBATh4eH/////////////////////////////////////
///////////////////h4eEEBAQEBAQEBAQEBAR+fn7///////////////////8EBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBASoqKj///////////////////////////+cnJwEBAQEBAQEBAQEBARQUFD/////
//////////////////////9qamoEBAQEBAQEBAQEBATIyMj/////////////////////////////////
//////////////////////9QUFAEBAQEBAQEBAQEBATZ2dn/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATZ2dn////////////////////p
6ekEBAQEBAQEBAQEBAQEBATIyMj///////////////////////////8EBAQEBAQEBAQEBAQEBATZ2dn/
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBATIyMj/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAR+fn4EBAQEBAQE
BAQEBARqamr///////////////////+cnJwEBAQEBAQEBAQEBARQUFD/////////////////////////
//////8EBAQEBAQEBAQEBAQEBATh4eH/////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////////8EBAQE
BAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBATp6ekEBAQEBAQEBAQEBAQEBAS0tLT////////////p6ekEBAQEBAQEBAQEBAQE
BATIyMj///////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQE
BAQEBAT///////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT///+0tLQEBAQEBAQEBAQEBAQEBATp
6en///////+cnJwEBAQEBAQEBAQEBARQUFD///////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/
//////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQE
BAT///////9qamoEBAQEBAQEBAQEBAR+fn7////p6ekEBAQEBAQEBAQEBAQEBATIyMj/////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAT////////h4eEEBAQEBAQEBAQEBAQEBATIyMicnJwEBAQE
BAQEBAQEBAQEBATx8fH///////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT///////////+o
qKgEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////////8EBAQE
BAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBAT////////////x8fFQUFAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATx8fH/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQE
BAQEBAT///////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT////////////////Z2dkEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAS0tLT///////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/
//////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQE
BAT///////////////////+Ojo4EBAQEBAQEBAQEBAQEBAQEBAQEBATx8fH/////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAT////////////////////x8fEEBAQEBAQEBAQEBAQEBAQE
BAS0tLT///////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////
//////////++vr4EBAQEBAQEBAQEBAQEBATR0dH/////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////////8EBAQE
BAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBAT///////////////////////////9+fn4EBAQEBAQEBAQEBARqamr/////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQE
BAQEBAT///////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT////////////////////////////p
6ekEBAQEBAQEBAQEBAQEBAS+vr7///////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/
//////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQE
BAT///////////////////////////////+0tLQEBAQEBAQEBAQEBAQEBATp6en/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAT///////////////////////////////////9QUFAEBAQE
BAQEBAQEBASOjo7///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////
///////////////////////Z2dkEBAQEBAQEBAQEBAQEBATR0dH/////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT////////////////////////////////////////////////////////////h4eEEBAQE
BAQEBAQEBARqamr///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBAT///////////////////////////////////////+oqKgEBAQEBAQEBAQEBARQ
UFDx8fH///////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////+0tLQEBAQEBAQEBAQEBAScnJz///////////////////9+fn4EBAQEBAQE
BAQEBATh4eH////////////////////////////////////////////////////////h4eEEBAQEBAQE
BAQEBAR+fn7///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////
///////////x8fEEBAQEBAQEBAQEBAQEBASoqKj///////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
///////////////////////////////////////////////////x8fEEBAQEBAQEBAQEBAQEBATIyMj/
//////////////////+cnJwEBAQEBAQEBAQEBAS0tLT/////////////////////////////////////
//////////////////+0tLQEBAQEBAQEBAQEBAScnJz///////////////////8EBAQEBAQEBAQEBAQE
BAT////////////////////////////////////////////R0dEEBAQEBAQEBAQEBAQEBATh4eH/////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT////////////////////////////////////////////////////p
6elqamoEBAQEBAQEBAQEBARQUFD////////////////////////R0dEEBAQEBAQEBAQEBAQEBATx8fH/
///////////////////////////////////////////////x8fEEBAQEBAQEBAQEBAQEBATR0dH/////
//////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////
//9+fn4EBAQEBAQEBAQEBARqamr///////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
///////////////////x8fHR0dGcnJwEBAQEBAQEBAQEBAQEBAQEBATZ2dn/////////////////////
//////9QUFAEBAQEBAQEBAQEBARqamrh4eH////////////////////////////////////////h4eFq
amoEBAQEBAQEBAQEBARQUFD///////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////
///////////////////////////////////p6ekEBAQEBAQEBAQEBAQEBAS+vr7/////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BATIyMj////////////////////////////////Z2dkEBAQEBAQEBAQEBAQEBAQEBAScnJzR0dHx8fH/
///////////////x8fHR0dGcnJwEBAQEBAQEBAQEBAQEBAQEBATZ2dn///////////////////////8E
BAQEBAQEBAQEBAQEBAT///////////////////////////////////////////////////++vr4EBAQE
BAQEBAQEBAQEBATx8fH///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAR+fn7h4eH////////////////////////////////////////IyMgE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATI
yMj///////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////
//////////////////////////9qamoEBAQEBAQEBAQEBASOjo7///////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARQUFB+fn6oqKjh4eH/////////////////////
///////////////////////////////h4eF+fn4EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAR+fn7h4eH///////////////////////////////8EBAQEBAQEBAQEBAQE
BAT////////////////////////////////////////////////////////h4eEEBAQEBAQEBAQEBAQE
BATZ2dn///////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////h4eGoqKh+
fn5QUFAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAR+fn6oqKjZ2dn/////////////////////////
//////////////+0tLS0tLS0tLS0tLS0tLT/////////////////////////////////////////////
///////////////R0dG0tLS0tLS0tLS0tLS+vr7///////////////+0tLS0tLS0tLS0tLS0tLT/////
///////////////////////////////////////////////////////IyMi0tLS0tLS0tLS0tLTZ2dn/
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//////////////////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>

View File

@@ -0,0 +1,81 @@
Public Class frmAllgemeinEintrag
Property Eintrag As New cEintrag
Property Berechtigung As New cBerechtigungen
Property NewID As Boolean = False
Private Sub frmAllgemeinEintrag_Load(sender As Object, e As EventArgs) Handles Me.Load
CmdTest.Visible = Class1.DebugMode
FillIn()
If GetRights() = "R" Then
PanTop.Enabled = False : TxtInfo.Enabled = False : PanWrite.Enabled = False
End If
End Sub
Function FillIn()
TxtRubrik.Text = Eintrag.rubrik
TxtTitel.Text = Eintrag.Titel
TxtInfo.Text = Eintrag.Info
TxtBenutzername.Text = Eintrag.Benutzer
TxtKennwort.Text = Eintrag.Passwort
TxtLink.Text = Eintrag.Link
End Function
Function ReadOut()
Eintrag.rubrik = TxtRubrik.Text
Eintrag.Titel = TxtTitel.Text
Eintrag.Info = Class1.hochkomma(TxtInfo.Text)
Eintrag.Benutzer = TxtBenutzername.Text
Eintrag.Passwort = TxtKennwort.Text
Eintrag.Link = TxtLink.Text
End Function
Private Sub ChkKennwortAnzeigen_CheckedChanged(sender As Object, e As EventArgs) Handles ChkKennwortAnzeigen.CheckedChanged
If ChkKennwortAnzeigen.Checked Then
TxtKennwort.PasswordChar = ""
Else
TxtKennwort.PasswordChar = "*"
End If
End Sub
Private Sub CmdLink_Click(sender As Object, e As EventArgs) Handles CmdLink.Click
Ext_Programme.startlink(TxtLink.Text)
End Sub
Private Sub CmdTest_Click(sender As Object, e As EventArgs) Handles CmdTest.Click
MsgBox(Eintrag.ID)
End Sub
Private Sub CmdSave_Click(sender As Object, e As EventArgs) Handles CmdSave.Click
ReadOut()
Eintrag.Save()
End Sub
Private Sub btnBerechtigungen_Click(sender As Object, e As EventArgs) Handles btnBerechtigungen.Click
CmdSave.PerformClick()
Dim i As Integer = 0
Dim frm As New frmLeer
frm.Text = "Berechtigungen für " & Eintrag.Titel
For Each Benutzer As cBenutzer In Class1.GroupUsers
Dim usrcntrl As New uscntr_Berechtigungen
usrcntrl.User = Benutzer
usrcntrl.Standort = Eintrag.ID
usrcntrl.lblName.Text = Benutzer.Vorname & " " & Benutzer.Nachname
usrcntrl.Berechtigung.StandardZugriff = "W"
usrcntrl.Location = New Point(0, i * usrcntrl.Height)
i = i + 1
frm.PanMain.Controls.Add(usrcntrl)
Next
frm.Show()
End Sub
Function GetRights() As String
Berechtigung.Benutzeranmeldename = Class1.LoggedOnUser.BenutzeranmeldeName
Berechtigung.Standort = Eintrag.ID
Berechtigung.getFromSQL()
Return Berechtigung.Zugriff
End Function
End Class

View File

@@ -75,16 +75,18 @@ Partial Class frmHostBearbeiten
Me.PanFirewall = New System.Windows.Forms.Panel()
Me.PanSlaves = New System.Windows.Forms.Panel()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.PanNavTop = New System.Windows.Forms.Panel()
Me.ContextMenuStrip2.SuspendLayout()
Me.ContextMenuStrip1.SuspendLayout()
Me.Panel1.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.PanNavTop.SuspendLayout()
Me.SuspendLayout()
'
'chkFirewall
'
Me.chkFirewall.AutoSize = True
Me.chkFirewall.Location = New System.Drawing.Point(505, 485)
Me.chkFirewall.Location = New System.Drawing.Point(509, 447)
Me.chkFirewall.Name = "chkFirewall"
Me.chkFirewall.Size = New System.Drawing.Size(123, 17)
Me.chkFirewall.TabIndex = 136
@@ -96,7 +98,7 @@ Partial Class frmHostBearbeiten
Me.CmdHostLink.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdHostLink.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdHostLink.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdHostLink.Location = New System.Drawing.Point(328, 367)
Me.CmdHostLink.Location = New System.Drawing.Point(332, 349)
Me.CmdHostLink.Name = "CmdHostLink"
Me.CmdHostLink.Size = New System.Drawing.Size(94, 23)
Me.CmdHostLink.TabIndex = 135
@@ -106,7 +108,7 @@ Partial Class frmHostBearbeiten
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.Location = New System.Drawing.Point(0, 198)
Me.Label11.Location = New System.Drawing.Point(3, 152)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(47, 13)
Me.Label11.TabIndex = 132
@@ -116,14 +118,14 @@ Partial Class frmHostBearbeiten
'
Me.TxtStandort.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest
Me.TxtStandort.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.TxtStandort.Location = New System.Drawing.Point(3, 214)
Me.TxtStandort.Location = New System.Drawing.Point(6, 168)
Me.TxtStandort.Name = "TxtStandort"
Me.TxtStandort.Size = New System.Drawing.Size(300, 20)
Me.TxtStandort.TabIndex = 97
'
'TxtName
'
Me.TxtName.Location = New System.Drawing.Point(3, 136)
Me.TxtName.Location = New System.Drawing.Point(6, 90)
Me.TxtName.Name = "TxtName"
Me.TxtName.Size = New System.Drawing.Size(300, 20)
Me.TxtName.TabIndex = 95
@@ -133,7 +135,7 @@ Partial Class frmHostBearbeiten
Me.CmdCopy.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdCopy.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdCopy.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdCopy.Location = New System.Drawing.Point(109, 57)
Me.CmdCopy.Location = New System.Drawing.Point(112, 11)
Me.CmdCopy.Name = "CmdCopy"
Me.CmdCopy.Size = New System.Drawing.Size(94, 23)
Me.CmdCopy.TabIndex = 131
@@ -143,7 +145,7 @@ Partial Class frmHostBearbeiten
'ChkKennwortAnzeigen
'
Me.ChkKennwortAnzeigen.AutoSize = True
Me.ChkKennwortAnzeigen.Location = New System.Drawing.Point(383, 275)
Me.ChkKennwortAnzeigen.Location = New System.Drawing.Point(387, 257)
Me.ChkKennwortAnzeigen.Name = "ChkKennwortAnzeigen"
Me.ChkKennwortAnzeigen.Size = New System.Drawing.Size(70, 17)
Me.ChkKennwortAnzeigen.TabIndex = 105
@@ -155,7 +157,7 @@ Partial Class frmHostBearbeiten
Me.CmdIPChange.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdIPChange.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdIPChange.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdIPChange.Location = New System.Drawing.Point(209, 57)
Me.CmdIPChange.Location = New System.Drawing.Point(212, 11)
Me.CmdIPChange.Name = "CmdIPChange"
Me.CmdIPChange.Size = New System.Drawing.Size(94, 23)
Me.CmdIPChange.TabIndex = 130
@@ -165,7 +167,7 @@ Partial Class frmHostBearbeiten
'TxtIP
'
Me.TxtIP.Enabled = False
Me.TxtIP.Location = New System.Drawing.Point(3, 97)
Me.TxtIP.Location = New System.Drawing.Point(6, 51)
Me.TxtIP.Name = "TxtIP"
Me.TxtIP.Size = New System.Drawing.Size(219, 20)
Me.TxtIP.TabIndex = 113
@@ -173,7 +175,7 @@ Partial Class frmHostBearbeiten
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(0, 81)
Me.Label1.Location = New System.Drawing.Point(3, 35)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(58, 13)
Me.Label1.TabIndex = 114
@@ -185,7 +187,7 @@ Partial Class frmHostBearbeiten
Me.CmdLink.Enabled = False
Me.CmdLink.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdLink.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdLink.Location = New System.Drawing.Point(534, 58)
Me.CmdLink.Location = New System.Drawing.Point(538, 61)
Me.CmdLink.Name = "CmdLink"
Me.CmdLink.Size = New System.Drawing.Size(94, 23)
Me.CmdLink.TabIndex = 129
@@ -195,7 +197,7 @@ Partial Class frmHostBearbeiten
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(0, 120)
Me.Label2.Location = New System.Drawing.Point(3, 74)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(35, 13)
Me.Label2.TabIndex = 115
@@ -204,7 +206,7 @@ Partial Class frmHostBearbeiten
'ChkLinked
'
Me.ChkLinked.AutoSize = True
Me.ChkLinked.Location = New System.Drawing.Point(328, 9)
Me.ChkLinked.Location = New System.Drawing.Point(332, 5)
Me.ChkLinked.Name = "ChkLinked"
Me.ChkLinked.Size = New System.Drawing.Size(134, 17)
Me.ChkLinked.TabIndex = 101
@@ -213,7 +215,7 @@ Partial Class frmHostBearbeiten
'
'TxtMAC
'
Me.TxtMAC.Location = New System.Drawing.Point(328, 97)
Me.TxtMAC.Location = New System.Drawing.Point(332, 90)
Me.TxtMAC.Name = "TxtMAC"
Me.TxtMAC.Size = New System.Drawing.Size(300, 20)
Me.TxtMAC.TabIndex = 102
@@ -222,7 +224,7 @@ Partial Class frmHostBearbeiten
'
Me.TxtLinkedWith.ContextMenuStrip = Me.ContextMenuStrip2
Me.TxtLinkedWith.Enabled = False
Me.TxtLinkedWith.Location = New System.Drawing.Point(328, 32)
Me.TxtLinkedWith.Location = New System.Drawing.Point(332, 28)
Me.TxtLinkedWith.Name = "TxtLinkedWith"
Me.TxtLinkedWith.Size = New System.Drawing.Size(300, 20)
Me.TxtLinkedWith.TabIndex = 128
@@ -242,7 +244,7 @@ Partial Class frmHostBearbeiten
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(325, 81)
Me.Label3.Location = New System.Drawing.Point(329, 74)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(30, 13)
Me.Label3.TabIndex = 116
@@ -251,7 +253,7 @@ Partial Class frmHostBearbeiten
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(0, 354)
Me.Label10.Location = New System.Drawing.Point(3, 308)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(74, 13)
Me.Label10.TabIndex = 127
@@ -261,14 +263,14 @@ Partial Class frmHostBearbeiten
'
Me.TxtType.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.TxtType.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.TxtType.Location = New System.Drawing.Point(3, 331)
Me.TxtType.Location = New System.Drawing.Point(6, 285)
Me.TxtType.Name = "TxtType"
Me.TxtType.Size = New System.Drawing.Size(300, 20)
Me.TxtType.TabIndex = 99
'
'TxtSeriennummer
'
Me.TxtSeriennummer.Location = New System.Drawing.Point(3, 370)
Me.TxtSeriennummer.Location = New System.Drawing.Point(6, 324)
Me.TxtSeriennummer.Name = "TxtSeriennummer"
Me.TxtSeriennummer.Size = New System.Drawing.Size(300, 20)
Me.TxtSeriennummer.TabIndex = 100
@@ -276,7 +278,7 @@ Partial Class frmHostBearbeiten
'Label4
'
Me.Label4.AutoSize = True
Me.Label4.Location = New System.Drawing.Point(0, 315)
Me.Label4.Location = New System.Drawing.Point(3, 269)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(31, 13)
Me.Label4.TabIndex = 117
@@ -285,7 +287,7 @@ Partial Class frmHostBearbeiten
'Label9
'
Me.Label9.AutoSize = True
Me.Label9.Location = New System.Drawing.Point(-2, 237)
Me.Label9.Location = New System.Drawing.Point(1, 191)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(53, 13)
Me.Label9.TabIndex = 126
@@ -293,17 +295,17 @@ Partial Class frmHostBearbeiten
'
'TxtInfo
'
Me.TxtInfo.Location = New System.Drawing.Point(328, 136)
Me.TxtInfo.Location = New System.Drawing.Point(332, 129)
Me.TxtInfo.Multiline = True
Me.TxtInfo.Name = "TxtInfo"
Me.TxtInfo.Size = New System.Drawing.Size(300, 98)
Me.TxtInfo.Size = New System.Drawing.Size(300, 87)
Me.TxtInfo.TabIndex = 103
'
'TxtQuickInfo
'
Me.TxtQuickInfo.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.TxtQuickInfo.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.TxtQuickInfo.Location = New System.Drawing.Point(1, 255)
Me.TxtQuickInfo.Location = New System.Drawing.Point(4, 209)
Me.TxtQuickInfo.Multiline = True
Me.TxtQuickInfo.Name = "TxtQuickInfo"
Me.TxtQuickInfo.Size = New System.Drawing.Size(300, 57)
@@ -312,7 +314,7 @@ Partial Class frmHostBearbeiten
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Location = New System.Drawing.Point(325, 120)
Me.Label5.Location = New System.Drawing.Point(329, 113)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(25, 13)
Me.Label5.TabIndex = 118
@@ -321,7 +323,7 @@ Partial Class frmHostBearbeiten
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(0, 159)
Me.Label8.Location = New System.Drawing.Point(3, 113)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(38, 13)
Me.Label8.TabIndex = 125
@@ -332,7 +334,7 @@ Partial Class frmHostBearbeiten
Me.CmdSave.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdSave.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdSave.Location = New System.Drawing.Point(534, 396)
Me.CmdSave.Location = New System.Drawing.Point(538, 349)
Me.CmdSave.Name = "CmdSave"
Me.CmdSave.Size = New System.Drawing.Size(94, 23)
Me.CmdSave.TabIndex = 108
@@ -343,7 +345,7 @@ Partial Class frmHostBearbeiten
'
Me.TxtModell.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest
Me.TxtModell.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.TxtModell.Location = New System.Drawing.Point(3, 175)
Me.TxtModell.Location = New System.Drawing.Point(6, 129)
Me.TxtModell.Name = "TxtModell"
Me.TxtModell.Size = New System.Drawing.Size(300, 20)
Me.TxtModell.TabIndex = 96
@@ -353,7 +355,7 @@ Partial Class frmHostBearbeiten
Me.CmdReset.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdReset.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdReset.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdReset.Location = New System.Drawing.Point(328, 425)
Me.CmdReset.Location = New System.Drawing.Point(115, 379)
Me.CmdReset.Name = "CmdReset"
Me.CmdReset.Size = New System.Drawing.Size(94, 23)
Me.CmdReset.TabIndex = 111
@@ -365,7 +367,7 @@ Partial Class frmHostBearbeiten
Me.CmdAbbrechen.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdAbbrechen.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdAbbrechen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdAbbrechen.Location = New System.Drawing.Point(534, 425)
Me.CmdAbbrechen.Location = New System.Drawing.Point(538, 378)
Me.CmdAbbrechen.Name = "CmdAbbrechen"
Me.CmdAbbrechen.Size = New System.Drawing.Size(94, 23)
Me.CmdAbbrechen.TabIndex = 109
@@ -375,7 +377,7 @@ Partial Class frmHostBearbeiten
'LblLink
'
Me.LblLink.AutoSize = True
Me.LblLink.Location = New System.Drawing.Point(325, 315)
Me.LblLink.Location = New System.Drawing.Point(329, 297)
Me.LblLink.Name = "LblLink"
Me.LblLink.Size = New System.Drawing.Size(78, 13)
Me.LblLink.TabIndex = 124
@@ -386,7 +388,7 @@ Partial Class frmHostBearbeiten
Me.CmdIPDown.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdIPDown.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdIPDown.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdIPDown.Location = New System.Drawing.Point(3, 9)
Me.CmdIPDown.Location = New System.Drawing.Point(3, 3)
Me.CmdIPDown.Name = "CmdIPDown"
Me.CmdIPDown.Size = New System.Drawing.Size(75, 23)
Me.CmdIPDown.TabIndex = 119
@@ -396,7 +398,7 @@ Partial Class frmHostBearbeiten
'TxtLink
'
Me.TxtLink.ContextMenuStrip = Me.ContextMenuStrip1
Me.TxtLink.Location = New System.Drawing.Point(328, 331)
Me.TxtLink.Location = New System.Drawing.Point(332, 313)
Me.TxtLink.Name = "TxtLink"
Me.TxtLink.Size = New System.Drawing.Size(300, 20)
Me.TxtLink.TabIndex = 107
@@ -418,7 +420,7 @@ Partial Class frmHostBearbeiten
Me.CmdIPUp.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdIPUp.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdIPUp.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdIPUp.Location = New System.Drawing.Point(228, 9)
Me.CmdIPUp.Location = New System.Drawing.Point(228, 3)
Me.CmdIPUp.Name = "CmdIPUp"
Me.CmdIPUp.Size = New System.Drawing.Size(75, 23)
Me.CmdIPUp.TabIndex = 120
@@ -430,7 +432,7 @@ Partial Class frmHostBearbeiten
Me.CmdDateien.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdDateien.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdDateien.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdDateien.Location = New System.Drawing.Point(328, 396)
Me.CmdDateien.Location = New System.Drawing.Point(332, 378)
Me.CmdDateien.Name = "CmdDateien"
Me.CmdDateien.Size = New System.Drawing.Size(94, 23)
Me.CmdDateien.TabIndex = 110
@@ -440,7 +442,7 @@ Partial Class frmHostBearbeiten
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(325, 276)
Me.Label6.Location = New System.Drawing.Point(329, 258)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(52, 13)
Me.Label6.TabIndex = 123
@@ -449,7 +451,7 @@ Partial Class frmHostBearbeiten
'LbIPNetzwerkadresse
'
Me.LbIPNetzwerkadresse.AutoSize = True
Me.LbIPNetzwerkadresse.Location = New System.Drawing.Point(225, 81)
Me.LbIPNetzwerkadresse.Location = New System.Drawing.Point(228, 35)
Me.LbIPNetzwerkadresse.Name = "LbIPNetzwerkadresse"
Me.LbIPNetzwerkadresse.Size = New System.Drawing.Size(43, 13)
Me.LbIPNetzwerkadresse.TabIndex = 121
@@ -457,7 +459,7 @@ Partial Class frmHostBearbeiten
'
'TxtKennwort
'
Me.TxtKennwort.Location = New System.Drawing.Point(328, 292)
Me.TxtKennwort.Location = New System.Drawing.Point(332, 274)
Me.TxtKennwort.Name = "TxtKennwort"
Me.TxtKennwort.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42)
Me.TxtKennwort.Size = New System.Drawing.Size(300, 20)
@@ -465,7 +467,7 @@ Partial Class frmHostBearbeiten
'
'TxtHost
'
Me.TxtHost.Location = New System.Drawing.Point(228, 97)
Me.TxtHost.Location = New System.Drawing.Point(231, 51)
Me.TxtHost.Name = "TxtHost"
Me.TxtHost.Size = New System.Drawing.Size(75, 20)
Me.TxtHost.TabIndex = 94
@@ -473,7 +475,7 @@ Partial Class frmHostBearbeiten
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Location = New System.Drawing.Point(325, 237)
Me.Label7.Location = New System.Drawing.Point(329, 219)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(75, 13)
Me.Label7.TabIndex = 122
@@ -484,7 +486,7 @@ Partial Class frmHostBearbeiten
Me.CmdDelete.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.CmdDelete.FlatAppearance.BorderColor = System.Drawing.Color.DimGray
Me.CmdDelete.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.CmdDelete.Location = New System.Drawing.Point(1, 425)
Me.CmdDelete.Location = New System.Drawing.Point(4, 379)
Me.CmdDelete.Name = "CmdDelete"
Me.CmdDelete.Size = New System.Drawing.Size(94, 23)
Me.CmdDelete.TabIndex = 112
@@ -495,14 +497,13 @@ Partial Class frmHostBearbeiten
'
Me.TxtBenutzername.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest
Me.TxtBenutzername.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource
Me.TxtBenutzername.Location = New System.Drawing.Point(328, 253)
Me.TxtBenutzername.Location = New System.Drawing.Point(332, 235)
Me.TxtBenutzername.Name = "TxtBenutzername"
Me.TxtBenutzername.Size = New System.Drawing.Size(300, 20)
Me.TxtBenutzername.TabIndex = 104
'
'Panel1
'
Me.Panel1.Controls.Add(Me.lblSuchfilter)
Me.Panel1.Controls.Add(Me.ChkShowSlaves)
Me.Panel1.Controls.Add(Me.chkFirewall)
Me.Panel1.Controls.Add(Me.TxtBenutzername)
@@ -519,11 +520,9 @@ Partial Class frmHostBearbeiten
Me.Panel1.Controls.Add(Me.CmdCopy)
Me.Panel1.Controls.Add(Me.CmdDateien)
Me.Panel1.Controls.Add(Me.ChkKennwortAnzeigen)
Me.Panel1.Controls.Add(Me.CmdIPUp)
Me.Panel1.Controls.Add(Me.CmdIPChange)
Me.Panel1.Controls.Add(Me.TxtLink)
Me.Panel1.Controls.Add(Me.TxtIP)
Me.Panel1.Controls.Add(Me.CmdIPDown)
Me.Panel1.Controls.Add(Me.Label1)
Me.Panel1.Controls.Add(Me.LblLink)
Me.Panel1.Controls.Add(Me.CmdLink)
@@ -545,16 +544,16 @@ Partial Class frmHostBearbeiten
Me.Panel1.Controls.Add(Me.TxtSeriennummer)
Me.Panel1.Controls.Add(Me.Label9)
Me.Panel1.Controls.Add(Me.Label4)
Me.Panel1.Location = New System.Drawing.Point(12, 12)
Me.Panel1.Location = New System.Drawing.Point(12, 62)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(643, 518)
Me.Panel1.Size = New System.Drawing.Size(643, 468)
Me.Panel1.TabIndex = 137
'
'lblSuchfilter
'
Me.lblSuchfilter.AutoSize = True
Me.lblSuchfilter.BackColor = System.Drawing.Color.IndianRed
Me.lblSuchfilter.Location = New System.Drawing.Point(96, 14)
Me.lblSuchfilter.Location = New System.Drawing.Point(96, 8)
Me.lblSuchfilter.Name = "lblSuchfilter"
Me.lblSuchfilter.Size = New System.Drawing.Size(107, 13)
Me.lblSuchfilter.TabIndex = 138
@@ -564,7 +563,7 @@ Partial Class frmHostBearbeiten
'ChkShowSlaves
'
Me.ChkShowSlaves.AutoSize = True
Me.ChkShowSlaves.Location = New System.Drawing.Point(383, 485)
Me.ChkShowSlaves.Location = New System.Drawing.Point(387, 447)
Me.ChkShowSlaves.Name = "ChkShowSlaves"
Me.ChkShowSlaves.Size = New System.Drawing.Size(104, 17)
Me.ChkShowSlaves.TabIndex = 137
@@ -601,6 +600,16 @@ Partial Class frmHostBearbeiten
Me.PictureBox1.TabIndex = 140
Me.PictureBox1.TabStop = False
'
'PanNavTop
'
Me.PanNavTop.Controls.Add(Me.lblSuchfilter)
Me.PanNavTop.Controls.Add(Me.CmdIPDown)
Me.PanNavTop.Controls.Add(Me.CmdIPUp)
Me.PanNavTop.Location = New System.Drawing.Point(12, 24)
Me.PanNavTop.Name = "PanNavTop"
Me.PanNavTop.Size = New System.Drawing.Size(309, 32)
Me.PanNavTop.TabIndex = 141
'
'frmHostBearbeiten
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -609,6 +618,7 @@ Partial Class frmHostBearbeiten
Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.ClientSize = New System.Drawing.Size(1608, 815)
Me.Controls.Add(Me.PanNavTop)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.PanSlaves)
Me.Controls.Add(Me.PanFirewall)
@@ -622,6 +632,8 @@ Partial Class frmHostBearbeiten
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.PanNavTop.ResumeLayout(False)
Me.PanNavTop.PerformLayout()
Me.ResumeLayout(False)
End Sub
@@ -677,4 +689,5 @@ Partial Class frmHostBearbeiten
Friend WithEvents GeheZuToolStripMenuItem As ToolStripMenuItem
Friend WithEvents lblSuchfilter As Label
Friend WithEvents PictureBox1 As PictureBox
Friend WithEvents PanNavTop As Panel
End Class

57
Dokumentation/frmLeer.Designer.vb generated Normal file
View File

@@ -0,0 +1,57 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmLeer
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(frmLeer))
Me.PanMain = New System.Windows.Forms.Panel()
Me.SuspendLayout()
'
'PanMain
'
Me.PanMain.AutoSize = True
Me.PanMain.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.PanMain.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.PanMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.PanMain.Location = New System.Drawing.Point(0, 0)
Me.PanMain.Name = "PanMain"
Me.PanMain.Size = New System.Drawing.Size(246, 450)
Me.PanMain.TabIndex = 0
'
'frmLeer
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.AutoSize = True
Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.ClientSize = New System.Drawing.Size(246, 450)
Me.Controls.Add(Me.PanMain)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmLeer"
Me.Text = "frmLeer"
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents PanMain As Panel
End Class

980
Dokumentation/frmLeer.resx Normal file
View File

@@ -0,0 +1,980 @@
<?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="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAgIAAAAAAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAA
AACIYDh5TSB6TSF2SRt3Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh12SRt6TSF5TSCIYDh6TSFqOAZqOQdmMwBoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNmMwBqOQdqOAZ6TSF5TB9pNwVqOQdo
NQNoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNQNqOQdpNwV5TB9uPQ1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBuPQ1tPAtmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBt
PAtxQhNmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBxQhN3SRxnNAFoNQNmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNQNnNAF3SRx4Sx5oNQNoNgRm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN4Sx53Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwDm4N3/////////
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
//////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwCMblj///////////////////////////+M
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwC3
p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwDm4N3/////////////
//+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
//////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
//////////////+3p5xmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwCjjH3/
///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
//////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
9fRmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwDUy8X///////////////+t
mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
//+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
6+n///////////////+jjH1mMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwCYfWv/////
///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
//////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
//+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
//////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
mo1mMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwDLv7j////////////////Bs6pm
MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
//////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwB0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
//////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3
Sh13Sh1oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN3Sh14Sx5oNQNoNgRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBoNgRoNQN4Sx53SRxnNAFoNQNm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBoNQNnNAF3SRxxQhNmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBxQhNtPAtmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBt
PAtuPQ1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBuPQ15TB9pNwVqOQdoNQNoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRo
NgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNgRoNQNqOQdpNwV5TB96TSFqOAZqOQdm
MwBoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNoNQNo
NQNmMwBqOQdqOAZ6TSGIYDh5TSB6TSF2SRt3Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13
Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh13Sh12SRt6TSF5TSCIYDj/////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARQUFB+fn6oqKjZ2dn/////
///////////////////////////////////////////////////////Z2dmoqKh+fn5QUFAEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAR+fn6oqKjZ2dn///////////////////////////////////////8E
BAQEBAQEBAQEBAQEBATh4eH////////////////////////////////////////////////////////Z
2dkEBAQEBAQEBAQEBAQEBATZ2dn////////////////////////////////IyMicnJxqamoEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBARQUFB+fn6+vr7p6en/////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAR+fn7h4eH////////////////////////////////////////////h
4eF+fn4EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARqamrh4eH/
//////////////////////////////8EBAQEBAQEBAQEBAQEBARqamr/////////////////////////
//////////////////////////////9+fn4EBAQEBAQEBAQEBAR+fn7/////////////////////////
///Z2dlQUFAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBASoqKj/
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATIyMj/////////
///////////////////////////IyMgEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBATIyMj///////////////////////////8EBAQEBAQEBAQEBAQE
BAQEBAS+vr7////////////////////////////////////////////////Z2dkEBAQEBAQEBAQEBAQE
BATZ2dn////////////////////////IyMgEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBARqamrx8fH/////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT////////////////////////////////////////x8fHR0dGcnJwE
BAQEBAQEBAQEBAQEBAQEBATR0dH////////////////////////////Z2dkEBAQEBAQEBAQEBAQEBAQE
BAScnJzR0dHx8fH////////////////x8fHR0dGcnJwEBAQEBAQEBAQEBAQEBAQEBATZ2dn/////////
//////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBATp6en/////////////////////////////////
//////////9+fn4EBAQEBAQEBAQEBAR+fn7////////////////////////h4eEEBAQEBAQEBAQEBAQE
BAQEBASoqKjR0dHh4eH////////////p6enZ2dm+vr5QUFAEBAQEBAQEBAQEBAQEBAScnJz/////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
///////////////////////////////p6elqamoEBAQEBAQEBAQEBARQUFD/////////////////////
//////9QUFAEBAQEBAQEBAQEBARqamrh4eH////////////////////////////////////////h4eFq
amoEBAQEBAQEBAQEBARQUFD///////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBASOjo7/
///////////////////////////////////////h4eEEBAQEBAQEBAQEBAQEBATIyMj/////////////
//////////9QUFAEBAQEBAQEBAQEBARqamrh4eH///////////////////////////////////////+c
nJwEBAQEBAQEBAQEBAQEBATZ2dn///////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT////////////////////////////////////////////////////////x8fEEBAQEBAQE
BAQEBAQEBATIyMj////////////////////R0dEEBAQEBAQEBAQEBAQEBATx8fH/////////////////
///////////////////////////////x8fEEBAQEBAQEBAQEBAQEBATIyMj///////////////////8E
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBATR0dH///////////////////////////////////+cnJwEBAQE
BAQEBAQEBARQUFD////////////////////////R0dEEBAQEBAQEBAQEBAQEBATh4eH/////////////
//////////////////////////////////+Ojo4EBAQEBAQEBAQEBASOjo7/////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////+0tLQEBAQEBAQEBAQEBAScnJz///////////////////+cnJwEBAQEBAQE
BAQEBAS0tLT///////////////////////////////////////////////////////+0tLQEBAQEBAQE
BAQEBAScnJz///////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATx8fH/////////
///////////////////p6ekEBAQEBAQEBAQEBAQEBATIyMj///////////////////////+cnJwEBAQE
BAQEBAQEBAScnJz////////////////////////////////////////////////////h4eEEBAQEBAQE
BAQEBAQEBATx8fH///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
///////////////////////////////////////////////////////h4eEEBAQEBAQEBAQEBARqamr/
//////////////////9+fn4EBAQEBAQEBAQEBATh4eH/////////////////////////////////////
///////////////////h4eEEBAQEBAQEBAQEBAR+fn7///////////////////8EBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBASoqKj///////////////////////////+cnJwEBAQEBAQEBAQEBARQUFD/////
//////////////////////9qamoEBAQEBAQEBAQEBATIyMj/////////////////////////////////
//////////////////////9QUFAEBAQEBAQEBAQEBATZ2dn/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATZ2dn////////////////////p
6ekEBAQEBAQEBAQEBAQEBATIyMj///////////////////////////8EBAQEBAQEBAQEBAQEBATZ2dn/
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBATIyMj/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAR+fn4EBAQEBAQE
BAQEBARqamr///////////////////+cnJwEBAQEBAQEBAQEBARQUFD/////////////////////////
//////8EBAQEBAQEBAQEBAQEBATh4eH/////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////////8EBAQE
BAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBATp6ekEBAQEBAQEBAQEBAQEBAS0tLT////////////p6ekEBAQEBAQEBAQEBAQE
BATIyMj///////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQE
BAQEBAT///////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT///+0tLQEBAQEBAQEBAQEBAQEBATp
6en///////+cnJwEBAQEBAQEBAQEBARQUFD///////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/
//////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQE
BAT///////9qamoEBAQEBAQEBAQEBAR+fn7////p6ekEBAQEBAQEBAQEBAQEBATIyMj/////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAT////////h4eEEBAQEBAQEBAQEBAQEBATIyMicnJwEBAQE
BAQEBAQEBAQEBATx8fH///////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT///////////+o
qKgEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////////8EBAQE
BAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBAT////////////x8fFQUFAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATx8fH/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQE
BAQEBAT///////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT////////////////Z2dkEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAS0tLT///////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/
//////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQE
BAT///////////////////+Ojo4EBAQEBAQEBAQEBAQEBAQEBAQEBATx8fH/////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAT////////////////////x8fEEBAQEBAQEBAQEBAQEBAQE
BAS0tLT///////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////
//////////++vr4EBAQEBAQEBAQEBAQEBATR0dH/////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////////8EBAQE
BAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBAT///////////////////////////9+fn4EBAQEBAQEBAQEBARqamr/////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQE
BAQEBAT///////////////////////////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT////////////////////////////p
6ekEBAQEBAQEBAQEBAQEBAS+vr7///////////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/
//////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQE
BAT///////////////////////////////+0tLQEBAQEBAQEBAQEBAQEBATp6en/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////
//////////////////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////8EBAQEBAQEBAQEBAQEBAT///////////////////////////////////9QUFAEBAQE
BAQEBAQEBASOjo7///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////
//8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////
///////////////////////Z2dkEBAQEBAQEBAQEBAQEBATR0dH/////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAT////////////////////////////////////////////////////////////h4eEEBAQE
BAQEBAQEBARqamr///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT///////////////////8E
BAQEBAQEBAQEBAQEBAT///////////////////////////////////////+oqKgEBAQEBAQEBAQEBARQ
UFDx8fH///////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////+0tLQEBAQEBAQEBAQEBAScnJz///////////////////9+fn4EBAQEBAQE
BAQEBATh4eH////////////////////////////////////////////////////////h4eEEBAQEBAQE
BAQEBAR+fn7///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////
///////////x8fEEBAQEBAQEBAQEBAQEBASoqKj///////////////////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
///////////////////////////////////////////////////x8fEEBAQEBAQEBAQEBAQEBATIyMj/
//////////////////+cnJwEBAQEBAQEBAQEBAS0tLT/////////////////////////////////////
//////////////////+0tLQEBAQEBAQEBAQEBAScnJz///////////////////8EBAQEBAQEBAQEBAQE
BAT////////////////////////////////////////////R0dEEBAQEBAQEBAQEBAQEBATh4eH/////
//////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
//////8EBAQEBAQEBAQEBAQEBAT////////////////////////////////////////////////////p
6elqamoEBAQEBAQEBAQEBARQUFD////////////////////////R0dEEBAQEBAQEBAQEBAQEBATx8fH/
///////////////////////////////////////////////x8fEEBAQEBAQEBAQEBAQEBATR0dH/////
//////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////
//9+fn4EBAQEBAQEBAQEBARqamr///////////////////////////8EBAQEBAQEBAQEBAQEBAT/////
//////////////////////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/
//////////////////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
///////////////////x8fHR0dGcnJwEBAQEBAQEBAQEBAQEBAQEBATZ2dn/////////////////////
//////9QUFAEBAQEBAQEBAQEBARqamrh4eH////////////////////////////////////////h4eFq
amoEBAQEBAQEBAQEBARQUFD///////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////
///////////////////////////////////p6ekEBAQEBAQEBAQEBAQEBAS+vr7/////////////////
//////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////////////////////
//////9+fn4EBAQEBAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BATIyMj////////////////////////////////Z2dkEBAQEBAQEBAQEBAQEBAQEBAScnJzR0dHx8fH/
///////////////x8fHR0dGcnJwEBAQEBAQEBAQEBAQEBAQEBATZ2dn///////////////////////8E
BAQEBAQEBAQEBAQEBAT///////////////////////////////////////////////////++vr4EBAQE
BAQEBAQEBAQEBATx8fH///////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////
//////////////////////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////
//////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAR+fn7h4eH////////////////////////////////////////IyMgE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBATI
yMj///////////////////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////
//////////////////////////9qamoEBAQEBAQEBAQEBASOjo7///////////////////8EBAQEBAQE
BAQEBAQEBAT///////////////////////////////////////////////////////////9+fn4EBAQE
BAQEBAQEBAS0tLT///////////////////////////////////////8EBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBARQUFB+fn6oqKjh4eH/////////////////////
///////////////////////////////h4eF+fn4EBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQE
BAQEBAQEBAQEBAQEBAQEBAR+fn7h4eH///////////////////////////////8EBAQEBAQEBAQEBAQE
BAT////////////////////////////////////////////////////////h4eEEBAQEBAQEBAQEBAQE
BATZ2dn///////////////8EBAQEBAQEBAQEBAQEBAT/////////////////////////////////////
//////////////////////9+fn4EBAQEBAQEBAQEBAS0tLT/////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////h4eGoqKh+
fn5QUFAEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAR+fn6oqKjZ2dn/////////////////////////
//////////////+0tLS0tLS0tLS0tLS0tLT/////////////////////////////////////////////
///////////////R0dG0tLS0tLS0tLS0tLS+vr7///////////////+0tLS0tLS0tLS0tLS0tLT/////
///////////////////////////////////////////////////////IyMi0tLS0tLS0tLS0tLTZ2dn/
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//////////////////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>

3
Dokumentation/frmLeer.vb Normal file
View File

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

104
Dokumentation/uscntr_Benutzer.Designer.vb generated Normal file
View File

@@ -0,0 +1,104 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class uscntr_Benutzer
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.PanRechts = New System.Windows.Forms.Panel()
Me.btnLoad = New System.Windows.Forms.Button()
Me.PanMain = New System.Windows.Forms.Panel()
Me.dgvBenutzer = New System.Windows.Forms.DataGridView()
Me.PanMain.SuspendLayout()
CType(Me.dgvBenutzer, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'PanRechts
'
Me.PanRechts.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.PanRechts.Location = New System.Drawing.Point(606, 3)
Me.PanRechts.Name = "PanRechts"
Me.PanRechts.Size = New System.Drawing.Size(500, 375)
Me.PanRechts.TabIndex = 0
Me.PanRechts.Visible = False
'
'btnLoad
'
Me.btnLoad.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnLoad.FlatAppearance.MouseOverBackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
Me.btnLoad.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnLoad.Image = Global.Dokumentation.My.Resources.Resources.Link20
Me.btnLoad.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnLoad.Location = New System.Drawing.Point(963, 384)
Me.btnLoad.Name = "btnLoad"
Me.btnLoad.Size = New System.Drawing.Size(140, 28)
Me.btnLoad.TabIndex = 10
Me.btnLoad.Text = "Benutzer laden"
Me.btnLoad.UseVisualStyleBackColor = False
Me.btnLoad.Visible = False
'
'PanMain
'
Me.PanMain.AutoSize = True
Me.PanMain.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.PanMain.Controls.Add(Me.dgvBenutzer)
Me.PanMain.Controls.Add(Me.btnLoad)
Me.PanMain.Controls.Add(Me.PanRechts)
Me.PanMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.PanMain.Location = New System.Drawing.Point(0, 0)
Me.PanMain.Name = "PanMain"
Me.PanMain.Size = New System.Drawing.Size(1109, 415)
Me.PanMain.TabIndex = 1
'
'dgvBenutzer
'
Me.dgvBenutzer.AllowUserToAddRows = False
Me.dgvBenutzer.AllowUserToDeleteRows = False
Me.dgvBenutzer.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvBenutzer.Location = New System.Drawing.Point(3, 3)
Me.dgvBenutzer.MultiSelect = False
Me.dgvBenutzer.Name = "dgvBenutzer"
Me.dgvBenutzer.ReadOnly = True
Me.dgvBenutzer.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvBenutzer.Size = New System.Drawing.Size(597, 375)
Me.dgvBenutzer.TabIndex = 0
'
'uscntr_Benutzer
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.AutoSize = True
Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.Controls.Add(Me.PanMain)
Me.Name = "uscntr_Benutzer"
Me.Size = New System.Drawing.Size(1109, 415)
Me.PanMain.ResumeLayout(False)
CType(Me.dgvBenutzer, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents PanRechts As Panel
Friend WithEvents PanMain As Panel
Friend WithEvents dgvBenutzer As DataGridView
Friend WithEvents btnLoad As Button
End Class

View File

@@ -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>

View File

@@ -0,0 +1,109 @@
Public Class uscntr_Benutzer
Private Sub uscntr_Benutzer_Load(sender As Object, e As EventArgs) Handles Me.Load
Laden()
End Sub
Private Sub btnLoad_Click(sender As Object, e As EventArgs) Handles btnLoad.Click
Laden()
'LoadGroupmembers()
End Sub
Function Laden()
With dgvBenutzer
.DataSource = LoadGroupmembers()
For Each columns In dgvBenutzer.Columns
columns.visible = False
Next
.Columns("Vorname").Visible = True
.Columns("Vorname").DisplayIndex = 1
.Columns("Vorname").AutoSizeMode = DataGridViewAutoSizeColumnMode.AllCells
.Columns("Nachname").Visible = True
.Columns("Nachname").DisplayIndex = 2
.Columns("Domäne").Visible = True
.Columns("Domäne").DisplayIndex = 3
.Columns("Mail").Visible = True
.Columns("Mail").DisplayIndex = 4
.Columns("Mail").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
End With
End Function
Function LoadGroupmembers()
Dim GroupMembers As New List(Of String)
GroupMembers = cBenutzergruppe.GetUsersInGroup("SG_DOKU_USER_FULL")
Dim GroupMembersList As New List(Of cBenutzer)
For Each Benutzer In GroupMembers
Dim tem As New cBenutzer
tem.FillFromDC(Benutzer)
GroupMembersList.Add(tem)
Next
Return GroupMembersList
End Function
Private Sub dgvBenutzer_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvBenutzer.CellDoubleClick, dgvBenutzer.CellClick
PanRechts.Controls.Clear()
PanRechts.Visible = True
Dim i As Integer = 0
Dim Width As Integer = 0
Dim Height As Integer = 0
Dim selectedUser As New cBenutzer
selectedUser.FillFromDC(dgvBenutzer.CurrentRow.Cells("localdistinguishedName").Value, "distinguishedName")
'Dim frm As New frmLeer
Me.ParentForm.Text = "Berechtigungen " & dgvBenutzer.CurrentRow.Cells("Vorname").Value & " " & dgvBenutzer.CurrentRow.Cells("Nachname").Value & ", " & dgvBenutzer.CurrentRow.Cells("Domäne").Value
For Each Standort As String In Class1.AlleStandorte
Dim usrcntrl As New uscntr_Berechtigungen
usrcntrl.User = selectedUser
usrcntrl.lblName.Text = Standort
usrcntrl.Name = Standort
usrcntrl.Standort = Standort
usrcntrl.Location = New Point(0, i * usrcntrl.Height)
i = i + 1
PanRechts.Controls.Add(usrcntrl)
Width = usrcntrl.Width
Height = ((i) * usrcntrl.Height)
Next
Dim usrcntrlFunktionen As New uscntr_FunktionAdmin
usrcntrlFunktionen.User = selectedUser
usrcntrlFunktionen.lblName.Text = "DokuAdmin"
usrcntrlFunktionen.Name = "DokuAdmin"
usrcntrlFunktionen.Funktion = "DokuAdmin"
usrcntrlFunktionen.Location = New Point(0, Height + 5)
PanRechts.Controls.Add(usrcntrlFunktionen)
Height = Height + usrcntrlFunktionen.Height + 10
PanRechts.Width = Width
PanRechts.Height = Height
'frm.Show()
End Sub
Public Shared Function LoadAllGroupmembers()
Dim GroupMembers As New List(Of String)
GroupMembers = cBenutzergruppe.GetUsersInGroup("SG_DOKU_USER_FULL")
Dim GroupMembersList As New List(Of cBenutzer)
For Each Benutzer In GroupMembers
Dim tem As New cBenutzer
tem.FillFromDC(Benutzer)
GroupMembersList.Add(tem)
Next
Return GroupMembersList
End Function
End Class

View File

@@ -0,0 +1,112 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class uscntr_Berechtigungen
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.lblName = New System.Windows.Forms.Label()
Me.btnNope = New System.Windows.Forms.Button()
Me.btnLesen = New System.Windows.Forms.Button()
Me.btnSchreiben = New System.Windows.Forms.Button()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'lblName
'
Me.lblName.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.lblName.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.lblName.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblName.Location = New System.Drawing.Point(3, 3)
Me.lblName.Margin = New System.Windows.Forms.Padding(3)
Me.lblName.Name = "lblName"
Me.lblName.Size = New System.Drawing.Size(283, 30)
Me.lblName.TabIndex = 0
Me.lblName.Text = "Label1"
Me.lblName.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'btnNope
'
Me.btnNope.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnNope.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnNope.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnNope.Location = New System.Drawing.Point(26, 6)
Me.btnNope.Name = "btnNope"
Me.btnNope.Size = New System.Drawing.Size(121, 24)
Me.btnNope.TabIndex = 1
Me.btnNope.Text = "Verweigern"
Me.btnNope.UseVisualStyleBackColor = False
'
'btnLesen
'
Me.btnLesen.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnLesen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnLesen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnLesen.Location = New System.Drawing.Point(153, 6)
Me.btnLesen.Name = "btnLesen"
Me.btnLesen.Size = New System.Drawing.Size(121, 24)
Me.btnLesen.TabIndex = 2
Me.btnLesen.Text = "Lesen"
Me.btnLesen.UseVisualStyleBackColor = False
'
'btnSchreiben
'
Me.btnSchreiben.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnSchreiben.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSchreiben.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnSchreiben.Location = New System.Drawing.Point(280, 6)
Me.btnSchreiben.Name = "btnSchreiben"
Me.btnSchreiben.Size = New System.Drawing.Size(121, 24)
Me.btnSchreiben.TabIndex = 3
Me.btnSchreiben.Text = "Schreiben"
Me.btnSchreiben.UseVisualStyleBackColor = False
'
'Panel1
'
Me.Panel1.Controls.Add(Me.btnSchreiben)
Me.Panel1.Controls.Add(Me.btnNope)
Me.Panel1.Controls.Add(Me.btnLesen)
Me.Panel1.Location = New System.Drawing.Point(300, 0)
Me.Panel1.Margin = New System.Windows.Forms.Padding(0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(404, 36)
Me.Panel1.TabIndex = 4
'
'uscntr_Berechtigungen
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.lblName)
Me.Name = "uscntr_Berechtigungen"
Me.Size = New System.Drawing.Size(704, 36)
Me.Panel1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents lblName As Label
Friend WithEvents btnNope As Button
Friend WithEvents btnLesen As Button
Friend WithEvents btnSchreiben As Button
Friend WithEvents Panel1 As Panel
End Class

View File

@@ -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>

View File

@@ -0,0 +1,52 @@
Public Class uscntr_Berechtigungen
Property User As cBenutzer = Nothing
Property Standort As String = ""
Property Berechtigung As New cBerechtigungen
Private Sub uscntr_Berechtigungen_Load(sender As Object, e As EventArgs) Handles Me.Load
Berechtigung.Benutzeranmeldename = User.BenutzeranmeldeName
Berechtigung.Standort = Standort
Berechtigung.getFromSQL()
ZeigeBerechtigung()
End Sub
Function ZeigeBerechtigung()
Select Case Berechtigung.Zugriff
Case "0"
btnNope.BackColor = Color.Red
Case "R"
btnLesen.BackColor = Color.Yellow
Case "W"
btnSchreiben.BackColor = Color.Green
End Select
End Function
Private Sub btnNope_Click(sender As Object, e As EventArgs) Handles btnNope.Click, btnSchreiben.Click, btnLesen.Click
Deselect()
Select Case sender.name
Case "btnNope"
sender.backcolor = Color.Red
Berechtigung.Zugriff = "0" : Berechtigung.SaveToSQL()
Case "btnSchreiben"
sender.backcolor = Color.Green
Berechtigung.Zugriff = "W" : Berechtigung.SaveToSQL()
Case "btnLesen"
sender.backcolor = Color.Yellow
Berechtigung.Zugriff = "R" : Berechtigung.SaveToSQL()
End Select
End Sub
Function Deselect()
For Each button As Windows.Forms.Button In Panel1.Controls
button.BackColor = Color.White
Next
End Function
End Class

View File

@@ -0,0 +1,96 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class uscntr_FunktionAdmin
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.lblName = New System.Windows.Forms.Label()
Me.btnJa = New System.Windows.Forms.Button()
Me.btnNein = New System.Windows.Forms.Button()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'lblName
'
Me.lblName.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.lblName.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.lblName.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblName.Location = New System.Drawing.Point(78, 3)
Me.lblName.Margin = New System.Windows.Forms.Padding(3)
Me.lblName.Name = "lblName"
Me.lblName.Size = New System.Drawing.Size(283, 30)
Me.lblName.TabIndex = 1
Me.lblName.Text = "Ist Doku-Admin:"
Me.lblName.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'btnJa
'
Me.btnJa.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnJa.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnJa.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnJa.Location = New System.Drawing.Point(11, 6)
Me.btnJa.Name = "btnJa"
Me.btnJa.Size = New System.Drawing.Size(121, 24)
Me.btnJa.TabIndex = 3
Me.btnJa.Text = "Ja"
Me.btnJa.UseVisualStyleBackColor = False
'
'btnNein
'
Me.btnNein.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.btnNein.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnNein.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnNein.Location = New System.Drawing.Point(138, 6)
Me.btnNein.Name = "btnNein"
Me.btnNein.Size = New System.Drawing.Size(121, 24)
Me.btnNein.TabIndex = 4
Me.btnNein.Text = "Nein"
Me.btnNein.UseVisualStyleBackColor = False
'
'Panel1
'
Me.Panel1.Controls.Add(Me.btnNein)
Me.Panel1.Controls.Add(Me.btnJa)
Me.Panel1.Location = New System.Drawing.Point(385, 0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(316, 36)
Me.Panel1.TabIndex = 5
'
'uscntr_FunktionAdmin
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.GradientActiveCaption
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.lblName)
Me.Name = "uscntr_FunktionAdmin"
Me.Size = New System.Drawing.Size(704, 36)
Me.Panel1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents lblName As Label
Friend WithEvents btnJa As Button
Friend WithEvents btnNein As Button
Friend WithEvents Panel1 As Panel
End Class

View File

@@ -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>

View File

@@ -0,0 +1,42 @@
Public Class uscntr_FunktionAdmin
Property User As cBenutzer = Nothing
Property Funktion As String = ""
Dim Berechtigung As New cBerechtigungen
Private Sub uscntr_Berechtigungen_Load(sender As Object, e As EventArgs) Handles Me.Load
Berechtigung.Benutzeranmeldename = User.BenutzeranmeldeName
Berechtigung.Standort = Funktion
Berechtigung.getFromSQL()
ZeigeBerechtigung()
End Sub
Function ZeigeBerechtigung()
Select Case Berechtigung.Zugriff
Case "0"
btnNein.BackColor = Color.Red
Case "Y"
btnJa.BackColor = Color.Green
End Select
End Function
Private Sub btnJaNein_Click(sender As Object, e As EventArgs) Handles btnJa.Click, btnNein.Click
For Each button As System.Windows.Forms.Button In Panel1.Controls
button.BackColor = Color.White
Next
Select Case sender.name
Case "btnJa"
btnJa.BackColor = Color.Green : Berechtigung.Zugriff = "Y" : Berechtigung.SaveToSQL()
SQL.UpdateSQL("TbL_Berechtigungen", "Zugriff = 'W'", "Benutzeranmeldename = '" & User.BenutzeranmeldeName & "' AND NOT Standort = 'DokuAdmin'")
Case "btnNein"
btnNein.BackColor = Color.Red : Berechtigung.Zugriff = "0" : Berechtigung.SaveToSQL()
End Select
End Sub
End Class