Form logging und methode wie im Service benutzen

This commit is contained in:
Developer01 2025-06-24 14:49:07 +02:00
parent b68f94f35f
commit f0d1520286
12 changed files with 241 additions and 206 deletions

View File

@ -49,26 +49,32 @@
<Reference Include="AE.Net.Mail, Version=1.7.10.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\AE.Net.Mail.1.7.10.0\lib\net45\AE.Net.Mail.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Base">
<HintPath>..\..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
<Reference Include="DigitalData.Modules.Base, Version=1.3.6.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Config">
<HintPath>..\..\..\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Database">
<HintPath>..\..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
<Reference Include="DigitalData.Modules.Database, Version=2.3.5.1, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Language">
<HintPath>..\..\..\DDModules\Language\bin\Debug\DigitalData.Modules.Language.dll</HintPath>
<Reference Include="DigitalData.Modules.Language, Version=1.7.1.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Language\bin\Debug\DigitalData.Modules.Language.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Logging">
<HintPath>..\..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
<Reference Include="DigitalData.Modules.Logging, Version=2.6.3.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Messaging">
<HintPath>..\..\..\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
<Reference Include="DigitalData.Modules.Messaging, Version=1.9.4.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Patterns">
<HintPath>..\..\..\DDModules\Patterns\bin\Debug\DigitalData.Modules.Patterns.dll</HintPath>
<Reference Include="DigitalData.Modules.Patterns, Version=1.3.0.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Patterns\bin\Debug\DigitalData.Modules.Patterns.dll</HintPath>
</Reference>
<Reference Include="GdPicture.NET.14, Version=14.2.90.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.2.90\lib\net462\GdPicture.NET.14.dll</HintPath>

View File

@ -26,12 +26,6 @@
</runtime>
<userSettings>
<EmailProfiler.Form.My.MySettings>
<setting name="MyConnectionString" serializeAs="String">
<value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</value>
</setting>
<setting name="MyServer" serializeAs="String">
<value />
</setting>
<setting name="EmailTest_Receipiant" serializeAs="String">
<value />
</setting>
@ -45,6 +39,9 @@
</userSettings>
<applicationSettings>
<EmailProfiler.Form.My.MySettings>
<setting name="MyConnectionString" serializeAs="String">
<value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</value>
</setting>
<setting name="FB_DATABASE" serializeAs="String">
<value />
</setting>

View File

@ -64,35 +64,45 @@
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDMonorepo\GUIs.Common\bin\Debug\DigitalData.GUIs.Common.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Base, Version=1.3.6.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
<Reference Include="DigitalData.Modules.Base">
<HintPath>..\..\..\2_DLL Projekte\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Config, Version=1.2.2.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
<Reference Include="DigitalData.Modules.Config">
<HintPath>..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Database, Version=2.3.4.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
<Reference Include="DigitalData.Modules.Database">
<HintPath>..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Logging, Version=2.6.3.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
<Reference Include="DigitalData.Modules.Logging">
<HintPath>..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Messaging, Version=1.9.3.0, Culture=neutral, processorArchitecture=MSIL">
<Reference Include="DigitalData.Modules.Messaging, Version=1.9.7.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
<HintPath>..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
</Reference>
<Reference Include="EmailProfiler.Common, Version=3.0.4.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\EmailProfiler.Common\bin\Debug\EmailProfiler.Common.dll</HintPath>
</Reference>
<Reference Include="Microsoft.CSharp" />
<Reference Include="Microsoft.Identity.Client, Version=4.55.0.0, Culture=neutral, PublicKeyToken=0a613f4dd989e8ae, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.Identity.Client.4.55.0\lib\net461\Microsoft.Identity.Client.dll</HintPath>
</Reference>
<Reference Include="Microsoft.IdentityModel.Abstractions, Version=6.22.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.IdentityModel.Abstractions.6.22.0\lib\net461\Microsoft.IdentityModel.Abstractions.dll</HintPath>
</Reference>
<Reference Include="NLog, Version=5.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
<HintPath>..\packages\NLog.5.0.5\lib\net46\NLog.dll</HintPath>
</Reference>
<Reference Include="S22.Imap, Version=3.6.0.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\S22.Imap.3.6.0.0\lib\net40\S22.Imap.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.IdentityModel" />
<Reference Include="System.IO.Compression" />
<Reference Include="System.Runtime.Serialization" />
<Reference Include="System.ServiceModel" />
@ -150,6 +160,7 @@
<Compile Include="MyDataset.vb">
<DependentUpon>MyDataset.xsd</DependentUpon>
</Compile>
<Compile Include="Settings.vb" />
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="frmMain.resx">
@ -205,19 +216,10 @@
</ItemGroup>
<ItemGroup>
<Content Include="envelope.ico" />
<Content Include="MailLicense.xml">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content>
<None Include="Resources\email_go.png" />
<None Include="Resources\key_16xLG.png" />
<None Include="Resources\Encrypt.png" />
<None Include="Resources\folder_Closed_16xLG.png" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\EmailProfiler.Common\EmailProfiler.Common.vbproj">
<Project>{9f748dcd-952e-40a0-9dad-65bf8a39b231}</Project>
<Name>EmailProfiler.Common</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
</Project>

View File

@ -1,23 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<License>
<Id>4dc5ef40-f1a9-468b-994c-b7ed600ad878</Id>
<ProductName>Mail.dll</ProductName>
<SubscriptionUntil>2022-07-29</SubscriptionUntil>
<RegisteredTo>Digital Data GmbH</RegisteredTo>
<LicenseType>single developer</LicenseType>
<BuyerName>Digital Data GmbH</BuyerName>
<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">
<SignedInfo>
<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" />
<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" />
<Reference URI="">
<Transforms>
<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" />
</Transforms>
<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
<DigestValue>75MRtl4ipYelIZYlpT8O7QDX9Zc=</DigestValue>
</Reference>
</SignedInfo>
<SignatureValue>Raxfkz6DfQVs/sMvH+F2nH0eHXD8FoUFSdP3t7AgBUdpABJQx86srlyuMSEhXPlc1THCqPouEVob4RsWnd9OXvTiPPSOUSK9zuNG6uz93KLAhpSD5PraAgBCF4jwZArlAp7aCNfZpHqQ3w6TRHS+CfravUU0AHHG3MZ1ZcRkGuo=</SignatureValue>
</Signature>
</License>

View File

@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyCompany("Digital Data")>
<Assembly: AssemblyProduct("EmailProfiler Config")>
<Assembly: AssemblyCopyright("Copyright © 2025")>
<Assembly: AssemblyTrademark("3.0.2.0")>
<Assembly: AssemblyTrademark("3.1.0")>
<Assembly: ComVisible(False)>
@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.0.2.0")>
<Assembly: AssemblyVersion("3.1.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
@ -15,14 +15,14 @@ Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.9.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.14.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "My.Settings Auto-Save Functionality"
#Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
@ -54,29 +54,14 @@ Namespace My
End Get
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security "& _
"Info=True;User ID=sa;Password=dd")> _
Public Property MyConnectionString() As String
Public ReadOnly Property MyConnectionString() As String
Get
Return CType(Me("MyConnectionString"),String)
End Get
Set
Me("MyConnectionString") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property MyServer() As String
Get
Return CType(Me("MyServer"),String)
End Get
Set
Me("MyServer") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _

View File

