Messaging: Prepare new email lib

This commit is contained in:
Jonathan Jenne 2021-07-19 16:42:22 +02:00
parent 0a19afdcd1
commit b5d8967a5c
26 changed files with 1880 additions and 3 deletions

30
DBCleaner/App.config Normal file
View File

@ -0,0 +1,30 @@
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="DBCleaner.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
</startup>
<userSettings>
<DBCleaner.My.MySettings>
<setting name="MSSQL_CONNECTION_STRING" serializeAs="String">
<value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;User ID=sa;Password=dd</value>
</setting>
<setting name="FB_DATABASE" serializeAs="String">
<value>172.24.12.41:E:\DB\Firebird\Databases\EDMI_TEMPLATE\EDMI_MASTER.FDB</value>
</setting>
<setting name="FB_DATASOURCE" serializeAs="String">
<value>172.24.12.41</value>
</setting>
<setting name="FB_USERNAME" serializeAs="String">
<value>sysdba</value>
</setting>
<setting name="FB_PASSWORD" serializeAs="String">
<value>dd</value>
</setting>
</DBCleaner.My.MySettings>
</userSettings>
</configuration>

144
DBCleaner/DBCleaner.vbproj Normal file
View File

@ -0,0 +1,144 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProjectGuid>{5A7913CE-7D3D-4E84-B23D-4747C178CD71}</ProjectGuid>
<OutputType>WinExe</OutputType>
<StartupObject>DBCleaner.My.MyApplication</StartupObject>
<RootNamespace>DBCleaner</RootNamespace>
<AssemblyName>DBCleaner</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
<Deterministic>true</Deterministic>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>DBCleaner.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>DBCleaner.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup>
<OptionExplicit>On</OptionExplicit>
</PropertyGroup>
<PropertyGroup>
<OptionCompare>Binary</OptionCompare>
</PropertyGroup>
<PropertyGroup>
<OptionStrict>Off</OptionStrict>
</PropertyGroup>
<PropertyGroup>
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<ItemGroup>
<Reference Include="DigitalData.Modules.Database">
<HintPath>..\Modules.Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Logging">
<HintPath>..\Modules.Logging\bin\Release\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="Microsoft.CSharp" />
<Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
<HintPath>..\packages\NLog.4.7.10\lib\net45\NLog.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Configuration" />
<Reference Include="System.Data" />
<Reference Include="System.Deployment" />
<Reference Include="System.Drawing" />
<Reference Include="System.IO.Compression" />
<Reference Include="System.Runtime.Serialization" />
<Reference Include="System.ServiceModel" />
<Reference Include="System.Transactions" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
<Reference Include="System.Net.Http" />
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Data" />
<Import Include="System.Drawing" />
<Import Include="System.Diagnostics" />
<Import Include="System.Windows.Forms" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="Form1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Form1.Designer.vb">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="Form1.resx">
<DependentUpon>Form1.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
<None Include="App.config" />
<None Include="packages.config" />
</ItemGroup>
<ItemGroup>
<Content Include="zugferdhistory.txt">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
</Project>

83
DBCleaner/Form1.Designer.vb generated Normal file
View File

@ -0,0 +1,83 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.ListBox1 = New System.Windows.Forms.ListBox()
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
Me.BringTheActionToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripComboBox1 = New System.Windows.Forms.ToolStripComboBox()
Me.MenuStrip1.SuspendLayout()
Me.SuspendLayout()
'
'ListBox1
'
Me.ListBox1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ListBox1.FormattingEnabled = True
Me.ListBox1.Location = New System.Drawing.Point(0, 27)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(679, 511)
Me.ListBox1.TabIndex = 0
'
'MenuStrip1
'
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BringTheActionToolStripMenuItem, Me.ToolStripComboBox1})
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Size = New System.Drawing.Size(679, 27)
Me.MenuStrip1.TabIndex = 1
Me.MenuStrip1.Text = "MenuStrip1"
'
'BringTheActionToolStripMenuItem
'
Me.BringTheActionToolStripMenuItem.Name = "BringTheActionToolStripMenuItem"
Me.BringTheActionToolStripMenuItem.Size = New System.Drawing.Size(108, 20)
Me.BringTheActionToolStripMenuItem.Text = "Bring the Action!"
'
'ToolStripComboBox1
'
Me.ToolStripComboBox1.Items.AddRange(New Object() {"SIMULATE", "DELETE"})
Me.ToolStripComboBox1.Name = "ToolStripComboBox1"
Me.ToolStripComboBox1.Size = New System.Drawing.Size(121, 23)
'
'Form1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(679, 538)
Me.Controls.Add(Me.ListBox1)
Me.Controls.Add(Me.MenuStrip1)
Me.MainMenuStrip = Me.MenuStrip1
Me.Name = "Form1"
Me.Text = "Form1"
Me.MenuStrip1.ResumeLayout(False)
Me.MenuStrip1.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents ListBox1 As ListBox
Friend WithEvents MenuStrip1 As MenuStrip
Friend WithEvents BringTheActionToolStripMenuItem As ToolStripMenuItem
Friend WithEvents ToolStripComboBox1 As ToolStripComboBox
End Class

123
DBCleaner/Form1.resx Normal file
View File

@ -0,0 +1,123 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
</root>

109
DBCleaner/Form1.vb Normal file
View File

