Compare commits
16 Commits
master
...
Release-Mo
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
9b321269ce | ||
|
|
5d4cdb2814 | ||
|
|
c2e7d06c4c | ||
|
|
b4ea5d9a00 | ||
|
|
da9b468b01 | ||
|
|
180d5d7d3a | ||
|
|
234510e5db | ||
|
|
7ce7a11a30 | ||
|
|
80b33eb3b2 | ||
|
|
4a62d456d0 | ||
|
|
2c1c63563c | ||
|
|
6272a11eb1 | ||
|
|
8a7a9ebb67 | ||
|
|
6d12be2033 | ||
|
|
c7ef7fe478 | ||
|
|
48bc6dcc26 |
@@ -1,20 +1,18 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
<configuration>
|
<configuration>
|
||||||
<configSections>
|
<configSections>
|
||||||
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
|
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||||
<section name="EmailProfiler.Form.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
<section name="EmailProfiler.Form.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
|
||||||
</sectionGroup>
|
</sectionGroup>
|
||||||
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
|
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||||
<section name="EmailProfiler.Form.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
|
<section name="EmailProfiler.Form.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false"/>
|
||||||
</sectionGroup>
|
</sectionGroup>
|
||||||
</configSections>
|
</configSections>
|
||||||
<connectionStrings>
|
<connectionStrings>
|
||||||
<add name="EmailProfiler.Form.My.MySettings.MyDatasetConnString"
|
<add name="EmailProfiler.Form.My.MySettings.MyDatasetConnString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True" providerName="System.Data.SqlClient"/>
|
||||||
connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True"
|
|
||||||
providerName="System.Data.SqlClient" />
|
|
||||||
</connectionStrings>
|
</connectionStrings>
|
||||||
<startup>
|
<startup>
|
||||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2"/>
|
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
|
||||||
</startup>
|
</startup>
|
||||||
<runtime>
|
<runtime>
|
||||||
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
|
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
|
||||||
@@ -27,10 +25,10 @@
|
|||||||
<userSettings>
|
<userSettings>
|
||||||
<EmailProfiler.Form.My.MySettings>
|
<EmailProfiler.Form.My.MySettings>
|
||||||
<setting name="EmailTest_Receipiant" serializeAs="String">
|
<setting name="EmailTest_Receipiant" serializeAs="String">
|
||||||
<value />
|
<value/>
|
||||||
</setting>
|
</setting>
|
||||||
<setting name="MyTestHTML" serializeAs="String">
|
<setting name="MyTestHTML" serializeAs="String">
|
||||||
<value />
|
<value/>
|
||||||
</setting>
|
</setting>
|
||||||
<setting name="DEBUG" serializeAs="String">
|
<setting name="DEBUG" serializeAs="String">
|
||||||
<value>False</value>
|
<value>False</value>
|
||||||
@@ -43,10 +41,10 @@
|
|||||||
<value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</value>
|
<value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</value>
|
||||||
</setting>
|
</setting>
|
||||||
<setting name="FB_DATABASE" serializeAs="String">
|
<setting name="FB_DATABASE" serializeAs="String">
|
||||||
<value />
|
<value/>
|
||||||
</setting>
|
</setting>
|
||||||
<setting name="FB_DATASOURCE" serializeAs="String">
|
<setting name="FB_DATASOURCE" serializeAs="String">
|
||||||
<value />
|
<value/>
|
||||||
</setting>
|
</setting>
|
||||||
<setting name="FB_USER" serializeAs="String">
|
<setting name="FB_USER" serializeAs="String">
|
||||||
<value>sysdba</value>
|
<value>sysdba</value>
|
||||||
|
|||||||
@@ -11,7 +11,7 @@
|
|||||||
<AssemblyName>EmailProfiler.Form</AssemblyName>
|
<AssemblyName>EmailProfiler.Form</AssemblyName>
|
||||||
<FileAlignment>512</FileAlignment>
|
<FileAlignment>512</FileAlignment>
|
||||||
<MyType>WindowsForms</MyType>
|
<MyType>WindowsForms</MyType>
|
||||||
<TargetFrameworkVersion>v4.6.2</TargetFrameworkVersion>
|
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
|
||||||
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
||||||
<TargetFrameworkProfile />
|
<TargetFrameworkProfile />
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
|
|||||||
@@ -1,10 +1,10 @@
|
|||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
' <auto-generated>
|
' <auto-generated>
|
||||||
' Dieser Code wurde von einem Tool generiert.
|
' This code was generated by a tool.
|
||||||
' Laufzeitversion:4.0.30319.42000
|
' Runtime Version:4.0.30319.42000
|
||||||
'
|
'
|
||||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
' Changes to this file may cause incorrect behavior and will be lost if
|
||||||
' der Code erneut generiert wird.
|
' the code is regenerated.
|
||||||
' </auto-generated>
|
' </auto-generated>
|
||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
@@ -14,10 +14,10 @@ Option Explicit On
|
|||||||
|
|
||||||
Namespace My
|
Namespace My
|
||||||
|
|
||||||
'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden. Wenn Sie Änderungen vornehmen möchten
|
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||||
' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
|
' or if you encounter build errors in this file, go to the Project Designer
|
||||||
' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
|
' (go to Project Properties or double-click the My Project node in
|
||||||
' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
|
' Solution Explorer), and make changes on the Application tab.
|
||||||
'
|
'
|
||||||
Partial Friend Class MyApplication
|
Partial Friend Class MyApplication
|
||||||
|
|
||||||
@@ -34,5 +34,11 @@ Namespace My
|
|||||||
Protected Overrides Sub OnCreateMainForm()
|
Protected Overrides Sub OnCreateMainForm()
|
||||||
Me.MainForm = Global.EmailProfiler.Form.frmMain
|
Me.MainForm = Global.EmailProfiler.Form.frmMain
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||||
|
Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
|
||||||
|
Me.MinimumSplashScreenDisplayTime = 0
|
||||||
|
Return MyBase.OnInitialize(commandLineArgs)
|
||||||
|
End Function
|
||||||
End Class
|
End Class
|
||||||
End Namespace
|
End Namespace
|
||||||
|
|||||||
@@ -1,11 +1,12 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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">
|
<MyApplicationData xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
|
||||||
<MySubMain>true</MySubMain>
|
<MySubMain>true</MySubMain>
|
||||||
<MainForm>Form1</MainForm>
|
<MainForm>frmMain</MainForm>
|
||||||
<SingleInstance>false</SingleInstance>
|
<SingleInstance>false</SingleInstance>
|
||||||
<ShutdownMode>0</ShutdownMode>
|
<ShutdownMode>0</ShutdownMode>
|
||||||
<EnableVisualStyles>true</EnableVisualStyles>
|
<EnableVisualStyles>true</EnableVisualStyles>
|
||||||
<AuthenticationMode>0</AuthenticationMode>
|
<AuthenticationMode>0</AuthenticationMode>
|
||||||
<ApplicationType>0</ApplicationType>
|
<MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
|
||||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||||
|
<HighDpiMode>0</HighDpiMode>
|
||||||
</MyApplicationData>
|
</MyApplicationData>
|
||||||
@@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices
|
|||||||
<Assembly: AssemblyCompany("Digital Data")>
|
<Assembly: AssemblyCompany("Digital Data")>
|
||||||
<Assembly: AssemblyProduct("EmailProfiler Config")>
|
<Assembly: AssemblyProduct("EmailProfiler Config")>
|
||||||
<Assembly: AssemblyCopyright("Copyright © 2025")>
|
<Assembly: AssemblyCopyright("Copyright © 2025")>
|
||||||
<Assembly: AssemblyTrademark("3.1.0")>
|
<Assembly: AssemblyTrademark("3.2.0")>
|
||||||
|
|
||||||
<Assembly: ComVisible(False)>
|
<Assembly: ComVisible(False)>
|
||||||
|
|
||||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
|||||||
' übernehmen, indem Sie "*" eingeben:
|
' übernehmen, indem Sie "*" eingeben:
|
||||||
' <Assembly: AssemblyVersion("1.0.*")>
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
<Assembly: AssemblyVersion("3.1.0.0")>
|
<Assembly: AssemblyVersion("3.2.0.0")>
|
||||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||||
|
|||||||
@@ -1,10 +1,10 @@
|
|||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
' <auto-generated>
|
' <auto-generated>
|
||||||
' Dieser Code wurde von einem Tool generiert.
|
' This code was generated by a tool.
|
||||||
' Laufzeitversion:4.0.30319.42000
|
' Runtime Version:4.0.30319.42000
|
||||||
'
|
'
|
||||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
' Changes to this file may cause incorrect behavior and will be lost if
|
||||||
' der Code erneut generiert wird.
|
' the code is regenerated.
|
||||||
' </auto-generated>
|
' </auto-generated>
|
||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
@@ -15,12 +15,12 @@ Imports System
|
|||||||
|
|
||||||
Namespace My.Resources
|
Namespace My.Resources
|
||||||
|
|
||||||
'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
|
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||||
'-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
|
'class via a tool like ResGen or Visual Studio.
|
||||||
'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
|
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||||
'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
|
'with the /str option, or rebuild your VS project.
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
|
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"), _
|
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"), _
|
||||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||||
@@ -33,7 +33,7 @@ Namespace My.Resources
|
|||||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
|
''' Returns the cached ResourceManager instance used by this class.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||||
@@ -47,8 +47,8 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
|
''' Overrides the current thread's CurrentUICulture property for all
|
||||||
''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
|
''' resource lookups using this strongly typed resource class.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||||
@@ -61,7 +61,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property arrow_Down_16xMD() As System.Drawing.Bitmap
|
Friend ReadOnly Property arrow_Down_16xMD() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -71,7 +71,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property arrow_right() As System.Drawing.Bitmap
|
Friend ReadOnly Property arrow_right() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -81,7 +81,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property email_go() As System.Drawing.Bitmap
|
Friend ReadOnly Property email_go() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -91,7 +91,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property Encrypt() As System.Drawing.Bitmap
|
Friend ReadOnly Property Encrypt() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -101,7 +101,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property folder_Closed_16xLG() As System.Drawing.Bitmap
|
Friend ReadOnly Property folder_Closed_16xLG() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -111,7 +111,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property handdrawn_arrow_down() As System.Drawing.Bitmap
|
Friend ReadOnly Property handdrawn_arrow_down() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -121,7 +121,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property key_16xLG() As System.Drawing.Bitmap
|
Friend ReadOnly Property key_16xLG() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -131,7 +131,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property refresh_16xLG() As System.Drawing.Bitmap
|
Friend ReadOnly Property refresh_16xLG() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
@@ -141,7 +141,7 @@ Namespace My.Resources
|
|||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'''<summary>
|
||||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||||
'''</summary>
|
'''</summary>
|
||||||
Friend ReadOnly Property save_16xMD() As System.Drawing.Bitmap
|
Friend ReadOnly Property save_16xMD() As System.Drawing.Bitmap
|
||||||
Get
|
Get
|
||||||
|
|||||||
@@ -1,10 +1,10 @@
|
|||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
' <auto-generated>
|
' <auto-generated>
|
||||||
' Dieser Code wurde von einem Tool generiert.
|
' This code was generated by a tool.
|
||||||
' Laufzeitversion:4.0.30319.42000
|
' Runtime Version:4.0.30319.42000
|
||||||
'
|
'
|
||||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
' Changes to this file may cause incorrect behavior and will be lost if
|
||||||
' der Code erneut generiert wird.
|
' the code is regenerated.
|
||||||
' </auto-generated>
|
' </auto-generated>
|
||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
@@ -22,7 +22,7 @@ Namespace My
|
|||||||
|
|
||||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||||
|
|
||||||
#Region "Automatische My.Settings-Speicherfunktion"
|
#Region "My.Settings Auto-Save Functionality"
|
||||||
#If _MyType = "WindowsForms" Then
|
#If _MyType = "WindowsForms" Then
|
||||||
Private Shared addedHandler As Boolean
|
Private Shared addedHandler As Boolean
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,3 @@
|
|||||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
|
||||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
|
||||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||||
DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||||
|
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||||
|
|||||||
685
App/EmailProfiler.Form/frmMain.Designer.vb
generated
685
App/EmailProfiler.Form/frmMain.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@@ -75,7 +75,6 @@ Public Class frmMain
|
|||||||
|
|
||||||
If Set_ConnectionStrings() Then
|
If Set_ConnectionStrings() Then
|
||||||
Load_AllData()
|
Load_AllData()
|
||||||
LoadMonitoringIntoGrid()
|
|
||||||
Check_Steps()
|
Check_Steps()
|
||||||
Active_Color(ACTIVECheckBox)
|
Active_Color(ACTIVECheckBox)
|
||||||
Active_Color(ACTIVECheckBox1)
|
Active_Color(ACTIVECheckBox1)
|
||||||
@@ -94,6 +93,11 @@ Public Class frmMain
|
|||||||
|
|
||||||
|
|
||||||
_Encryption = New clsEncryption("!35452didalog=", LogConfig)
|
_Encryption = New clsEncryption("!35452didalog=", LogConfig)
|
||||||
|
|
||||||
|
If String.IsNullOrWhiteSpace(txtMonitoringConfig.Text) OrElse Not IsNumeric(txtMonitoringConfig.Text) OrElse CInt(txtMonitoringConfig.Text) <= 0 Then
|
||||||
|
txtMonitoringConfig.Text = "500"
|
||||||
|
End If
|
||||||
|
LoadMonitoringIntoGrid()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||||
@@ -481,6 +485,7 @@ Public Class frmMain
|
|||||||
Private Sub ToolStripButton10_Click(sender As Object, e As EventArgs) Handles ToolStripButton10.Click
|
Private Sub ToolStripButton10_Click(sender As Object, e As EventArgs) Handles ToolStripButton10.Click
|
||||||
Load_Processes()
|
Load_Processes()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub ToolStripButton8_Click(sender As Object, e As EventArgs) Handles ToolStripButton8.Click
|
Private Sub ToolStripButton8_Click(sender As Object, e As EventArgs) Handles ToolStripButton8.Click
|
||||||
Try
|
Try
|
||||||
TBEMLP_POLL_PROCESSBindingSource.EndEdit()
|
TBEMLP_POLL_PROCESSBindingSource.EndEdit()
|
||||||
@@ -687,8 +692,8 @@ Public Class frmMain
|
|||||||
If _LoadInProgress = True Then Exit Sub
|
If _LoadInProgress = True Then Exit Sub
|
||||||
LogConfig.Debug = LOG_ERRORS_ONLYCheckBox.Checked
|
LogConfig.Debug = LOG_ERRORS_ONLYCheckBox.Checked
|
||||||
ConfigManager.Save()
|
ConfigManager.Save()
|
||||||
Dim upr = $"UPDATE TBEMLP_CONFIG SET CHANGED_WHO = '{Environment.UserName}',LOG_ERRORS_ONLY = '{LOG_ERRORS_ONLYCheckBox.Checked}' WHERE GUID = 1"
|
Dim upd = $"UPDATE TBEMLP_CONFIG SET CHANGED_WHO = '{Environment.UserName}',LOG_ERRORS_ONLY = '{LOG_ERRORS_ONLYCheckBox.Checked}' WHERE GUID = 1"
|
||||||
_database.ExecuteNonQuery(upr)
|
_database.ExecuteNonQuery(upd)
|
||||||
Load_Config()
|
Load_Config()
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
@@ -824,6 +829,7 @@ Public Class frmMain
|
|||||||
Dim oUser = oRow.Item("EMAIL_USER")
|
Dim oUser = oRow.Item("EMAIL_USER")
|
||||||
Dim oAuthType = oRow.Item("AUTH_TYPE")
|
Dim oAuthType = oRow.Item("AUTH_TYPE")
|
||||||
Dim oArchiveFolder = oRow.Item("ARCHIVE_FOLDER")
|
Dim oArchiveFolder = oRow.Item("ARCHIVE_FOLDER")
|
||||||
|
|
||||||
Dim oFetcher As New MailFetcher(LogConfig)
|
Dim oFetcher As New MailFetcher(LogConfig)
|
||||||
Dim oSession As MailSession.SessionInfo
|
Dim oSession As MailSession.SessionInfo
|
||||||
|
|
||||||
@@ -1044,46 +1050,69 @@ Public Class frmMain
|
|||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
' Loads the TBEMLP_HISTORY table into the monitoring grid and formats columns
|
|
||||||
Private Sub LoadMonitoringIntoGrid()
|
Private Sub LoadMonitoringIntoGrid()
|
||||||
Try
|
Try
|
||||||
' Fill dataset table (adapter exists in designer)
|
|
||||||
Me.TBEMLP_HISTORYTableAdapter.Fill(Me.MyDataset.TBEMLP_HISTORY)
|
|
||||||
|
|
||||||
' Bind the grid to the binding source defined in the designer
|
Dim emailAmount As Integer
|
||||||
Me.gridMonitoring.DataSource = Me.TBEMLP_HISTORYBindingSource
|
If txtMonitoringConfig.Text = Nothing OrElse Not IsNumeric(txtMonitoringConfig.Text) Then
|
||||||
|
emailAmount = 500
|
||||||
|
Else
|
||||||
|
emailAmount = Convert.ToInt32(txtMonitoringConfig.Text)
|
||||||
|
End If
|
||||||
|
|
||||||
' Format columns on the view
|
Dim oSQL = $"SELECT TOP ({emailAmount}) GUID, PROFILE_ID, EMAIL_MSGID, EMAIL_FROM, EMAIL_SUBJECT, EMAIL_DATE, ADDED_WHEN, STATUS FROM [dbo].[TBEMLP_HISTORY] (nolock) order by GUID DESC"
|
||||||
Dim gv = TryCast(Me.GridView5, DevExpress.XtraGrid.Views.Grid.GridView)
|
Dim oDT As DataTable = _database.GetDatatable(oSQL)
|
||||||
If gv IsNot Nothing Then
|
|
||||||
gv.PopulateColumns()
|
|
||||||
|
|
||||||
' Hide all columns first
|
Me.gridMonitoring.DataSource = oDT
|
||||||
For Each column As DevExpress.XtraGrid.Columns.GridColumn In gv.Columns
|
|
||||||
column.Visible = False
|
|
||||||
Next
|
|
||||||
|
|
||||||
' Show only the desired columns
|
Dim gridView = TryCast(Me.GridViewMonitoring, DevExpress.XtraGrid.Views.Grid.GridView)
|
||||||
Dim visibleColumns = New String() {"GUID", "EMAIL_MSGID", "EMAIL_FROM", "EMAIL_SUBJECT", "EMAIL_DATE", "ADDED_WHEN", "STATUS", "PROFILE_ID"}
|
If gridView IsNot Nothing Then
|
||||||
For Each columnName In visibleColumns
|
|
||||||
Dim column = gv.Columns.ColumnByFieldName(columnName)
|
|
||||||
If column IsNot Nothing Then
|
|
||||||
column.Visible = True
|
|
||||||
End If
|
|
||||||
Next
|
|
||||||
|
|
||||||
' Optionally format specific columns
|
gridView.OptionsView.ColumnAutoWidth = True
|
||||||
If gv.Columns.ColumnByFieldName("EMAIL_DATE") IsNot Nothing Then
|
gridView.BestFitColumns()
|
||||||
gv.Columns("EMAIL_DATE").DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
|
gridView.OptionsBehavior.Editable = False
|
||||||
gv.Columns("EMAIL_DATE").DisplayFormat.FormatString = "yyyy-MM-dd HH:mm:ss"
|
|
||||||
End If
|
|
||||||
|
|
||||||
gv.OptionsView.ColumnAutoWidth = False
|
LoadLayoutMonitoring()
|
||||||
gv.BestFitColumns()
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Catch ex As Exception
|
Catch ex As Exception
|
||||||
If Logger IsNot Nothing Then Logger.Error(ex) Else Debug.WriteLine(ex.ToString())
|
If Logger IsNot Nothing Then Logger.Error(ex) Else Debug.WriteLine(ex.ToString())
|
||||||
End Try
|
End Try
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub txtMonitoringConfig_LostFocus(sender As Object, e As EventArgs) Handles txtMonitoringConfig.LostFocus
|
||||||
|
If Not IsNumeric(txtMonitoringConfig.Text) OrElse CInt(txtMonitoringConfig.Text) <= 0 Then
|
||||||
|
txtMonitoringConfig.Text = "500"
|
||||||
|
End If
|
||||||
|
LoadMonitoringIntoGrid()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnRefresh_Click(sender As Object, e As EventArgs) Handles btnRefresh.Click
|
||||||
|
LoadMonitoringIntoGrid()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnSaveLayout_Click(sender As Object, e As EventArgs) Handles btnSaveLayout.Click
|
||||||
|
Dim layoutPath As String = System.IO.Path.Combine(Application.UserAppDataPath, "gridMonitoringLayout.xml")
|
||||||
|
GridViewMonitoring.SaveLayoutToXml(layoutPath)
|
||||||
|
MessageBox.Show("Layout gespeichert!")
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnRestoreDefaultLayout_Click(sender As Object, e As EventArgs) Handles btnRestoreDefaultLayout.Click
|
||||||
|
Dim layoutPath As String = System.IO.Path.Combine(Application.UserAppDataPath, "gridMonitoringLayout.xml")
|
||||||
|
If System.IO.File.Exists(layoutPath) Then
|
||||||
|
System.IO.File.Delete(layoutPath)
|
||||||
|
End If
|
||||||
|
GridViewMonitoring.Columns.Clear()
|
||||||
|
gridMonitoring.DataSource = Nothing
|
||||||
|
LoadMonitoringIntoGrid()
|
||||||
|
MessageBox.Show("Standardlayout wurde wiederhergestellt!")
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub LoadLayoutMonitoring()
|
||||||
|
Dim layoutPath As String = System.IO.Path.Combine(Application.UserAppDataPath, "gridMonitoringLayout.xml")
|
||||||
|
If System.IO.File.Exists(layoutPath) Then
|
||||||
|
GridViewMonitoring.RestoreLayoutFromXml(layoutPath)
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
<packages>
|
<packages>
|
||||||
<package id="Microsoft.Identity.Client" version="4.55.0" targetFramework="net462" />
|
<package id="Microsoft.Identity.Client" version="4.55.0" targetFramework="net462" />
|
||||||
<package id="Microsoft.IdentityModel.Abstractions" version="6.22.0" targetFramework="net462" />
|
<package id="Microsoft.IdentityModel.Abstractions" version="6.22.0" targetFramework="net462" requireReinstallation="true" />
|
||||||
<package id="NLog" version="5.0.5" targetFramework="net461" />
|
<package id="NLog" version="5.0.5" targetFramework="net461" />
|
||||||
<package id="S22.Imap" version="3.6.0.0" targetFramework="net462" />
|
<package id="S22.Imap" version="3.6.0.0" targetFramework="net462" />
|
||||||
</packages>
|
</packages>
|
||||||
@@ -57,13 +57,13 @@
|
|||||||
<Reference Include="DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
<Reference Include="DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||||
<Reference Include="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
<Reference Include="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||||
<Reference Include="DigitalData.Modules.Config">
|
<Reference Include="DigitalData.Modules.Config">
|
||||||
<HintPath>..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
|
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
|
||||||
</Reference>
|
</Reference>
|
||||||
<Reference Include="DigitalData.Modules.Database">
|
<Reference Include="DigitalData.Modules.Database">
|
||||||
<HintPath>..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
|
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
|
||||||
</Reference>
|
</Reference>
|
||||||
<Reference Include="DigitalData.Modules.Logging">
|
<Reference Include="DigitalData.Modules.Logging">
|
||||||
<HintPath>..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
|
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
|
||||||
</Reference>
|
</Reference>
|
||||||
<Reference Include="EmailProfiler.Common">
|
<Reference Include="EmailProfiler.Common">
|
||||||
<HintPath>..\EmailProfiler.Common\bin\Debug\EmailProfiler.Common.dll</HintPath>
|
<HintPath>..\EmailProfiler.Common\bin\Debug\EmailProfiler.Common.dll</HintPath>
|
||||||
|
|||||||
Reference in New Issue
Block a user