@ -2,12 +2,9 @@
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="MyConnectionString" Type="System.String" Scope="User">
<Setting Name="MyConnectionString" Type="System.String" Scope="Application">
<Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</Value>
</Setting>
<Setting Name="MyServer" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="EmailTest_Receipiant" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>

View File

@ -0,0 +1,11 @@

Namespace My
'Diese Klasse ermöglicht die Behandlung bestimmter Ereignisse der Einstellungsklasse:
' Das SettingChanging-Ereignis wird ausgelöst, bevor der Wert einer Einstellung geändert wird.
' Das PropertyChanged-Ereignis wird ausgelöst, nachdem der Wert einer Einstellung geändert wurde.
' Das SettingsLoaded-Ereignis wird ausgelöst, nachdem die Einstellungswerte geladen wurden.
' Das SettingsSaving-Ereignis wird ausgelöst, bevor die Einstellungswerte gespeichert werden.
Partial Friend NotInheritable Class MySettings
End Class
End Namespace

View File

@ -1369,9 +1369,9 @@ Partial Class frmMain
'cbAllowXMLReceipt
'
Me.cbAllowXMLReceipt.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_PROCESSBindingSource, "ALLOW_XML_RECEIPTS", True))
Me.cbAllowXMLReceipt.Location = New System.Drawing.Point(319, 310)
Me.cbAllowXMLReceipt.Location = New System.Drawing.Point(717, 698)
Me.cbAllowXMLReceipt.Name = "cbAllowXMLReceipt"
Me.cbAllowXMLReceipt.Size = New System.Drawing.Size(182, 24)
Me.cbAllowXMLReceipt.Size = New System.Drawing.Size(410, 54)
Me.cbAllowXMLReceipt.TabIndex = 93
Me.cbAllowXMLReceipt.Text = "Erlaube XML Belege (1. Anhang)"
Me.cbAllowXMLReceipt.UseVisualStyleBackColor = True
@ -1388,41 +1388,41 @@ Partial Class frmMain
Me.lblDownloadPath.AutoSize = True
Me.lblDownloadPath.Location = New System.Drawing.Point(316, 188)
Me.lblDownloadPath.Name = "lblDownloadPath"
Me.lblDownloadPath.Size = New System.Drawing.Size(44, 13)
Me.lblDownloadPath.Size = New System.Drawing.Size(44, 14)
Me.lblDownloadPath.TabIndex = 92
Me.lblDownloadPath.Text = "Label15"
'
'PATH_ORIGINALTextBox
'
Me.PATH_ORIGINALTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "PATH_ORIGINAL", True))
Me.PATH_ORIGINALTextBox.Location = New System.Drawing.Point(319, 164)
Me.PATH_ORIGINALTextBox.Location = New System.Drawing.Point(717, 369)
Me.PATH_ORIGINALTextBox.Name = "PATH_ORIGINALTextBox"
Me.PATH_ORIGINALTextBox.Size = New System.Drawing.Size(462, 21)
Me.PATH_ORIGINALTextBox.Size = New System.Drawing.Size(1040, 32)
Me.PATH_ORIGINALTextBox.TabIndex = 91
'
'btnFBD_ErrorPath
'
Me.btnFBD_ErrorPath.Location = New System.Drawing.Point(787, 243)
Me.btnFBD_ErrorPath.Location = New System.Drawing.Point(1770, 548)
Me.btnFBD_ErrorPath.Name = "btnFBD_ErrorPath"
Me.btnFBD_ErrorPath.Size = New System.Drawing.Size(27, 21)
Me.btnFBD_ErrorPath.Size = New System.Drawing.Size(62, 48)
Me.btnFBD_ErrorPath.TabIndex = 90
Me.btnFBD_ErrorPath.Text = "..."
Me.btnFBD_ErrorPath.UseVisualStyleBackColor = True
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(787, 164)
Me.Button1.Location = New System.Drawing.Point(1770, 369)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(27, 21)
Me.Button1.Size = New System.Drawing.Size(62, 48)
Me.Button1.TabIndex = 89
Me.Button1.Text = "..."
Me.Button1.UseVisualStyleBackColor = True
'
'btnFBD_DonwloadPath
'
Me.btnFBD_DonwloadPath.Location = New System.Drawing.Point(787, 204)
Me.btnFBD_DonwloadPath.Location = New System.Drawing.Point(1770, 459)
Me.btnFBD_DonwloadPath.Name = "btnFBD_DonwloadPath"
Me.btnFBD_DonwloadPath.Size = New System.Drawing.Size(27, 21)
Me.btnFBD_DonwloadPath.Size = New System.Drawing.Size(62, 48)
Me.btnFBD_DonwloadPath.TabIndex = 89
Me.btnFBD_DonwloadPath.Text = "..."
Me.btnFBD_DonwloadPath.UseVisualStyleBackColor = True
@ -1432,10 +1432,10 @@ Partial Class frmMain
Me.txtSubjectExample.BackColor = System.Drawing.SystemColors.Window
Me.txtSubjectExample.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txtSubjectExample.ForeColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer))
Me.txtSubjectExample.Location = New System.Drawing.Point(319, 121)
Me.txtSubjectExample.Location = New System.Drawing.Point(717, 273)
Me.txtSubjectExample.Name = "txtSubjectExample"
Me.txtSubjectExample.ReadOnly = True
Me.txtSubjectExample.Size = New System.Drawing.Size(462, 21)
Me.txtSubjectExample.Size = New System.Drawing.Size(1040, 32)
Me.txtSubjectExample.TabIndex = 88
'
'Label9
@ -1443,7 +1443,7 @@ Partial Class frmMain
Me.Label9.AutoSize = True
Me.Label9.Location = New System.Drawing.Point(316, 107)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(74, 13)
Me.Label9.Size = New System.Drawing.Size(74, 14)
Me.Label9.TabIndex = 87
Me.Label9.Text = "Subject Email:"
'
@ -1453,7 +1453,7 @@ Partial Class frmMain
Me.NumericUpDown2.Location = New System.Drawing.Point(250, 124)
Me.NumericUpDown2.Maximum = New Decimal(New Integer() {20, 0, 0, 0})
Me.NumericUpDown2.Name = "NumericUpDown2"
Me.NumericUpDown2.Size = New System.Drawing.Size(61, 21)
Me.NumericUpDown2.Size = New System.Drawing.Size(26972, 21)
Me.NumericUpDown2.TabIndex = 3
'
'CHANGED_WHENTextBox1
@ -1461,9 +1461,9 @@ Partial Class frmMain
Me.CHANGED_WHENTextBox1.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.CHANGED_WHENTextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "CHANGED_WHEN", True))
Me.CHANGED_WHENTextBox1.Enabled = False
Me.CHANGED_WHENTextBox1.Location = New System.Drawing.Point(705, 284)
Me.CHANGED_WHENTextBox1.Location = New System.Drawing.Point(1585, 639)
Me.CHANGED_WHENTextBox1.Name = "CHANGED_WHENTextBox1"
Me.CHANGED_WHENTextBox1.Size = New System.Drawing.Size(111, 21)
Me.CHANGED_WHENTextBox1.Size = New System.Drawing.Size(251, 32)
Me.CHANGED_WHENTextBox1.TabIndex = 84
Me.CHANGED_WHENTextBox1.TabStop = False
'
@ -1472,9 +1472,9 @@ Partial Class frmMain
Me.CHANGED_WHOProcessTextBox.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.CHANGED_WHOProcessTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "CHANGED_WHO", True))
Me.CHANGED_WHOProcessTextBox.Enabled = False
Me.CHANGED_WHOProcessTextBox.Location = New System.Drawing.Point(576, 284)
Me.CHANGED_WHOProcessTextBox.Location = New System.Drawing.Point(1296, 639)
Me.CHANGED_WHOProcessTextBox.Name = "CHANGED_WHOProcessTextBox"
Me.CHANGED_WHOProcessTextBox.Size = New System.Drawing.Size(124, 21)
Me.CHANGED_WHOProcessTextBox.Size = New System.Drawing.Size(279, 32)
Me.CHANGED_WHOProcessTextBox.TabIndex = 83
Me.CHANGED_WHOProcessTextBox.TabStop = False
'
@ -1483,9 +1483,9 @@ Partial Class frmMain
Me.ADDED_WHENTextBox1.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.ADDED_WHENTextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "ADDED_WHEN", True))
Me.ADDED_WHENTextBox1.Enabled = False
Me.ADDED_WHENTextBox1.Location = New System.Drawing.Point(443, 284)
Me.ADDED_WHENTextBox1.Location = New System.Drawing.Point(996, 639)
Me.ADDED_WHENTextBox1.Name = "ADDED_WHENTextBox1"
Me.ADDED_WHENTextBox1.Size = New System.Drawing.Size(124, 21)
Me.ADDED_WHENTextBox1.Size = New System.Drawing.Size(279, 32)
Me.ADDED_WHENTextBox1.TabIndex = 82
Me.ADDED_WHENTextBox1.TabStop = False
'
@ -1494,18 +1494,18 @@ Partial Class frmMain
Me.ADDED_WHOTextBox1.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.ADDED_WHOTextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "ADDED_WHO", True))
Me.ADDED_WHOTextBox1.Enabled = False
Me.ADDED_WHOTextBox1.Location = New System.Drawing.Point(319, 284)
Me.ADDED_WHOTextBox1.Location = New System.Drawing.Point(717, 639)
Me.ADDED_WHOTextBox1.Name = "ADDED_WHOTextBox1"
Me.ADDED_WHOTextBox1.Size = New System.Drawing.Size(120, 21)
Me.ADDED_WHOTextBox1.Size = New System.Drawing.Size(270, 32)
Me.ADDED_WHOTextBox1.TabIndex = 81
Me.ADDED_WHOTextBox1.TabStop = False
'
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Location = New System.Drawing.Point(820, 244)
Me.Label5.Location = New System.Drawing.Point(820, 245)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(65, 13)
Me.Label5.Size = New System.Drawing.Size(65, 14)
Me.Label5.TabIndex = 80
Me.Label5.Text = "Kommentar:"
'
@ -1524,9 +1524,9 @@ Partial Class frmMain
Me.GroupBox2.Controls.Add(Me.WM_IDX_BODY_TEXTComboBox)
Me.GroupBox2.Controls.Add(Me.WM_IDX_BODY_SUBSTR_LENGTHTextBox)
Me.GroupBox2.Controls.Add(WM_IDX_BODY_SUBSTR_LENGTHLabel)
Me.GroupBox2.Location = New System.Drawing.Point(820, 39)
Me.GroupBox2.Location = New System.Drawing.Point(1845, 89)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(329, 202)
Me.GroupBox2.Size = New System.Drawing.Size(741, 455)
Me.GroupBox2.TabIndex = 79
Me.GroupBox2.TabStop = False
'
@ -1597,9 +1597,9 @@ Partial Class frmMain
Me.STEP_NAMEComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "STEP_NAME", True))
Me.STEP_NAMEComboBox.FormattingEnabled = True
Me.STEP_NAMEComboBox.Items.AddRange(New Object() {"Easy Approval", "Download Mail", "Other"})
Me.STEP_NAMEComboBox.Location = New System.Drawing.Point(509, 41)
Me.STEP_NAMEComboBox.Location = New System.Drawing.Point(1144, 93)
Me.STEP_NAMEComboBox.Name = "STEP_NAMEComboBox"
Me.STEP_NAMEComboBox.Size = New System.Drawing.Size(121, 21)
Me.STEP_NAMEComboBox.Size = New System.Drawing.Size(273, 32)
Me.STEP_NAMEComboBox.TabIndex = 1
'
'PROCESS_NAMEComboBox
@ -1607,9 +1607,9 @@ Partial Class frmMain
Me.PROCESS_NAMEComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "PROCESS_NAME", True))
Me.PROCESS_NAMEComboBox.FormattingEnabled = True
Me.PROCESS_NAMEComboBox.Items.AddRange(New Object() {"ProcessManager", "ADDI", "Globix", "Attachment Sniffer", "ZugFeRD-Parser", "Not defined"})
Me.PROCESS_NAMEComboBox.Location = New System.Drawing.Point(319, 41)
Me.PROCESS_NAMEComboBox.Location = New System.Drawing.Point(717, 93)
Me.PROCESS_NAMEComboBox.Name = "PROCESS_NAMEComboBox"
Me.PROCESS_NAMEComboBox.Size = New System.Drawing.Size(185, 21)
Me.PROCESS_NAMEComboBox.Size = New System.Drawing.Size(417, 32)
Me.PROCESS_NAMEComboBox.TabIndex = 0
'
'GUIDProcessTextBox
@ -1617,18 +1617,18 @@ Partial Class frmMain
Me.GUIDProcessTextBox.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.GUIDProcessTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "GUID", True))
Me.GUIDProcessTextBox.Enabled = False
Me.GUIDProcessTextBox.Location = New System.Drawing.Point(251, 42)
Me.GUIDProcessTextBox.Location = New System.Drawing.Point(564, 95)
Me.GUIDProcessTextBox.Name = "GUIDProcessTextBox"
Me.GUIDProcessTextBox.Size = New System.Drawing.Size(51, 21)
Me.GUIDProcessTextBox.Size = New System.Drawing.Size(116, 32)
Me.GUIDProcessTextBox.TabIndex = 33
Me.GUIDProcessTextBox.TabStop = False
'
'COPY_2_HDDCheckBox
'
Me.COPY_2_HDDCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_PROCESSBindingSource, "COPY_2_HDD", True))
Me.COPY_2_HDDCheckBox.Location = New System.Drawing.Point(319, 148)
Me.COPY_2_HDDCheckBox.Location = New System.Drawing.Point(717, 333)
Me.COPY_2_HDDCheckBox.Name = "COPY_2_HDDCheckBox"
Me.COPY_2_HDDCheckBox.Size = New System.Drawing.Size(275, 17)
Me.COPY_2_HDDCheckBox.Size = New System.Drawing.Size(620, 39)
Me.COPY_2_HDDCheckBox.TabIndex = 6
Me.COPY_2_HDDCheckBox.Text = "Copy email to HDD"
Me.COPY_2_HDDCheckBox.UseVisualStyleBackColor = True
@ -1636,25 +1636,25 @@ Partial Class frmMain
'PATH_EMAIL_TEMPTextBox
'
Me.PATH_EMAIL_TEMPTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "PATH_EMAIL_TEMP", True))
Me.PATH_EMAIL_TEMPTextBox.Location = New System.Drawing.Point(319, 204)
Me.PATH_EMAIL_TEMPTextBox.Location = New System.Drawing.Point(717, 459)
Me.PATH_EMAIL_TEMPTextBox.Name = "PATH_EMAIL_TEMPTextBox"
Me.PATH_EMAIL_TEMPTextBox.Size = New System.Drawing.Size(462, 21)
Me.PATH_EMAIL_TEMPTextBox.Size = New System.Drawing.Size(1040, 32)
Me.PATH_EMAIL_TEMPTextBox.TabIndex = 9
'
'PATH_EMAIL_ERRORSTextBox
'
Me.PATH_EMAIL_ERRORSTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "PATH_EMAIL_ERRORS", True))
Me.PATH_EMAIL_ERRORSTextBox.Location = New System.Drawing.Point(319, 244)
Me.PATH_EMAIL_ERRORSTextBox.Location = New System.Drawing.Point(717, 549)
Me.PATH_EMAIL_ERRORSTextBox.Name = "PATH_EMAIL_ERRORSTextBox"
Me.PATH_EMAIL_ERRORSTextBox.Size = New System.Drawing.Size(462, 21)
Me.PATH_EMAIL_ERRORSTextBox.Size = New System.Drawing.Size(1040, 32)
Me.PATH_EMAIL_ERRORSTextBox.TabIndex = 11
'
'DELETE_MAILCheckBox
'
Me.DELETE_MAILCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_PROCESSBindingSource, "DELETE_MAIL", True))
Me.DELETE_MAILCheckBox.Location = New System.Drawing.Point(319, 75)
Me.DELETE_MAILCheckBox.Location = New System.Drawing.Point(717, 170)
Me.DELETE_MAILCheckBox.Name = "DELETE_MAILCheckBox"
Me.DELETE_MAILCheckBox.Size = New System.Drawing.Size(468, 24)
Me.DELETE_MAILCheckBox.Size = New System.Drawing.Size(1053, 54)
Me.DELETE_MAILCheckBox.TabIndex = 2
Me.DELETE_MAILCheckBox.Text = "Email nach Verarbeitung löschen (Andernfalls muss ein IMAP Ordner 'Verarbeitet' e" &
"xistieren)"
@ -1663,18 +1663,18 @@ Partial Class frmMain
'COMMENT_PROFILESTextBox
'
Me.COMMENT_PROFILESTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_PROCESSBindingSource, "COMMENT", True))
Me.COMMENT_PROFILESTextBox.Location = New System.Drawing.Point(822, 260)
Me.COMMENT_PROFILESTextBox.Location = New System.Drawing.Point(1849, 585)
Me.COMMENT_PROFILESTextBox.Multiline = True
Me.COMMENT_PROFILESTextBox.Name = "COMMENT_PROFILESTextBox"
Me.COMMENT_PROFILESTextBox.Size = New System.Drawing.Size(327, 45)
Me.COMMENT_PROFILESTextBox.Size = New System.Drawing.Size(737, 102)
Me.COMMENT_PROFILESTextBox.TabIndex = 10
'
'ACTIVECheckBox1
'
Me.ACTIVECheckBox1.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_PROCESSBindingSource, "ACTIVE", True))
Me.ACTIVECheckBox1.Location = New System.Drawing.Point(251, 78)
Me.ACTIVECheckBox1.Location = New System.Drawing.Point(564, 176)
Me.ACTIVECheckBox1.Name = "ACTIVECheckBox1"
Me.ACTIVECheckBox1.Size = New System.Drawing.Size(60, 24)
Me.ACTIVECheckBox1.Size = New System.Drawing.Size(135, 54)
Me.ACTIVECheckBox1.TabIndex = 3
Me.ACTIVECheckBox1.Text = "Active"
Me.ACTIVECheckBox1.UseVisualStyleBackColor = True
@ -1687,14 +1687,14 @@ Partial Class frmMain
Me.BindingNavigator2.CountItemFormat = "von {0} Prozessen"
Me.BindingNavigator2.DeleteItem = Me.ToolStripButton3
Me.BindingNavigator2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton4, Me.ToolStripButton5, Me.ToolStripSeparator1, Me.ToolStripTextBox1, Me.ToolStripLabel1, Me.ToolStripSeparator2, Me.ToolStripButton6, Me.ToolStripButton7, Me.ToolStripSeparator3, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripButton8, Me.ToolStripButton10})
Me.BindingNavigator2.Location = New System.Drawing.Point(245, 0)
Me.BindingNavigator2.Location = New System.Drawing.Point(244, 0)
Me.BindingNavigator2.MoveFirstItem = Me.ToolStripButton4
Me.BindingNavigator2.MoveLastItem = Me.ToolStripButton7
Me.BindingNavigator2.MoveNextItem = Me.ToolStripButton6
Me.BindingNavigator2.MovePreviousItem = Me.ToolStripButton5
Me.BindingNavigator2.Name = "BindingNavigator2"
Me.BindingNavigator2.PositionItem = Me.ToolStripTextBox1
Me.BindingNavigator2.Size = New System.Drawing.Size(974, 25)
Me.BindingNavigator2.Size = New System.Drawing.Size(974, 26)
Me.BindingNavigator2.TabIndex = 32
Me.BindingNavigator2.Text = "BindingNavigator2"
'
@ -1809,7 +1809,7 @@ Partial Class frmMain
Me.GridControl1.Location = New System.Drawing.Point(0, 0)
Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(245, 337)
Me.GridControl1.Size = New System.Drawing.Size(245, 338)
Me.GridControl1.TabIndex = 0
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
'
@ -1890,7 +1890,7 @@ Partial Class frmMain
Me.NumericUpDown1.Location = New System.Drawing.Point(914, 81)
Me.NumericUpDown1.Maximum = New Decimal(New Integer() {20, 0, 0, 0})
Me.NumericUpDown1.Name = "NumericUpDown1"
Me.NumericUpDown1.Size = New System.Drawing.Size(61, 21)
Me.NumericUpDown1.Size = New System.Drawing.Size(1, 14)
Me.NumericUpDown1.TabIndex = 59
'
'TBEMLP_POLL_STEPSBindingSource
@ -1904,36 +1904,36 @@ Partial Class frmMain
'
Me.CHANGED_WHENTextBox2.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.CHANGED_WHENTextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "CHANGED_WHEN", True))
Me.CHANGED_WHENTextBox2.Location = New System.Drawing.Point(685, 121)
Me.CHANGED_WHENTextBox2.Location = New System.Drawing.Point(1540, 273)
Me.CHANGED_WHENTextBox2.Name = "CHANGED_WHENTextBox2"
Me.CHANGED_WHENTextBox2.Size = New System.Drawing.Size(120, 21)
Me.CHANGED_WHENTextBox2.Size = New System.Drawing.Size(270, 32)
Me.CHANGED_WHENTextBox2.TabIndex = 37
'
'CHANGED_WHOStepsTextBox
'
Me.CHANGED_WHOStepsTextBox.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.CHANGED_WHOStepsTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "CHANGED_WHO", True))
Me.CHANGED_WHOStepsTextBox.Location = New System.Drawing.Point(573, 121)
Me.CHANGED_WHOStepsTextBox.Location = New System.Drawing.Point(1288, 273)
Me.CHANGED_WHOStepsTextBox.Name = "CHANGED_WHOStepsTextBox"
Me.CHANGED_WHOStepsTextBox.Size = New System.Drawing.Size(100, 21)
Me.CHANGED_WHOStepsTextBox.Size = New System.Drawing.Size(225, 32)
Me.CHANGED_WHOStepsTextBox.TabIndex = 36
'
'ADDED_WHENTextBox2
'
Me.ADDED_WHENTextBox2.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.ADDED_WHENTextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "ADDED_WHEN", True))
Me.ADDED_WHENTextBox2.Location = New System.Drawing.Point(443, 121)
Me.ADDED_WHENTextBox2.Location = New System.Drawing.Point(996, 273)
Me.ADDED_WHENTextBox2.Name = "ADDED_WHENTextBox2"
Me.ADDED_WHENTextBox2.Size = New System.Drawing.Size(124, 21)
Me.ADDED_WHENTextBox2.Size = New System.Drawing.Size(279, 32)
Me.ADDED_WHENTextBox2.TabIndex = 35
'
'ADDED_WHOTextBox2
'
Me.ADDED_WHOTextBox2.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.ADDED_WHOTextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "ADDED_WHO", True))
Me.ADDED_WHOTextBox2.Location = New System.Drawing.Point(317, 121)
Me.ADDED_WHOTextBox2.Location = New System.Drawing.Point(712, 273)
Me.ADDED_WHOTextBox2.Name = "ADDED_WHOTextBox2"
Me.ADDED_WHOTextBox2.Size = New System.Drawing.Size(120, 21)
Me.ADDED_WHOTextBox2.Size = New System.Drawing.Size(270, 32)
Me.ADDED_WHOTextBox2.TabIndex = 34
'
'BindingNavigator3
@ -2063,41 +2063,41 @@ Partial Class frmMain
'
Me.GUIDPollStepsTextBox.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.GUIDPollStepsTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "GUID", True))
Me.GUIDPollStepsTextBox.Location = New System.Drawing.Point(254, 41)
Me.GUIDPollStepsTextBox.Location = New System.Drawing.Point(571, 93)
Me.GUIDPollStepsTextBox.Name = "GUIDPollStepsTextBox"
Me.GUIDPollStepsTextBox.Size = New System.Drawing.Size(57, 21)
Me.GUIDPollStepsTextBox.Size = New System.Drawing.Size(129, 32)
Me.GUIDPollStepsTextBox.TabIndex = 2
'
'STEP_NAMETextBox
'
Me.STEP_NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "STEP_NAME", True))
Me.STEP_NAMETextBox.Location = New System.Drawing.Point(317, 41)
Me.STEP_NAMETextBox.Location = New System.Drawing.Point(712, 93)
Me.STEP_NAMETextBox.Name = "STEP_NAMETextBox"
Me.STEP_NAMETextBox.Size = New System.Drawing.Size(221, 21)
Me.STEP_NAMETextBox.Size = New System.Drawing.Size(498, 32)
Me.STEP_NAMETextBox.TabIndex = 6
'
'KEYWORDS_BODYTextBox
'
Me.KEYWORDS_BODYTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "KEYWORDS_BODY", True))
Me.KEYWORDS_BODYTextBox.Location = New System.Drawing.Point(544, 41)
Me.KEYWORDS_BODYTextBox.Location = New System.Drawing.Point(1224, 93)
Me.KEYWORDS_BODYTextBox.Name = "KEYWORDS_BODYTextBox"
Me.KEYWORDS_BODYTextBox.Size = New System.Drawing.Size(364, 21)
Me.KEYWORDS_BODYTextBox.Size = New System.Drawing.Size(819, 32)
Me.KEYWORDS_BODYTextBox.TabIndex = 8
'
'COMMENTTextBox1
'
Me.COMMENTTextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_STEPSBindingSource, "COMMENT", True))
Me.COMMENTTextBox1.Location = New System.Drawing.Point(317, 81)
Me.COMMENTTextBox1.Location = New System.Drawing.Point(712, 183)
Me.COMMENTTextBox1.Name = "COMMENTTextBox1"
Me.COMMENTTextBox1.Size = New System.Drawing.Size(591, 21)
Me.COMMENTTextBox1.Size = New System.Drawing.Size(1331, 32)
Me.COMMENTTextBox1.TabIndex = 10
'
'ACTIVECheckBox2
'
Me.ACTIVECheckBox2.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_STEPSBindingSource, "ACTIVE", True))
Me.ACTIVECheckBox2.Location = New System.Drawing.Point(254, 78)
Me.ACTIVECheckBox2.Location = New System.Drawing.Point(571, 176)
Me.ACTIVECheckBox2.Name = "ACTIVECheckBox2"
Me.ACTIVECheckBox2.Size = New System.Drawing.Size(57, 24)
Me.ACTIVECheckBox2.Size = New System.Drawing.Size(129, 54)
Me.ACTIVECheckBox2.TabIndex = 12
Me.ACTIVECheckBox2.Text = "Active"
Me.ACTIVECheckBox2.UseVisualStyleBackColor = True
@ -2109,7 +2109,7 @@ Partial Class frmMain
Me.GridControl2.Location = New System.Drawing.Point(0, 0)
Me.GridControl2.MainView = Me.GridView2
Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(245, 337)
Me.GridControl2.Size = New System.Drawing.Size(245, 225)
Me.GridControl2.TabIndex = 1
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
'
@ -2179,10 +2179,10 @@ Partial Class frmMain
'SEQUENCENumericUpDown
'
Me.SEQUENCENumericUpDown.DataBindings.Add(New System.Windows.Forms.Binding("Value", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "SEQUENCE", True))
Me.SEQUENCENumericUpDown.Location = New System.Drawing.Point(508, 82)
Me.SEQUENCENumericUpDown.Location = New System.Drawing.Point(1143, 185)
Me.SEQUENCENumericUpDown.Maximum = New Decimal(New Integer() {20, 0, 0, 0})
Me.SEQUENCENumericUpDown.Name = "SEQUENCENumericUpDown"
Me.SEQUENCENumericUpDown.Size = New System.Drawing.Size(61, 21)
Me.SEQUENCENumericUpDown.Size = New System.Drawing.Size(2, 21)
Me.SEQUENCENumericUpDown.TabIndex = 57
'
'TBEMLP_POLL_INDEXING_STEPSBindingSource
@ -2196,34 +2196,34 @@ Partial Class frmMain
'
Me.GUIDTextBox1.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.GUIDTextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "GUID", True))
Me.GUIDTextBox1.Location = New System.Drawing.Point(254, 42)
Me.GUIDTextBox1.Location = New System.Drawing.Point(571, 95)
Me.GUIDTextBox1.Name = "GUIDTextBox1"
Me.GUIDTextBox1.Size = New System.Drawing.Size(66, 21)
Me.GUIDTextBox1.Size = New System.Drawing.Size(149, 32)
Me.GUIDTextBox1.TabIndex = 36
'
'INDEXNAMEIndexStepsComboBox
'
Me.INDEXNAMEIndexStepsComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "INDEXNAME", True))
Me.INDEXNAMEIndexStepsComboBox.FormattingEnabled = True
Me.INDEXNAMEIndexStepsComboBox.Location = New System.Drawing.Point(326, 42)
Me.INDEXNAMEIndexStepsComboBox.Location = New System.Drawing.Point(733, 95)
Me.INDEXNAMEIndexStepsComboBox.Name = "INDEXNAMEIndexStepsComboBox"
Me.INDEXNAMEIndexStepsComboBox.Size = New System.Drawing.Size(173, 21)
Me.INDEXNAMEIndexStepsComboBox.Size = New System.Drawing.Size(390, 32)
Me.INDEXNAMEIndexStepsComboBox.TabIndex = 40
'
'INDEXVALUETextBox
'
Me.INDEXVALUETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "INDEXVALUE", True))
Me.INDEXVALUETextBox.Location = New System.Drawing.Point(508, 42)
Me.INDEXVALUETextBox.Location = New System.Drawing.Point(1143, 95)
Me.INDEXVALUETextBox.Name = "INDEXVALUETextBox"
Me.INDEXVALUETextBox.Size = New System.Drawing.Size(200, 21)
Me.INDEXVALUETextBox.Size = New System.Drawing.Size(450, 32)
Me.INDEXVALUETextBox.TabIndex = 42
'
'ACTIVECheckBox3
'
Me.ACTIVECheckBox3.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "ACTIVE", True))
Me.ACTIVECheckBox3.Location = New System.Drawing.Point(254, 69)
Me.ACTIVECheckBox3.Location = New System.Drawing.Point(571, 156)
Me.ACTIVECheckBox3.Name = "ACTIVECheckBox3"
Me.ACTIVECheckBox3.Size = New System.Drawing.Size(66, 24)
Me.ACTIVECheckBox3.Size = New System.Drawing.Size(149, 54)
Me.ACTIVECheckBox3.TabIndex = 44
Me.ACTIVECheckBox3.Text = "Active"
Me.ACTIVECheckBox3.UseVisualStyleBackColor = True
@ -2231,9 +2231,9 @@ Partial Class frmMain
'USE_FOR_DIRECT_ANSWERCheckBox
'
Me.USE_FOR_DIRECT_ANSWERCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "USE_FOR_DIRECT_ANSWER", True))
Me.USE_FOR_DIRECT_ANSWERCheckBox.Location = New System.Drawing.Point(326, 72)
Me.USE_FOR_DIRECT_ANSWERCheckBox.Location = New System.Drawing.Point(733, 162)
Me.USE_FOR_DIRECT_ANSWERCheckBox.Name = "USE_FOR_DIRECT_ANSWERCheckBox"
Me.USE_FOR_DIRECT_ANSWERCheckBox.Size = New System.Drawing.Size(179, 24)
Me.USE_FOR_DIRECT_ANSWERCheckBox.Size = New System.Drawing.Size(404, 54)
Me.USE_FOR_DIRECT_ANSWERCheckBox.TabIndex = 46
Me.USE_FOR_DIRECT_ANSWERCheckBox.Text = "Index in case of direct answer"
Me.USE_FOR_DIRECT_ANSWERCheckBox.UseVisualStyleBackColor = True
@ -2242,36 +2242,36 @@ Partial Class frmMain
'
Me.ADDED_WHOTextBox3.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.ADDED_WHOTextBox3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "ADDED_WHO", True))
Me.ADDED_WHOTextBox3.Location = New System.Drawing.Point(324, 125)
Me.ADDED_WHOTextBox3.Location = New System.Drawing.Point(729, 282)
Me.ADDED_WHOTextBox3.Name = "ADDED_WHOTextBox3"
Me.ADDED_WHOTextBox3.Size = New System.Drawing.Size(121, 21)
Me.ADDED_WHOTextBox3.Size = New System.Drawing.Size(273, 32)
Me.ADDED_WHOTextBox3.TabIndex = 50
'
'ADDED_WHENTextBox3
'
Me.ADDED_WHENTextBox3.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.ADDED_WHENTextBox3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "ADDED_WHEN", True))
Me.ADDED_WHENTextBox3.Location = New System.Drawing.Point(454, 125)
Me.ADDED_WHENTextBox3.Location = New System.Drawing.Point(1021, 282)
Me.ADDED_WHENTextBox3.Name = "ADDED_WHENTextBox3"
Me.ADDED_WHENTextBox3.Size = New System.Drawing.Size(121, 21)
Me.ADDED_WHENTextBox3.Size = New System.Drawing.Size(273, 32)
Me.ADDED_WHENTextBox3.TabIndex = 52
'
'CHANGED_WHOIndexingStepsTextBox
'
Me.CHANGED_WHOIndexingStepsTextBox.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.CHANGED_WHOIndexingStepsTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "CHANGED_WHO", True))
Me.CHANGED_WHOIndexingStepsTextBox.Location = New System.Drawing.Point(584, 125)
Me.CHANGED_WHOIndexingStepsTextBox.Location = New System.Drawing.Point(1314, 282)
Me.CHANGED_WHOIndexingStepsTextBox.Name = "CHANGED_WHOIndexingStepsTextBox"
Me.CHANGED_WHOIndexingStepsTextBox.Size = New System.Drawing.Size(122, 21)
Me.CHANGED_WHOIndexingStepsTextBox.Size = New System.Drawing.Size(275, 32)
Me.CHANGED_WHOIndexingStepsTextBox.TabIndex = 54
'
'CHANGED_WHENTextBox3
'
Me.CHANGED_WHENTextBox3.BackColor = System.Drawing.SystemColors.InactiveBorder
Me.CHANGED_WHENTextBox3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBEMLP_POLL_INDEXING_STEPSBindingSource, "CHANGED_WHEN", True))
Me.CHANGED_WHENTextBox3.Location = New System.Drawing.Point(714, 125)
Me.CHANGED_WHENTextBox3.Location = New System.Drawing.Point(1606, 282)
Me.CHANGED_WHENTextBox3.Name = "CHANGED_WHENTextBox3"
Me.CHANGED_WHENTextBox3.Size = New System.Drawing.Size(121, 21)
Me.CHANGED_WHENTextBox3.Size = New System.Drawing.Size(273, 32)
Me.CHANGED_WHENTextBox3.TabIndex = 56
'
'BindingNavigator4
@ -2404,7 +2404,7 @@ Partial Class frmMain
Me.GridControl3.Location = New System.Drawing.Point(0, 0)
Me.GridControl3.MainView = Me.GridView3
Me.GridControl3.Name = "GridControl3"
Me.GridControl3.Size = New System.Drawing.Size(245, 337)
Me.GridControl3.Size = New System.Drawing.Size(245, 338)
Me.GridControl3.TabIndex = 34
Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3})
'
@ -2575,6 +2575,7 @@ Partial Class frmMain
Me.btnCheckIMAPObjects.Name = "btnCheckIMAPObjects"
Me.btnCheckIMAPObjects.Size = New System.Drawing.Size(189, 35)
Me.btnCheckIMAPObjects.TabIndex = 80
Me.btnCheckIMAPObjects.TabStop = False
Me.btnCheckIMAPObjects.Text = "Check Unseen IMAP Objects"
Me.btnCheckIMAPObjects.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnCheckIMAPObjects.UseVisualStyleBackColor = True
@ -2588,7 +2589,7 @@ Partial Class frmMain
Me.AUTH_TYPEComboBox.Location = New System.Drawing.Point(701, 164)
Me.AUTH_TYPEComboBox.Name = "AUTH_TYPEComboBox"
Me.AUTH_TYPEComboBox.Size = New System.Drawing.Size(121, 21)
Me.AUTH_TYPEComboBox.TabIndex = 79
Me.AUTH_TYPEComboBox.TabIndex = 8
'
'btntestImap
'
@ -2598,6 +2599,7 @@ Partial Class frmMain
Me.btntestImap.Name = "btntestImap"
Me.btntestImap.Size = New System.Drawing.Size(117, 35)
Me.btntestImap.TabIndex = 68
Me.btntestImap.TabStop = False
Me.btntestImap.Text = "Test IMAP"
Me.btntestImap.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btntestImap.UseVisualStyleBackColor = True
@ -2608,7 +2610,7 @@ Partial Class frmMain
Me.ARCHIVE_FOLDERTextBox.Location = New System.Drawing.Point(831, 164)
Me.ARCHIVE_FOLDERTextBox.Name = "ARCHIVE_FOLDERTextBox"
Me.ARCHIVE_FOLDERTextBox.Size = New System.Drawing.Size(227, 21)
Me.ARCHIVE_FOLDERTextBox.TabIndex = 77
Me.ARCHIVE_FOLDERTextBox.TabIndex = 9
'
'PORT_INTextBox
'
@ -2616,7 +2618,7 @@ Partial Class frmMain
Me.PORT_INTextBox.Location = New System.Drawing.Point(496, 164)
Me.PORT_INTextBox.Name = "PORT_INTextBox"
Me.PORT_INTextBox.Size = New System.Drawing.Size(100, 21)
Me.PORT_INTextBox.TabIndex = 71
Me.PORT_INTextBox.TabIndex = 7
'
'txtTestmail
'
@ -2625,7 +2627,7 @@ Partial Class frmMain
Me.txtTestmail.Location = New System.Drawing.Point(373, 258)
Me.txtTestmail.Name = "txtTestmail"
Me.txtTestmail.Size = New System.Drawing.Size(311, 21)
Me.txtTestmail.TabIndex = 67
Me.txtTestmail.TabIndex = 10
Me.txtTestmail.Text = Global.EmailProfiler.Form.My.MySettings.Default.EmailTest_Receipiant
'
'Label12
@ -2645,6 +2647,7 @@ Partial Class frmMain
Me.btnsendtestmail.Name = "btnsendtestmail"
Me.btnsendtestmail.Size = New System.Drawing.Size(117, 35)
Me.btnsendtestmail.TabIndex = 65
Me.btnsendtestmail.TabStop = False
Me.btnsendtestmail.Text = "Send testmail"
Me.btnsendtestmail.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnsendtestmail.UseVisualStyleBackColor = True
@ -2655,7 +2658,7 @@ Partial Class frmMain
Me.txtnewpasswort.Location = New System.Drawing.Point(738, 124)
Me.txtnewpasswort.Name = "txtnewpasswort"
Me.txtnewpasswort.Size = New System.Drawing.Size(186, 21)
Me.txtnewpasswort.TabIndex = 63
Me.txtnewpasswort.TabIndex = 4
Me.txtnewpasswort.UseSystemPasswordChar = True
'
'ContextMenuStrip2
@ -2677,7 +2680,7 @@ Partial Class frmMain
Me.Button4.Location = New System.Drawing.Point(930, 122)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(128, 23)
Me.Button4.TabIndex = 62
Me.Button4.TabIndex = 5
Me.Button4.Text = "Encrypt passwort"
Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button4.UseVisualStyleBackColor = True
@ -2689,6 +2692,7 @@ Partial Class frmMain
Me.EMAILIDTextBox.Name = "EMAILIDTextBox"
Me.EMAILIDTextBox.Size = New System.Drawing.Size(50, 21)
Me.EMAILIDTextBox.TabIndex = 35
Me.EMAILIDTextBox.TabStop = False
'
'NAMETextBox
'
@ -2696,7 +2700,7 @@ Partial Class frmMain
Me.NAMETextBox.Location = New System.Drawing.Point(373, 44)
Me.NAMETextBox.Name = "NAMETextBox"
Me.NAMETextBox.Size = New System.Drawing.Size(323, 21)
Me.NAMETextBox.TabIndex = 37
Me.NAMETextBox.TabIndex = 0
'
'EMAIL_FROMTextBox
'
@ -2704,7 +2708,7 @@ Partial Class frmMain
Me.EMAIL_FROMTextBox.Location = New System.Drawing.Point(373, 84)
Me.EMAIL_FROMTextBox.Name = "EMAIL_FROMTextBox"
Me.EMAIL_FROMTextBox.Size = New System.Drawing.Size(323, 21)
Me.EMAIL_FROMTextBox.TabIndex = 39
Me.EMAIL_FROMTextBox.TabIndex = 1
'
'EMAIL_SMTPTextBox
'
@ -2712,7 +2716,7 @@ Partial Class frmMain
Me.EMAIL_SMTPTextBox.Location = New System.Drawing.Point(701, 84)
Me.EMAIL_SMTPTextBox.Name = "EMAIL_SMTPTextBox"
Me.EMAIL_SMTPTextBox.Size = New System.Drawing.Size(357, 21)
Me.EMAIL_SMTPTextBox.TabIndex = 41
Me.EMAIL_SMTPTextBox.TabIndex = 2
'
'EMAIL_USERTextBox
'
@ -2720,7 +2724,7 @@ Partial Class frmMain
Me.EMAIL_USERTextBox.Location = New System.Drawing.Point(373, 124)
Me.EMAIL_USERTextBox.Name = "EMAIL_USERTextBox"
Me.EMAIL_USERTextBox.Size = New System.Drawing.Size(323, 21)
Me.EMAIL_USERTextBox.TabIndex = 43
Me.EMAIL_USERTextBox.TabIndex = 3
'
'EMAIL_PWTextBox
'
@ -2739,7 +2743,7 @@ Partial Class frmMain
Me.PORTTextBox.Location = New System.Drawing.Point(373, 164)
Me.PORTTextBox.Name = "PORTTextBox"
Me.PORTTextBox.Size = New System.Drawing.Size(121, 21)
Me.PORTTextBox.TabIndex = 47
Me.PORTTextBox.TabIndex = 6
'
'ACTIVECheckBox4
'
@ -2748,6 +2752,7 @@ Partial Class frmMain
Me.ACTIVECheckBox4.Name = "ACTIVECheckBox4"
Me.ACTIVECheckBox4.Size = New System.Drawing.Size(59, 24)
Me.ACTIVECheckBox4.TabIndex = 49
Me.ACTIVECheckBox4.TabStop = False
Me.ACTIVECheckBox4.Text = "Aktiv"
Me.ACTIVECheckBox4.UseVisualStyleBackColor = True
'
@ -2757,7 +2762,8 @@ Partial Class frmMain
Me.ADDED_WHOTextBox4.Location = New System.Drawing.Point(373, 313)
Me.ADDED_WHOTextBox4.Name = "ADDED_WHOTextBox4"
Me.ADDED_WHOTextBox4.Size = New System.Drawing.Size(166, 21)
Me.ADDED_WHOTextBox4.TabIndex = 51
Me.ADDED_WHOTextBox4.TabIndex = 11
Me.ADDED_WHOTextBox4.TabStop = False
'
'ADDED_WHENTextBox4
'
@ -2765,7 +2771,8 @@ Partial Class frmMain
Me.ADDED_WHENTextBox4.Location = New System.Drawing.Point(545, 313)
Me.ADDED_WHENTextBox4.Name = "ADDED_WHENTextBox4"
Me.ADDED_WHENTextBox4.Size = New System.Drawing.Size(151, 21)
Me.ADDED_WHENTextBox4.TabIndex = 53
Me.ADDED_WHENTextBox4.TabIndex = 12
Me.ADDED_WHENTextBox4.TabStop = False
'
'CHANGED_WHOTextBox1
'
@ -2773,7 +2780,8 @@ Partial Class frmMain
Me.CHANGED_WHOTextBox1.Location = New System.Drawing.Point(373, 353)
Me.CHANGED_WHOTextBox1.Name = "CHANGED_WHOTextBox1"
Me.CHANGED_WHOTextBox1.Size = New System.Drawing.Size(166, 21)
Me.CHANGED_WHOTextBox1.TabIndex = 55
Me.CHANGED_WHOTextBox1.TabIndex = 13
Me.CHANGED_WHOTextBox1.TabStop = False
'
'CHANGED_WHENTextBox5
'
@ -2781,7 +2789,8 @@ Partial Class frmMain
Me.CHANGED_WHENTextBox5.Location = New System.Drawing.Point(545, 353)
Me.CHANGED_WHENTextBox5.Name = "CHANGED_WHENTextBox5"
Me.CHANGED_WHENTextBox5.Size = New System.Drawing.Size(151, 21)
Me.CHANGED_WHENTextBox5.TabIndex = 57
Me.CHANGED_WHENTextBox5.TabIndex = 14
Me.CHANGED_WHENTextBox5.TabStop = False
'
'GridControl6
'
@ -2866,8 +2875,8 @@ Partial Class frmMain
'BindingNavigatorCountItem1
'
Me.BindingNavigatorCountItem1.Name = "BindingNavigatorCountItem1"
Me.BindingNavigatorCountItem1.Size = New System.Drawing.Size(35, 22)
Me.BindingNavigatorCountItem1.Text = "of {0}"
Me.BindingNavigatorCountItem1.Size = New System.Drawing.Size(44, 22)
Me.BindingNavigatorCountItem1.Text = "von {0}"
Me.BindingNavigatorCountItem1.ToolTipText = "Die Gesamtanzahl der Elemente."
'
'BindingNavigatorDeleteItem1