@ -0,0 +1,109 @@
Imports System.IO
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Public Class Form1
Private MsgIds As New List(Of String)
Public oMSSQL As MSSQLServer
Public oFirebird As Firebird
Public oLogConfig As LogConfig
Public oLogger As Logger
Public ExistingIds As Integer
Public MissingIds As Integer
Public FailedIds As Integer
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
oLogConfig = New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath)
oLogger = oLogConfig.GetLogger
ToolStripComboBox1.SelectedIndex = 0
Try
oMSSQL = New MSSQLServer(oLogConfig, My.Settings.MSSQL_CONNECTION_STRING)
oFirebird = New Firebird(oLogConfig, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USERNAME, My.Settings.FB_PASSWORD)
Dim oFilename As String = "zugferdhistory.txt"
Dim oPath As String = Path.Combine(Application.StartupPath, oFilename)
If File.Exists(oPath) = False Then
Throw New Exception($"{oFilename} does not exist!!")
End If
MsgIds = File.ReadAllLines(oFilename).ToList
AddLog($"{MsgIds.Count} MessageIDs added!")
Catch ex As Exception
oLogger.Error(ex)
MsgBox("Error: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
End Try
End Sub
Private Sub AddLog(Message As String)
oLogger.Info(Message)
ListBox1.Items.Add(Message)
ListBox1.SelectedIndex = ListBox1.Items.Count - 1
End Sub
Private Sub BringTheActionToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BringTheActionToolStripMenuItem.Click
If ToolStripComboBox1.Text = "DELETE" Then
Dim oResult = MsgBox("Action is set to DELETE! Do you want to continue?", MsgBoxStyle.YesNo, "Attention")
If oResult = MsgBoxResult.Yes Then
DoIt()
Else
MsgBox("Coward!")
End If
Else
DoIt()
End If
End Sub
Private Sub DoIt()
For Each oMessageId As String In MsgIds
Try
Dim oSQL As String = $"SELECT msgid FROM VWCUST_BELEGE_TODAY WHERE msgid = '{oMessageId}'"
Dim oResult As DataTable = oMSSQL.GetDatatable(oSQL)
If oResult Is Nothing Then
Throw New Exception($"Nothing found in VWCUST_BELEGE_TODAY for message id [{oMessageId}]")
End If
AddLog($"rows for messageid [{oMessageId}]: [{oResult.Rows.Count}]")
If oResult.Rows.Count = 0 Then
AddLog("No rows found, deleting from FB history.")
' Delete from fb history
oSQL = $"DELETE FROM TBEDM_ZUGFERD_HISTORY_IN WHERE MESSAGE_ID = '{oMessageId}'"
If ToolStripComboBox1.Text = "DELETE" Then
If oFirebird.ExecuteNonQuery(oSQL) = True Then
AddLog("Delete successful!")
End If
Else
AddLog("Simulating Delete !")
AddLog(oSQL)
End If
MissingIds += 1
Else
AddLog("Rows found, all good!")
ExistingIds += 1
End If
Catch ex As Exception
oLogger.Warn("Error while checking existence of MessageId [{0}]: {1}", oMessageId, ex.Message)
oLogger.Error(ex)
FailedIds += 1
End Try
Next
AddLog("MissingIds: " & MissingIds)
AddLog("ExistingIds: " & ExistingIds)
AddLog("FailedIds: " & FailedIds)
End Sub
End Class

View File

@ -0,0 +1,38 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
' or if you encounter build errors in this file, go to the Project Designer
' (go to Project Properties or double-click the My Project node in
' Solution Explorer), and make changes on the Application tab.
'
Partial Friend Class MyApplication
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = false
Me.EnableVisualStyles = true
Me.SaveMySettingsOnExit = true
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DBCleaner.Form1
End Sub
End Class
End Namespace

View File

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

View File

@ -0,0 +1,35 @@
Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices
' Allgemeine Informationen über eine Assembly werden über die folgenden
' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
' die einer Assembly zugeordnet sind.
' Werte der Assemblyattribute überprüfen
<Assembly: AssemblyTitle("DBCleaner")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")>
<Assembly: AssemblyProduct("DBCleaner")>
<Assembly: AssemblyCopyright("Copyright © 2021")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
<Assembly: Guid("35562092-423e-4e78-a3d4-8d6e515749ff")>
' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
'
' Hauptversion
' Nebenversion
' Buildnummer
' Revision
'
' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
' indem Sie "*" wie unten gezeigt eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

View File

@ -0,0 +1,62 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My.Resources
'This class was auto-generated by the StronglyTypedResourceBuilder
'class via a tool like ResGen or Visual Studio.
'To add or remove a member, edit your .ResX file then rerun ResGen
'with the /str option, or rebuild your VS project.
'''<summary>
''' A strongly-typed resource class, for looking up localized strings, etc.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
Friend Module Resources
Private resourceMan As Global.System.Resources.ResourceManager
Private resourceCulture As Global.System.Globalization.CultureInfo
'''<summary>
''' Returns the cached ResourceManager instance used by this class.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DBCleaner.Resources", GetType(Resources).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property
'''<summary>
''' Overrides the current thread's CurrentUICulture property for all
''' resource lookups using this strongly typed resource class.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set(ByVal value As Global.System.Globalization.CultureInfo)
resourceCulture = value
End Set
End Property
End Module
End Namespace

View File

@ -0,0 +1,117 @@
<?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.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: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" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
</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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

134
DBCleaner/My Project/Settings.Designer.vb generated Normal file
View File

@ -0,0 +1,134 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "16.8.1.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
#End If
#End Region
Public Shared ReadOnly Property [Default]() As MySettings
Get
#If _MyType = "WindowsForms" Then
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;User ID=sa;P"& _
"assword=dd")> _
Public Property MSSQL_CONNECTION_STRING() As String
Get
Return CType(Me("MSSQL_CONNECTION_STRING"),String)
End Get
Set
Me("MSSQL_CONNECTION_STRING") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("172.24.12.41:E:\DB\Firebird\Databases\EDMI_TEMPLATE\EDMI_MASTER.FDB")> _
Public Property FB_DATABASE() As String
Get
Return CType(Me("FB_DATABASE"),String)
End Get
Set
Me("FB_DATABASE") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("172.24.12.41")> _
Public Property FB_DATASOURCE() As String
Get
Return CType(Me("FB_DATASOURCE"),String)
End Get
Set
Me("FB_DATASOURCE") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("sysdba")> _
Public Property FB_USERNAME() As String
Get
Return CType(Me("FB_USERNAME"),String)
End Get
Set
Me("FB_USERNAME") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("dd")> _
Public Property FB_PASSWORD() As String
Get
Return CType(Me("FB_PASSWORD"),String)
End Get
Set
Me("FB_PASSWORD") = value
End Set
End Property
End Class
End Namespace
Namespace My
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.DBCleaner.My.MySettings
Get
Return Global.DBCleaner.My.MySettings.Default
End Get
End Property
End Module
End Namespace

View File

@ -0,0 +1,21 @@
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="MSSQL_CONNECTION_STRING" Type="System.String" Scope="User">
<Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;User ID=sa;Password=dd</Value>
</Setting>
<Setting Name="FB_DATABASE" Type="System.String" Scope="User">
<Value Profile="(Default)">172.24.12.41:E:\DB\Firebird\Databases\EDMI_TEMPLATE\EDMI_MASTER.FDB</Value>
</Setting>
<Setting Name="FB_DATASOURCE" Type="System.String" Scope="User">
<Value Profile="(Default)">172.24.12.41</Value>
</Setting>
<Setting Name="FB_USERNAME" Type="System.String" Scope="User">
<Value Profile="(Default)">sysdba</Value>
</Setting>
<Setting Name="FB_PASSWORD" Type="System.String" Scope="User">
<Value Profile="(Default)">dd</Value>
</Setting>
</Settings>
</SettingsFile>

View File

@ -0,0 +1,4 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="NLog" version="4.7.10" targetFramework="net461" />
</packages>

View File

@ -0,0 +1,697 @@
1076935838.7326.1626258349382@w2k12srv187
984055528.7166.1626256871580@w2k12srv187
917837693.7208.1626257043103@w2k12srv187
897462137.7246.1626257305465@w2k12srv187
894871814.7300.1626257941334@w2k12srv187
857489364.7200.1626257011553@w2k12srv187
783839294.7296.1626257929388@w2k12srv187
696547040.7252.1626257326953@w2k12srv187
605332597.7160.1626256851257@w2k12srv187
605205936.7220.1626257207156@w2k12srv187
589741496.7170.1626256886068@w2k12srv187
547724749.7236.1626257262111@w2k12srv187
520309019.7318.1626258322216@w2k12srv187
468776216.7256.1626257340035@w2k12srv187
429406764.7260.1626257354861@w2k12srv187
427311904.7192.1626256979532@w2k12srv187
346764118.7240.1626257276975@w2k12srv187
34161707.7262.1626257361287@w2k12srv187
33795703.7214.1626257064048@w2k12srv187
2129798648.7198.1626257002668@w2k12srv187
208594214.7314.1626258307330@w2k12srv187
2052804634.7218.1626257199279@w2k12srv187
1931955927.7164.1626256865514@w2k12srv187
1929256553.7212.1626257056944@w2k12srv187
1866710513.7182.1626256943134@w2k12srv187
183688244.7324.1626258341876@w2k12srv187
1820148155.7228.1626257234067@w2k12srv187
1817343647.7162.1626256858557@w2k12srv187
1794199788.7254.1626257332772@w2k12srv187
176696901.7270.1626257390415@w2k12srv187
175822297.7250.1626257319436@w2k12srv187
1749303670.43690.1626257922178@w2k12srv476
1726221894.7274.1626257406704@w2k12srv187
1707949657.7308.1626258287972@w2k12srv187
170364974.7238.1626257268796@w2k12srv187
1662311293.7194.1626256986135@w2k12srv187
1649072020.7196.1626256993662@w2k12srv187
163757905.7264.1626257369260@w2k12srv187
1628393500.7202.1626257020003@w2k12srv187
1607250297.7190.1626256972260@w2k12srv187
1605058491.7206.1626257036607@w2k12srv187
1524810410.7248.1626257311609@w2k12srv187
1511322065.7172.1626256894073@w2k12srv187
1480125759.7278.1626257423799@w2k12srv187
1477147725.7268.1626257383049@w2k12srv187
1426218319.7180.1626256928818@w2k12srv187
1395698266.7204.1626257029830@w2k12srv187
1383024728.7304.1626258273275@w2k12srv187
1369801308.7258.1626257347447@w2k12srv187
1312946156.7288.1626257579761@w2k12srv187
1290245756.7292.1626257917029@w2k12srv187
1278983894.7290.1626257910540@w2k12srv187
1275862438.7168.1626256877629@w2k12srv187
1266656563.7234.1626257255457@w2k12srv187
1249643870.7176.1626256909312@w2k12srv187
1249036650.7230.1626257240674@w2k12srv187
117935472.7276.1626257415416@w2k12srv187
1109650847.7294.1626257922099@w2k12srv187
1080076772.7272.1626257397981@w2k12srv187
1077191799.7244.1626257294284@w2k12srv187
1036743379.7210.1626257050091@w2k12srv187
1023831255.7174.1626256902124@w2k12srv187
101688401.7222.1626257214090@w2k12srv187
999517949.6978.1626253641981@w2k12srv187
997856290.43502.1626253623224@w2k12srv476
981143206.6968.1626253603796@w2k12srv187
980632742.6523.1626250115793@w2k12srv187
970816025.6422.1626249483313@w2k12srv187
969658703.895.1626253264099@w2k12srv472
966883405.43526.1626253711757@w2k12srv476
962527741.6892.1626252911841@w2k12srv187
961760300.6625.1626250728900@w2k12srv187
961002824.6382.1626249345915@w2k12srv187
960411873.6052.1626246061099@w2k12srv187
956789441.6322.1626249031002@w2k12srv187
955371636.901.1626253272800@w2k12srv472
949797041.43382.1626250000480@w2k12srv476
931732160.6732.1626251276549@w2k12srv187
931637745.6172.1626247851225@w2k12srv187
920894980.6912.1626252995300@w2k12srv187
920189720.6479.1626249833879@w2k12srv187
914713881.43560.1626253823971@w2k12srv476
911776773.6639.1626250782681@w2k12srv187
908430100.6806.1626252194190@w2k12srv187
908211008.6585.1626250477263@w2k12srv187
88952815.6547.1626250211592@w2k12srv187
881961206.43594.1626254044016@w2k12srv476
87857490.6212.1626248233784@w2k12srv187
87448315.6182.1626247886989@w2k12srv187
858542192.43504.1626253632803@w2k12srv476
85824089.6697.1626251133962@w2k12srv187
850838808.6226.1626248578065@w2k12srv187
850431960.875.1626251799835@w2k12srv472
844731630.43652.1626255760037@w2k12srv476
844583360.7116.1626255764955@w2k12srv187
842344709.43410.1626250747788@w2k12srv476
838915659.43650.1626255446555@w2k12srv476
836786773.6774.1626251532746@w2k12srv187
834338745.7158.1626256845403@w2k12srv187
822956359.6118.1626247161348@w2k12srv187
819860538.6748.1626251450022@w2k12srv187
810971594.6459.1626249755143@w2k12srv187
807426433.6499.1626250017020@w2k12srv187
800444363.7058.1626254732579@w2k12srv187
799610075.6796.1626252152147@w2k12srv187
796573076.43606.1626254082915@w2k12srv476
795415185.6130.1626247219989@w2k12srv187
794499926.6368.1626249291996@w2k12srv187
792117517.6154.1626247566112@w2k12srv187
789906442.6056.1626246071528@w2k12srv187
788434096.6292.1626248926823@w2k12srv187
788265009.6766.1626251505550@w2k12srv187
788042541.7056.1626254723733@w2k12srv187
786538508.6786.1626251803993@w2k12srv187
781196136.6916.1626253010561@w2k12srv187
780102859.43532.1626253730665@w2k12srv476
78004262.889.1626253256276@w2k12srv472
777362408.6611.1626250568781@w2k12srv187
774734602.6565.1626250395082@w2k12srv187
758994205.6567.1626250403861@w2k12srv187
755048014.6830.1626252289080@w2k12srv187
752120347.6084.1626246468420@w2k12srv187
747014089.6553.1626250350900@w2k12srv187
741318477.6270.1626248737518@w2k12srv187
739976609.6894.1626252920068@w2k12srv187
739662333.6094.1626246762668@w2k12srv187
73882558.6106.1626246807272@w2k12srv187
736330707.6996.1626253992619@w2k12srv187
735390401.6026.1626245687843@w2k12srv187
729933331.4109.1626252487948@w2k12srv485
727038594.43648.1626255440140@w2k12srv476
725351223.883.1626253246854@w2k12srv472
723929468.43610.1626254091521@w2k12srv476
723625618.43592.1626254035446@w2k12srv476
720585482.43598.1626254061709@w2k12srv476
711785491.43656.1626256122784@w2k12srv476
709999471.7068.1626255056907@w2k12srv187
708458469.6334.1626249068028@w2k12srv187
702006684.6122.1626247178613@w2k12srv187
701279653.6398.1626249407214@w2k12srv187
689829889.6376.1626249324292@w2k12srv187
688794491.6597.1626250519209@w2k12srv187
685690092.907.1626253280643@w2k12srv472
681222515.6944.1626253246702@w2k12srv187
677026068.6505.1626250040120@w2k12srv187
676747432.6954.1626253273298@w2k12srv187
676428948.6701.1626251147128@w2k12srv187
675049424.6050.1626246053893@w2k12srv187
672939606.7012.1626254312870@w2k12srv187
670929305.6138.1626247485128@w2k12srv187
670703952.6902.1626252954431@w2k12srv187
658603432.6922.1626253035132@w2k12srv187
654233654.6569.1626250412312@w2k12srv187
645626757.6206.1626248218473@w2k12srv187
644495987.7076.1626255097635@w2k12srv187
637658256.43520.1626253689036@w2k12srv476
623156145.43460.1626252188488@w2k12srv476
621691044.6194.1626247941061@w2k12srv187
621596805.6846.1626252340564@w2k12srv187
621294526.6300.1626248948441@w2k12srv187
617088579.43596.1626254052691@w2k12srv476
614557126.43436.1626251807647@w2k12srv476
60560835.6782.1626251793002@w2k12srv187
602571056.7050.1626254699446@w2k12srv187
594590989.6808.1626252202671@w2k12srv187
591237553.6447.1626249702922@w2k12srv187
586355997.43612.1626254097929@w2k12srv476
578961176.6320.1626249021769@w2k12srv187
576689404.6296.1626248937874@w2k12srv187
574848610.6896.1626252929528@w2k12srv187
562054987.887.1626253253664@w2k12srv472
558450133.6457.1626249749318@w2k12srv187
55373888.6252.1626248672366@w2k12srv187
553242297.6671.1626250908434@w2k12srv187
549340467.6591.1626250495839@w2k12srv187
54628883.43528.1626253718090@w2k12srv476
539880042.43666.1626256506700@w2k12srv476
52852849.879.1626253240096@w2k12srv472
524779253.7006.1626254030782@w2k12srv187
511551220.43584.1626254012486@w2k12srv476
5100851.6112.1626247132004@w2k12srv187
507536031.6794.1626251824355@w2k12srv187
501199969.6587.1626250484320@w2k12srv187
484105837.6066.1626246400369@w2k12srv187
476859515.43340.1626247481974@w2k12srv476
473787047.6178.1626247874208@w2k12srv187
470874186.6192.1626247932085@w2k12srv187
470496754.43542.1626253764022@w2k12srv476
469633005.43420.1626251449741@w2k12srv476
463374831.43570.1626253972463@w2k12srv476
462034922.6404.1626249423407@w2k12srv187
456110641.6527.1626250132147@w2k12srv187
449056712.7032.1626254378448@w2k12srv187
44838038.909.1626253283193@w2k12srv472
44363293.4943.1626252502087@w2k12srv493
443038205.6746.1626251443033@w2k12srv187
440351326.6082.1626246456997@w2k12srv187
437735918.6651.1626250836814@w2k12srv187
429942292.43524.1626253705839@w2k12srv476
429850641.7096.1626255401608@w2k12srv187
428158395.6718.1626251226902@w2k12srv187
424013643.6124.1626247185284@w2k12srv187
422756734.6491.1626249871561@w2k12srv187
420557254.6840.1626252319603@w2k12srv187
411457013.6934.1626253076678@w2k12srv187
411194723.6453.1626249728108@w2k12srv187
406088139.6286.1626248909901@w2k12srv187
403875409.6274.1626248752662@w2k12srv187
396460857.6148.1626247539864@w2k12srv187
393470211.6408.1626249437654@w2k12srv187
390081718.6432.1626249643639@w2k12srv187
374705207.6160.1626247592645@w2k12srv187
37396728.43558.1626253817239@w2k12srv476
37099571.6669.1626250900273@w2k12srv187
366824613.43574.1626253983131@w2k12srv476
363562416.6140.1626247497448@w2k12srv187
361804939.6248.1626248658317@w2k12srv187
355884360.43540.1626253754632@w2k12srv476
349847201.6240.1626248623323@w2k12srv187
34524913.6461.1626249763810@w2k12srv187
344160809.6493.1626249992855@w2k12srv187
331393750.6589.1626250489994@w2k12srv187
325069360.43576.1626253988485@w2k12srv476
324741384.6467.1626249789155@w2k12srv187
320802858.6962.1626253301663@w2k12srv187
319774316.43534.1626253736473@w2k12srv476
318129329.6681.1626250950148@w2k12srv187
306473204.6559.1626250370762@w2k12srv187
30372418.6677.1626250931595@w2k12srv187
298589186.6471.1626249807310@w2k12srv187
297487054.43510.1626253655757@w2k12srv476
295111963.4941.1626252499451@w2k12srv493
286430295.6928.1626253057351@w2k12srv187
284152133.43496.1626253604169@w2k12srv476
283637502.6850.1626252515207@w2k12srv187
279949911.43660.1626256485605@w2k12srv476
271569054.6810.1626252210624@w2k12srv187
270148457.6509.1626250058886@w2k12srv187
268755798.6663.1626250877594@w2k12srv187
267537268.43398.1626250376781@w2k12srv476
263855081.6477.1626249828259@w2k12srv187
261482053.6579.1626250444811@w2k12srv187
258611086.6958.1626253286761@w2k12srv187
257290738.6302.1626248956106@w2k12srv187
236917638.6174.1626247858405@w2k12srv187
233188672.6936.1626253082232@w2k12srv187
229415557.6216.1626248248407@w2k12srv187
225896642.6537.1626250175563@w2k12srv187
225384862.6068.1626246407339@w2k12srv187
21547202.43546.1626253774571@w2k12srv476
2143747795.7156.1626256837826@w2k12srv187
2141155784.6132.1626247234229@w2k12srv187
2140076056.43360.1626248561824@w2k12srv476
2139598887.7054.1626254715836@w2k12srv187
2134699525.6501.1626250024734@w2k12srv187
2127896683.6557.1626250364613@w2k12srv187
2123816305.885.1626253250749@w2k12srv472
2108568520.6800.1626252168097@w2k12srv187
210623924.6086.1626246478625@w2k12srv187
2100948790.7008.1626254036715@w2k12srv187
209943509.6445.1626249696031@w2k12srv187
209589876.6264.1626248716661@w2k12srv187
2086744878.43434.1626251802501@w2k12srv476
2080962050.7124.1626256110214@w2k12srv187
207754522.43530.1626253725635@w2k12srv476
2076674694.6876.1626252583322@w2k12srv187
2072567100.6734.1626251285309@w2k12srv187
2072028577.6685.1626251082274@w2k12srv187
206273623.6256.1626248685863@w2k12srv187
2059879690.6816.1626252235233@w2k12srv187
2056844331.7130.1626256124504@w2k12srv187
2046602605.6822.1626252265516@w2k12srv187
2044977109.6802.1626252176552@w2k12srv187
2043139180.6078.1626246440282@w2k12srv187
2039675483.7052.1626254707201@w2k12srv187
2034052872.6116.1626247151786@w2k12srv187
2033221402.6342.1626249096108@w2k12srv187
2033024024.43578.1626253994367@w2k12srv476
2031414778.43556.1626253810658@w2k12srv476
2023570784.6428.1626249504747@w2k12srv187
2020714254.6054.1626246065443@w2k12srv187
201832212.6960.1626253295293@w2k12srv187
2007243021.43368.1626248920968@w2k12srv476
2004748188.43512.1626253661301@w2k12srv476
1996361188.43432.1626251486443@w2k12srv476
1980769616.6621.1626250719739@w2k12srv187
1978013841.43498.1626253609247@w2k12srv476
1969115467.43536.1626253743960@w2k12srv476
196825623.43616.1626254327282@w2k12srv476
1956767400.43580.1626254001509@w2k12srv476
1955284323.43456.1626252176500@w2k12srv476
195424856.6338.1626249083046@w2k12srv187
1953448300.6238.1626248617870@w2k12srv187
1951322965.43508.1626253650016@w2k12srv476
1950779163.43428.1626251473965@w2k12srv476
1949623567.903.1626253275500@w2k12srv472
1929599040.6904.1626252959792@w2k12srv187
1929597095.6414.1626249458303@w2k12srv187
1928529290.6736.1626251295175@w2k12srv187
1903422743.6513.1626250074410@w2k12srv187
1897373657.7084.1626255144104@w2k12srv187
1893706663.6898.1626252939624@w2k12srv187
1871801663.6258.1626248692953@w2k12srv187
1871231107.913.1626253288507@w2k12srv472
187031545.6394.1626249393222@w2k12srv187
1868654017.6330.1626249054875@w2k12srv187
1864183005.43552.1626253790561@w2k12srv476
1844550997.6581.1626250458019@w2k12srv187
1843841416.6144.1626247519264@w2k12srv187
184130144.6764.1626251497635@w2k12srv187
1841149017.43422.1626251456424@w2k12srv476
1838108250.43636.1626255082450@w2k12srv476
1815735471.6862.1626252543653@w2k12srv187
1808709805.6880.1626252876765@w2k12srv187
1804807064.897.1626253267130@w2k12srv472
1787434698.7004.1626254023105@w2k12srv187
1784926994.893.1626253261611@w2k12srv472
1781971500.6406.1626249430329@w2k12srv187
1781599359.6214.1626248241251@w2k12srv187
1781403756.6487.1626249855747@w2k12srv187
1755495249.6328.1626249049571@w2k12srv187
1754369135.6549.1626250218253@w2k12srv187
1753970585.6756.1626251472552@w2k12srv187
1743708679.6683.1626251073143@w2k12srv187
1737971461.6469.1626249796883@w2k12srv187
173432121.43568.1626253967270@w2k12srv476
1721992909.6218.1626248550048@w2k12srv187
1717815921.7026.1626254359528@w2k12srv187
1714634457.6164.1626247611248@w2k12srv187
1712025019.6629.1626250740792@w2k12srv187
1691911456.6434.1626249650760@w2k12srv187
169058818.6176.1626247867705@w2k12srv187
1683357250.6653.1626250844411@w2k12srv187
1679519849.6384.1626249352510@w2k12srv187
1678692394.6386.1626249358757@w2k12srv187
1673299620.43566.1626253963255@w2k12srv476
1663655109.43662.1626256491335@w2k12srv476
1663380555.6114.1626247141436@w2k12srv187
1658400389.6687.1626251091028@w2k12srv187
1654353978.6180.1626247880837@w2k12srv187
1652960460.6926.1626253051170@w2k12srv187
165196702.6058.1626246076765@w2k12srv187
1650439927.6824.1626252273228@w2k12srv187
1649376155.891.1626253258974@w2k12srv472
1648884463.6519.1626250101236@w2k12srv187
1641458588.6820.1626252255552@w2k12srv187
1637953441.6455.1626249740338@w2k12srv187
1636458641.6726.1626251254259@w2k12srv187
1635668328.6838.1626252311403@w2k12srv187
1633229406.6364.1626249281462@w2k12srv187
1629459434.6834.1626252300661@w2k12srv187
162613074.6503.1626250031632@w2k12srv187
1619844161.6100.1626246785605@w2k12srv187
1609794890.6950.1626253263215@w2k12srv187
1603812085.43356.1626248211935@w2k12srv476
1602462883.7112.1626255752684@w2k12srv187
160008552.43416.1626251088984@w2k12srv476
1586628417.6436.1626249658316@w2k12srv187
1584260699.6298.1626248943357@w2k12srv187
15763097.6186.1626247899447@w2k12srv187
1570738665.6388.1626249366959@w2k12srv187
1566530303.6673.1626250914601@w2k12srv187
1566328071.43464.1626252201734@w2k12srv476
1563074788.6046.1626246039649@w2k12srv187
1561899800.6390.1626249376951@w2k12srv187
1554338191.6230.1626248590986@w2k12srv187
1544923357.6260.1626248700107@w2k12srv187
1542683310.43440.1626251818063@w2k12srv476
1540269546.43640.1626255410545@w2k12srv476
1539815148.43538.1626253749421@w2k12srv476
1536965050.6092.1626246753066@w2k12srv187
1530727988.6740.1626251310140@w2k12srv187
1518448608.6619.1626250713111@w2k12srv187
1516120075.43474.1626252541440@w2k12srv476
1515958264.6244.1626248637020@w2k12srv187
1509071874.43372.1626249279980@w2k12srv476
1497727528.6224.1626248571727@w2k12srv187
1490796195.6312.1626248987716@w2k12srv187
1489567492.7040.1626254670765@w2k12srv187
1487468233.43554.1626253799550@w2k12srv476
1467232707.6402.1626249418016@w2k12srv187
1466331753.6198.1626248195898@w2k12srv187
146553655.6310.1626248982520@w2k12srv187
1461058362.43354.1626248206979@w2k12srv476
1458956084.6930.1626253064434@w2k12srv187
145404060.43476.1626252547229@w2k12srv476
1453876930.6196.1626248190517@w2k12srv187
144916029.6378.1626249333247@w2k12srv187
1448732522.43564.1626253841487@w2k12srv476
1442271422.881.1626253243769@w2k12srv472
1421861586.43450.1626252161761@w2k12srv476
1414591922.6906.1626252971122@w2k12srv187
1404836362.6126.1626247194260@w2k12srv187
1387634608.43400.1626250722827@w2k12srv476
1384232012.6200.1626248201259@w2k12srv187
1383163325.877.1626253236807@w2k12srv472
1361088669.899.1626253269920@w2k12srv472
1355040679.4111.1626255728520@w2k12srv485
1347156228.6828.1626252284476@w2k12srv187
1346014028.6332.1626249061502@w2k12srv187
1340199211.905.1626253278037@w2k12srv472
1335269202.6366.1626249286682@w2k12srv187
133388124.6990.1626253968237@w2k12srv187
1332532609.43424.1626251464415@w2k12srv476
1328239124.6693.1626251116414@w2k12srv187
132465305.6048.1626246046764@w2k12srv187
1320313529.43500.1626253613931@w2k12srv476
1317852241.43664.1626256499452@w2k12srv476
1312484601.6098.1626246778178@w2k12srv187
129894092.7020.1626254340650@w2k12srv187
1296834178.6232.1626248600122@w2k12srv187
1288444970.7098.1626255405645@w2k12srv187
1274792610.6655.1626250850505@w2k12srv187
1272319093.6788.1626251810237@w2k12srv187
1267500889.6162.1626247601333@w2k12srv187
1260890881.6529.1626250141210@w2k12srv187
1257956870.43314.1626246401728@w2k12srv476
1255089093.43518.1626253680378@w2k12srv476
124688742.43522.1626253698811@w2k12srv476
1246568077.43452.1626252166678@w2k12srv476
1242577652.6080.1626246449913@w2k12srv187
1242435905.43472.1626252534381@w2k12srv476
1238902608.6204.1626248213419@w2k12srv187
1237694232.7014.1626254320962@w2k12srv187
1228468048.6714.1626251210391@w2k12srv187
1226526383.873.1626251796690@w2k12srv472
1219748089.6354.1626249131856@w2k12srv187
1218696243.7142.1626256157016@w2k12srv187
1212441007.6396.1626249401723@w2k12srv187
1202340476.6858.1626252534136@w2k12srv187
1196557550.6060.1626246081690@w2k12srv187
119495006.43630.1626254682636@w2k12srv476
1193300966.6531.1626250150588@w2k12srv187
1192854351.6190.1626247919894@w2k12srv187
1192369916.6571.1626250417860@w2k12srv187
1190856309.6044.1626246033793@w2k12srv187
1189823473.43516.1626253673200@w2k12srv476
1177279019.4945.1626254659315@w2k12srv493
1173116648.6641.1626250790543@w2k12srv187
1172268204.7036.1626254392251@w2k12srv187
1170099618.6220.1626248559458@w2k12srv187
1163810385.6716.1626251219753@w2k12srv187
1160059765.6451.1626249715918@w2k12srv187
1156891346.6555.1626250357298@w2k12srv187
1153469595.6350.1626249120690@w2k12srv187
1153159343.7048.1626254694751@w2k12srv187
1148993392.6920.1626253025384@w2k12srv187
1138888636.6768.1626251511380@w2k12srv187
1132217298.43572.1626253977614@w2k12srv476
1128390596.6356.1626249139227@w2k12srv187
1126080452.6599.1626250528297@w2k12srv187
1117541202.6730.1626251267901@w2k12srv187
1117330915.43602.1626254072553@w2k12srv476
1111164642.911.1626253285839@w2k12srv472
1108013317.6290.1626248921332@w2k12srv187
110780198.6284.1626248784044@w2k12srv187
1102876897.43590.1626254030764@w2k12srv476
1101151124.43418.1626251094274@w2k12srv476
1100107774.6254.1626248679468@w2k12srv187
1091489870.43544.1626253769219@w2k12srv476
1091087172.43550.1626253784944@w2k12srv476
1089839980.6222.1626248565847@w2k12srv187
1088596955.43458.1626252182958@w2k12srv476
1064549330.6872.1626252571391@w2k12srv187
1057801085.6304.1626248963357@w2k12srv187
1052306541.43462.1626252196139@w2k12srv476
1049958201.6348.1626249115617@w2k12srv187
1036367578.43506.1626253643125@w2k12srv476
1035946331.43438.1626251812466@w2k12srv476
1034521653.6146.1626247531144@w2k12srv187
1026360593.6804.1626252184696@w2k12srv187
1017066111.6426.1626249497265@w2k12srv187
1010248089.6440.1626249674040@w2k12srv187
1009042762.6914.1626253003531@w2k12srv187
1003928801.6539.1626250181986@w2k12srv187
1002935599.6818.1626252243833@w2k12srv187
1000892885.43582.1626254007814@w2k12srv476
485547095.6020.1626245670353@w2k12srv187
477677239.6042.1626245742011@w2k12srv187
2126907785.6034.1626245710764@w2k12srv187
1994564211.6036.1626245717901@w2k12srv187
1628341240.6040.1626245734239@w2k12srv187
1233771737.6038.1626245722734@w2k12srv187
907657363.5998.1626245337882@w2k12srv187
892895777.4921.1626245326063@w2k12srv493
863931696.6018.1626245411731@w2k12srv187
741425337.4901.1626245299350@w2k12srv493
681012764.6004.1626245359078@w2k12srv187
662480435.4937.1626245347254@w2k12srv493
651176262.5990.1626245313147@w2k12srv187
631910411.4907.1626245306789@w2k12srv493
604325429.4905.1626245304468@w2k12srv493
573107973.4939.1626245349700@w2k12srv493
4904748.4917.1626245320678@w2k12srv493
444280322.4935.1626245344514@w2k12srv493
357052888.4909.1626245309757@w2k12srv493
213035218.6012.1626245386533@w2k12srv187
2058892789.4931.1626245339471@w2k12srv493
2033107681.4925.1626245331080@w2k12srv493
2005047601.6014.1626245392347@w2k12srv187
1915947626.4911.1626245312701@w2k12srv493
1905781887.4929.1626245336841@w2k12srv493
1865948718.4915.1626245317958@w2k12srv493
1684498122.4913.1626245315441@w2k12srv493
1609815432.6000.1626245345427@w2k12srv187
1594679186.4903.1626245301756@w2k12srv493
1587152336.4933.1626245341814@w2k12srv493
1496655106.6016.1626245400970@w2k12srv187
1486122796.5996.1626245332062@w2k12srv187
1455016309.4927.1626245333749@w2k12srv493
1338193739.4919.1626245323348@w2k12srv493
1066203216.6008.1626245373770@w2k12srv187
1001368302.4923.1626245328593@w2k12srv493
971380755.4873.1626245143782@w2k12srv493
909054844.4843.1626245105047@w2k12srv493
893279052.4791.1626245025253@w2k12srv493
838546413.4769.1626244996031@w2k12srv493
82375608.4889.1626245164845@w2k12srv493
779908964.4809.1626245055981@w2k12srv493
761150182.4881.1626245154257@w2k12srv493
724324839.4805.1626245044040@w2k12srv493
712772596.4845.1626245107375@w2k12srv493
706048863.4895.1626245172801@w2k12srv493
703475156.4855.1626245120681@w2k12srv493
663835495.4803.1626245041284@w2k12srv493
656161735.4793.1626245027756@w2k12srv493
651780861.4787.1626245020335@w2k12srv493
640057246.4849.1626245112391@w2k12srv493
572798889.4865.1626245132942@w2k12srv493
526598057.4821.1626245075676@w2k12srv493
498452342.4783.1626245014615@w2k12srv493
487375399.4815.1626245067745@w2k12srv493
478408428.4827.1626245083238@w2k12srv493
478029375.4801.1626245038454@w2k12srv493
476625550.4867.1626245135991@w2k12srv493
476556809.4781.1626245012193@w2k12srv493
470325902.4763.1626244988155@w2k12srv493
469445627.4785.1626245017576@w2k12srv493
460429484.4893.1626245170079@w2k12srv493
44738005.4853.1626245118347@w2k12srv493
330322292.4835.1626245094449@w2k12srv493
29769957.5968.1626245018454@w2k12srv187
278414997.5962.1626244999149@w2k12srv187
264538847.4891.1626245167349@w2k12srv493
25833181.4777.1626245006767@w2k12srv493
255844912.4759.1626244983147@w2k12srv493
248321319.4833.1626245091600@w2k12srv493
22754023.4837.1626245097375@w2k12srv493
213107057.4771.1626244998378@w2k12srv493
2105596377.4813.1626245064984@w2k12srv493
2092128752.4869.1626245138546@w2k12srv493
2057001258.4797.1626245033267@w2k12srv493
2056003016.4811.1626245061004@w2k12srv493
2013449441.4863.1626245130555@w2k12srv493
2007741762.4751.1626244972347@w2k12srv493
1991239466.4887.1626245162153@w2k12srv493
1953909936.4841.1626245102377@w2k12srv493
1941610344.4767.1626244993292@w2k12srv493
1935151520.4877.1626245148852@w2k12srv493
1908787268.4897.1626245175313@w2k12srv493
18945887.5972.1626245030581@w2k12srv187
1843478105.4755.1626244977782@w2k12srv493
1838119927.4823.1626245078080@w2k12srv493
182630003.4795.1626245030619@w2k12srv493
1762085450.4765.1626244990710@w2k12srv493
1729626283.4857.1626245123127@w2k12srv493
1721381536.4825.1626245080698@w2k12srv493
1704205474.5958.1626244986352@w2k12srv187
1654539054.4817.1626245070162@w2k12srv493
1615013876.5954.1626244970430@w2k12srv187
154762850.4847.1626245109681@w2k12srv493
1524330112.4829.1626245085953@w2k12srv493
1512998255.4883.1626245157005@w2k12srv493
1509818247.5986.1626245074634@w2k12srv187
1504863193.4885.1626245159465@w2k12srv493
1494753189.4799.1626245035810@w2k12srv493
1472200807.4807.1626245049545@w2k12srv493
1466050997.4761.1626244985487@w2k12srv493
1455145684.4899.1626245178397@w2k12srv493
1411262790.4839.1626245099907@w2k12srv493
1374741765.4861.1626245128203@w2k12srv493
1367500848.5970.1626245025784@w2k12srv187
1333159128.4851.1626245115662@w2k12srv493
132632469.5974.1626245036564@w2k12srv187
1265919886.4789.1626245022715@w2k12srv493
1219615202.4819.1626245073072@w2k12srv493
1215842350.4773.1626245001258@w2k12srv493
119991811.4871.1626245141087@w2k12srv493
115887543.4859.1626245125597@w2k12srv493
1143094477.4879.1626245151438@w2k12srv493
1134623071.4757.1626244980549@w2k12srv493
1120458892.4875.1626245146402@w2k12srv493
1097054662.4779.1626245009414@w2k12srv493
1096655109.5980.1626245056069@w2k12srv187
1095996120.4831.1626245088527@w2k12srv493
1039053277.4775.1626245004033@w2k12srv493
1035692455.5978.1626245047585@w2k12srv187
1031320969.5960.1626244993151@w2k12srv187
100227494.4753.1626244975118@w2k12srv493
991777619.5948.1626244953226@w2k12srv187
958625261.4741.1626244959343@w2k12srv493
932575646.4743.1626244961814@w2k12srv493
732101528.4739.1626244956502@w2k12srv493
567781881.4727.1626244939611@w2k12srv493
1925292054.4749.1626244969622@w2k12srv493
1789091571.4731.1626244945342@w2k12srv493
1779511120.4729.1626244942431@w2k12srv493
1769088948.4733.1626244948292@w2k12srv493
1754949521.4737.1626244953802@w2k12srv493
1652015721.4745.1626244964194@w2k12srv493
1282178802.5952.1626244964484@w2k12srv187
1103506942.4735.1626244951003@w2k12srv493
1100686635.5950.1626244958983@w2k12srv187
1053841625.4747.1626244966801@w2k12srv493
1996195109.5942.1626244655308@w2k12srv187
1938560156.5944.1626244662267@w2k12srv187
1436093641.5936.1626244633698@w2k12srv187
1282021956.5940.1626244646869@w2k12srv187
1095040225.5938.1626244640147@w2k12srv187
894016175.43286.1626244601640@w2k12srv476
49825134.5924.1626244593077@w2k12srv187
265364746.5928.1626244606545@w2k12srv187
225514089.43288.1626244606376@w2k12srv476
1988604380.5934.1626244626327@w2k12srv187
1973800305.5926.1626244600404@w2k12srv187
1860151969.5930.1626244613226@w2k12srv187
101361116.43290.1626244611208@w2k12srv476
977908435.5908.1626244231998@w2k12srv187
1960737474.43280.1626244255262@w2k12srv476
1830631008.43278.1626244250498@w2k12srv476
1349463612.43284.1626244267520@w2k12srv476
1291239338.43282.1626244262841@w2k12srv476
1283308347.5914.1626244250335@w2k12srv187
1277224095.5920.1626244270573@w2k12srv187
1046162111.5918.1626244263813@w2k12srv187
953795768.5898.1626243875074@w2k12srv187
858057782.43272.1626243890995@w2k12srv476
803584315.43270.1626243885112@w2k12srv476
73905840.5904.1626243891978@w2k12srv187
1345876340.5900.1626243880600@w2k12srv187
1040757787.5902.1626243886469@w2k12srv187
984944390.5890.1626243529010@w2k12srv187
32840998.5882.1626243508996@w2k12srv187
208525121.5892.1626243537627@w2k12srv187
1654314928.5884.1626243514234@w2k12srv187
1018494963.5886.1626243519390@w2k12srv187
819987455.5876.1626243163852@w2k12srv187
770176410.5872.1626243154602@w2k12srv187
484799480.5880.1626243174846@w2k12srv187
1153377781.5870.1626243149255@w2k12srv187
815684528.43258.1626242816492@w2k12srv476
801537369.5858.1626242791760@w2k12srv187
430089706.43254.1626242805520@w2k12srv476
355578142.43256.1626242810952@w2k12srv476
214953929.43262.1626242827572@w2k12srv476
2129119678.5862.1626242805604@w2k12srv187
1877728704.5860.1626242800785@w2k12srv187
1333315385.43260.1626242821815@w2k12srv476
1063252841.5866.1626242817928@w2k12srv187
910797734.43248.1626242449774@w2k12srv476
868443068.5852.1626242447521@w2k12srv187
178143864.5854.1626242453388@w2k12srv187
1765432504.5848.1626242436827@w2k12srv187
1258757764.5850.1626242442210@w2k12srv187
694140579.5838.1626242076201@w2k12srv187
1822316790.5840.1626242080847@w2k12srv187
1664093559.5846.1626242093920@w2k12srv187
143345113.43246.1626242092681@w2k12srv476
1223496472.43240.1626242081406@w2k12srv476
788620852.5824.1626241710149@w2k12srv187
1866910635.43238.1626241731341@w2k12srv476
1582131677.5834.1626241734428@w2k12srv187
1542560444.5830.1626241723927@w2k12srv187
1469207219.5832.1626241728785@w2k12srv187
1412193555.5826.1626241715223@w2k12srv187
1244439468.43234.1626241722533@w2k12srv476
780731332.5820.1626241373452@w2k12srv187
528943841.5816.1626241358192@w2k12srv187
1843558498.5822.1626241379001@w2k12srv187
1835201494.5814.1626241351448@w2k12srv187
893354037.43224.1626240683771@w2k12srv476
854445948.5800.1626240644351@w2k12srv187
1647036322.5796.1626240633105@w2k12srv187
158666797.5804.1626240655777@w2k12srv187
1499387295.5802.1626240650063@w2k12srv187
1250606437.43222.1626240675809@w2k12srv476
6045373.5788.1626240270204@w2k12srv187
1609786185.43218.1626240280759@w2k12srv476
1490269645.5792.1626240279492@w2k12srv187
860298275.43216.1626239926027@w2k12srv476
2043639309.43214.1626239921210@w2k12srv476
2146641428.43212.1626239562576@w2k12srv476
1741068362.5776.1626238469791@w2k12srv187
1392795732.43210.1626238120545@w2k12srv476
1587952469.43208.1626237759708@w2k12srv476
1256762989.43206.1626237040838@w2k12srv476
995922510.43204.1626236679530@w2k12srv476

View File

@ -136,6 +136,8 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Encryption", "Encryption\En
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Config.Test", "Config.Test\Config.Test.vbproj", "{B9A63193-1391-4E20-B578-0867F330396C}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DBCleaner", "DBCleaner\DBCleaner.vbproj", "{5A7913CE-7D3D-4E84-B23D-4747C178CD71}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
@ -362,6 +364,10 @@ Global
{B9A63193-1391-4E20-B578-0867F330396C}.Debug|Any CPU.Build.0 = Debug|Any CPU
{B9A63193-1391-4E20-B578-0867F330396C}.Release|Any CPU.ActiveCfg = Release|Any CPU
{B9A63193-1391-4E20-B578-0867F330396C}.Release|Any CPU.Build.0 = Release|Any CPU
{5A7913CE-7D3D-4E84-B23D-4747C178CD71}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{5A7913CE-7D3D-4E84-B23D-4747C178CD71}.Debug|Any CPU.Build.0 = Debug|Any CPU
{5A7913CE-7D3D-4E84-B23D-4747C178CD71}.Release|Any CPU.ActiveCfg = Release|Any CPU
{5A7913CE-7D3D-4E84-B23D-4747C178CD71}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
@ -422,6 +428,7 @@ Global
{9D4AC920-C78E-41C3-994E-91690FF79380} = {8FFE925E-8B84-45F1-93CB-32B1C96F41EB}
{8A8F20FC-C46E-41AC-BEE7-218366CFFF99} = {3E2008C8-27B1-41DD-9B1A-0C4029F6AECC}
{B9A63193-1391-4E20-B578-0867F330396C} = {3E2008C8-27B1-41DD-9B1A-0C4029F6AECC}
{5A7913CE-7D3D-4E84-B23D-4747C178CD71} = {CC368D6A-6AC4-4EB9-A092-14700FABEF7A}
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
SolutionGuid = {C1BE4090-A0FD-48AF-86CB-39099D14B286}

View File

@ -32,7 +32,7 @@ Namespace My
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.TestGUI.frmDocView
Me.MainForm = Global.TestGUI.frmStart
End Sub
End Class
End Namespace

View File

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

View File

@ -75,6 +75,9 @@
<SpecificVersion>False</SpecificVersion>
<HintPath>D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll</HintPath>
</Reference>
<Reference Include="Mail">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\Limilabs\Mail.dll\Mail.dll</HintPath>
</Reference>
<Reference Include="Microsoft.CSharp" />
<Reference Include="Microsoft.Extensions.Logging.Abstractions, Version=2.1.1.0, Culture=neutral, PublicKeyToken=adb9793829ddae60, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.Extensions.Logging.Abstractions.2.1.1\lib\netstandard2.0\Microsoft.Extensions.Logging.Abstractions.dll</HintPath>
@ -175,6 +178,12 @@
<Compile Include="frmLookup.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmMail.Designer.vb">
<DependentUpon>frmMail.vb</DependentUpon>
</Compile>
<Compile Include="frmMail.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmOld.vb">
<SubType>Form</SubType>
</Compile>
@ -233,6 +242,9 @@
<EmbeddedResource Include="frmLookup.resx">
<DependentUpon>frmLookup.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmMail.resx">
<DependentUpon>frmMail.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmOld.resx">
<DependentUpon>frmOld.vb</DependentUpon>
</EmbeddedResource>

69
GUIs.Test.TestGUI/frmMail.Designer.vb generated Normal file
View File

@ -0,0 +1,69 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmMail
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.Button1 = New System.Windows.Forms.Button()
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
Me.ListBox1 = New System.Windows.Forms.ListBox()
Me.SuspendLayout()
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(12, 12)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(352, 65)
Me.Button1.TabIndex = 0
Me.Button1.Text = "Load Email"
Me.Button1.UseVisualStyleBackColor = True
'
'OpenFileDialog1
'
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
'
'ListBox1
'
Me.ListBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.ListBox1.FormattingEnabled = True
Me.ListBox1.Location = New System.Drawing.Point(12, 83)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(352, 355)
Me.ListBox1.TabIndex = 1
'
'frmMail
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(381, 450)
Me.Controls.Add(Me.ListBox1)
Me.Controls.Add(Me.Button1)
Me.Name = "frmMail"
Me.Text = "frmMail"
Me.ResumeLayout(False)
End Sub
Friend WithEvents Button1 As Button
Friend WithEvents OpenFileDialog1 As OpenFileDialog
Friend WithEvents ListBox1 As ListBox
End Class

View File

@ -0,0 +1,123 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
</root>

View File

@ -0,0 +1,34 @@
Imports Limilabs.Mail
Imports Limilabs.Mail.MSG
Public Class frmMail
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim oResult = OpenFileDialog1.ShowDialog()
If oResult = DialogResult.OK Then
Dim oMail As String = OpenFileDialog1.FileName
ParseEmail(oMail)
End If
End Sub
Private Sub ParseEmail(Path As String)
Using oConverter As New MsgConverter(Path)
If oConverter.Type = MsgType.Note Then
Dim email As IMail = oConverter.CreateMessage()
ListBox1.Items.Add("Attachments: " & email.Attachments.Count)
ListBox1.Items.Add($"To: " & email.To.First()?.GetMailboxes.First.Address)
ListBox1.Items.Add($"From: " & email.From.First()?.GetMailboxes.First.Address)
For Each oHeader In email.Headers.AllKeys
Dim oHeaderValue = email.Headers.Item(oHeader)
ListBox1.Items.Add($"Headers")
ListBox1.Items.Add($"Key: {oHeader}, Value: {oHeaderValue}")
Next
End If
End Using
End Sub
End Class

View File

@ -28,6 +28,7 @@ Partial Class frmStart
Me.Button4 = New System.Windows.Forms.Button()
Me.Button5 = New System.Windows.Forms.Button()
Me.Button6 = New System.Windows.Forms.Button()
Me.Button7 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'Button1
@ -84,6 +85,15 @@ Partial Class frmStart
Me.Button6.Text = "DocView"
Me.Button6.UseVisualStyleBackColor = True
'
'Button7
'
Me.Button7.Location = New System.Drawing.Point(254, 12)
Me.Button7.Name = "Button7"
Me.Button7.Size = New System.Drawing.Size(236, 55)
Me.Button7.TabIndex = 0
Me.Button7.Text = "Mail"
Me.Button7.UseVisualStyleBackColor = True
'
'frmStart
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -94,6 +104,7 @@ Partial Class frmStart
Me.Controls.Add(Me.Button4)
Me.Controls.Add(Me.Button3)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button7)
Me.Controls.Add(Me.Button1)
Me.Name = "frmStart"
Me.Text = "frmStart"
@ -107,4 +118,5 @@ Partial Class frmStart
Friend WithEvents Button4 As Button
Friend WithEvents Button5 As Button
Friend WithEvents Button6 As Button
Friend WithEvents Button7 As Button
End Class

View File

@ -26,4 +26,8 @@ Public Class frmStart
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
frmDocView.Show()
End Sub
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
frmMail.Show()
End Sub
End Class

View File

@ -125,7 +125,7 @@ Public Class Email
''' May break in future versions of .NET
''' </summary>
Public Function WriteMessageToFile(Message As MailMessage, Filename As String) As Boolean
Dim oAssembly As Assembly = GetType(Mail.SmtpClient).Assembly
Dim oAssembly As Assembly = GetType(System.Net.Mail.SmtpClient).Assembly
Dim oMailWriterType As Type = oAssembly.[GetType]("System.Net.Mail.MailWriter")
Try

View File

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

View File

@ -46,6 +46,10 @@
<Reference Include="Independentsoft.Email">
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Email .NET\Bin\Independentsoft.Email.dll</HintPath>
</Reference>
<Reference Include="Mail">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\Limilabs\Mail.dll\Mail.dll</HintPath>
<EmbedInteropTypes>False</EmbedInteropTypes>
</Reference>
<Reference Include="Microsoft.CSharp" />
<Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
<HintPath>..\packages\NLog.4.7.10\lib\net45\NLog.dll</HintPath>
@ -80,6 +84,7 @@
<ItemGroup>
<Compile Include="Email.vb" />
<Compile Include="EventBus.vb" />
<Compile Include="Mail.vb" />
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>