View File

@ -460,6 +460,9 @@
<metadata name="TBEMLP_POLL_STEPSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>537, 95</value>
</metadata>
<metadata name="TBEMLP_POLL_STEPSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>537, 95</value>
</metadata>
<metadata name="BindingNavigator3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1021, 95</value>
</metadata>
@ -643,6 +646,15 @@
TDI0LDIzLjh6IiBjbGFzcz0iQmxhY2siIC8+DQogIDwvZz4NCjwvc3ZnPgs=
</value>
</data>
<metadata name="BindingNavigator6.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>851, 173</value>
</metadata>
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>180, 56</value>
</metadata>
<metadata name="TBDD_EMAIL_ACCOUNTBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>623, 134</value>
</metadata>
<metadata name="ContextMenuStrip2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1162, 173</value>
</metadata>
@ -716,6 +728,9 @@
<metadata name="TBEMLP_CONFIGBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>239, 173</value>
</metadata>
<metadata name="TBEMLP_CONFIGBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>239, 173</value>
</metadata>
<metadata name="TBEMLP_HISTORYBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1297, 134</value>
</metadata>

View File

@ -1,12 +1,15 @@
Imports System.ComponentModel
Imports System.IO
Imports System.Net.Mail
Imports System.Text.RegularExpressions
Imports System.Windows.Forms.VisualStyles.VisualStyleElement.Tab
Imports DevExpress.XtraPrinting.Export
Imports DigitalData.GUIs.Common
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Messaging
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Messaging.Mail
Imports DigitalData.GUIs.Common
Imports EmailProfiler.Common
Public Class frmMain
@ -24,6 +27,8 @@ Public Class frmMain
Private _DBConfig As ClassDBConfig.Config
Private MyConnectionString As String
Private _MailSender As Mail.MailSender
Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles Me.Load
Try
LogConfig = New LogConfig(LogConfig.PathType.CustomPath, Path.Combine(My.Application.Info.DirectoryPath, "Log"), Nothing, My.Application.Info.CompanyName, My.Application.Info.ProductName)
@ -728,16 +733,44 @@ Public Class frmMain
Private Sub btnsendtestmail_Click(sender As Object, e As EventArgs) Handles btnsendtestmail.Click
If txtTestmail.Text <> String.Empty Then
ConfigManager.Save()
My.Settings.Save()
Cursor = Cursors.WaitCursor
Dim PWPlain = _Encryption.DecryptData(EMAIL_PWTextBox.Text)
'NEW
_MailSender = New Mail.MailSender(LogConfig)
Dim oOptions As New Mail.MailSession.MailSessionOptions() With {
.EnableTls1_1 = False,
.EnableTls1_2 = False,
.EnableDefault = True
}
Dim oResult As Mail.MailSession.SessionInfo = _MailSender.Connect(EMAIL_SMTPTextBox.Text, PORTTextBox.Text, EMAIL_USERTextBox.Text, PWPlain, AUTH_TYPEComboBox.Text, oOptions)
If _limilab.NewSMTPEmail(txtTestmail.Text, "Testmail", "This is the body (text will be replaced within profile)", EMAIL_FROMTextBox.Text, EMAIL_SMTPTextBox.Text, PORTTextBox.Text,
EMAIL_USERTextBox.Text, PWPlain, AUTH_TYPEComboBox.Text, "frmMain-Test", "", "", True) = True Then
If oResult.Connected = False Then
Cursor = Cursors.Default
MsgBox("Could not create a MailSession / connect to server. Please check the log.", MsgBoxStyle.Exclamation)
Exit Sub
End If
Dim oAddresses As List(Of String) = txtTestmail.Text.Split(";").ToList()
Dim oAddedWhen = Now
Dim oAttachments As New List(Of String)
Dim oBody As String = $"This is just a template body (text will be replaced within the run) - ProfileID: {EMAILIDTextBox.Text}"
Dim oMessageSent = _MailSender.SendMail(oAddresses, EMAIL_FROMTextBox.Text, "Testmail from EmailProfilerConfig", oBody, oAddedWhen, oAttachments, False)
Cursor = Cursors.Default
If oMessageSent = True Then
MsgBox("Email has been send successfully.", MsgBoxStyle.Information)
Else
MsgBox("Could not send the testmail. Please check the log.", MsgBoxStyle.Exclamation)
End If
'NEW END
'If _limilab.NewSMTPEmail(txtTestmail.Text, "Testmail", "This is the body (text will be replaced within profile)", EMAIL_FROMTextBox.Text, EMAIL_SMTPTextBox.Text, PORTTextBox.Text,
' EMAIL_USERTextBox.Text, PWPlain, AUTH_TYPEComboBox.Text, "frmMain-Test", "", "", True) = True Then
' MsgBox("Email has been send successfully.", MsgBoxStyle.Information)
'Else
' MsgBox("Could not send the testmail. Please check the log.", MsgBoxStyle.Exclamation)
'End If
End If
End Sub

View File

@ -1,4 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="Microsoft.Identity.Client" version="4.55.0" targetFramework="net462" />
<package id="Microsoft.IdentityModel.Abstractions" version="6.22.0" targetFramework="net462" />
<package id="NLog" version="5.0.5" targetFramework="net461" />
<package id="S22.Imap" version="3.6.0.0" targetFramework="net462" />
</packages>