jj for ms
This commit is contained in:
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -0,0 +1,4 @@
|
||||
2021-01-18 09:09:44|clsWorkEmail|ERROR >> Ungültige Konvertierung von Typ DBNull in Typ String. bei Microsoft.VisualBasic.CompilerServices.Conversions.ToString(Object Value)
|
||||
bei DigitalData.EMLProfiler.clsWorkEmail.COMMON_EMAIL_IN() in E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\clsWorkEmail.vb:Zeile 181.
|
||||
2021-01-18 09:09:48|clsDatabase|WARN >> Unexpected Error in Execute_non_Query: Ungültiger Spaltenname "PROFILE_ID".
|
||||
2021-01-18 09:09:48|clsDatabase|WARN >> SQL: INSERT INTO TBEMLP_HISTORY (WORK_PROCESS,EMAIL_MSGID,EMAIL_SUBJECT,EMAIL_DATE,EMAIL_BODY,EMAIL_SUBSTRING1,EMAIL_SUBSTRING2,EMAIL_FROM,PROFILE_ID) VALUES ('Attachment Sniffer','645968143.4849.1605607251487@w2k12srv187','Rechnung 3250000712 vom 17.11.2020','17.11.2020 11:00:51','','','','Kerstin.Franke@wisag.de',2)
|
||||
@@ -0,0 +1,8 @@
|
||||
2021-01-18 09:06:33|frmMain|INFO >> ## Manual working on file E:\ForwardedMessage.eml ...
|
||||
2021-01-18 09:09:29|frmMain|INFO >> ## Manual working on file E:\ForwardedMessage.eml ...
|
||||
2021-01-18 09:09:36|clsWorker|INFO >> Worked/Pulled: 1 E-Mails
|
||||
2021-01-18 09:09:36|clsWorkEmail|INFO >> No relation configured for this email - Subject[RECHNUNG 3250000712 VOM 17.11.2020]
|
||||
2021-01-18 09:09:36|clsWorkEmail|INFO >> COMMON_EMAIL_IN...Subject [Rechnung 3250000712 vom 17.11.2020]
|
||||
2021-01-18 09:09:48|clsDatabase|WARN >> Unexpected Error in Execute_non_Query: Ungültiger Spaltenname "PROFILE_ID".
|
||||
2021-01-18 09:09:48|clsDatabase|WARN >> SQL: INSERT INTO TBEMLP_HISTORY (WORK_PROCESS,EMAIL_MSGID,EMAIL_SUBJECT,EMAIL_DATE,EMAIL_BODY,EMAIL_SUBSTRING1,EMAIL_SUBSTRING2,EMAIL_FROM,PROFILE_ID) VALUES ('Attachment Sniffer','645968143.4849.1605607251487@w2k12srv187','Rechnung 3250000712 vom 17.11.2020','17.11.2020 11:00:51','','','','Kerstin.Franke@wisag.de',2)
|
||||
2021-01-18 09:09:48|clsWorker|INFO >> TempFileDelete - Could not delete the tempfile from TEMP_FILES: Der Prozess kann nicht auf die Datei "C:\Users\SchreiberM\AppData\Local\Temp\DD_EmailProfiler\Rechnung 3250000712 vom 17.11.2020.eml" zugreifen, da sie von einem anderen Prozess verwendet wird.
|
||||
@@ -290,7 +290,7 @@ Public Class frmMain
|
||||
For Each ofile As String In _Worklist
|
||||
_Localemail = ofile
|
||||
Logger.Info($"## Manual working on file {ofile} ... ")
|
||||
Dim _work As New clsWorker(MyLogger, _SQLServerConString, GUIDTextBox.Text, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USER, My.Settings.FB_PW, _Localemail)
|
||||
Dim _work As New clsWorker(MyLogger, _SQLServerConString, GUIDTextBox.Text, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USER, My.Settings.FB_PW, My.Settings.USE_WM, _Localemail)
|
||||
_work.Start_WorkingProfiles(True)
|
||||
Next
|
||||
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -1,5 +1,3 @@
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\DevExpress.Pdf.v18.1.Core.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.Resources.resources
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\CONFIG_APP.exe.config
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\CONFIG_APP.exe
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\CONFIG_APP.pdb
|
||||
@@ -19,6 +17,7 @@ E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\NLog.d
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\S22.Imap.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\Interop.WINDREAMLib.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\DigitalData.Modules.Database.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\DevExpress.Pdf.v18.1.Core.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\DevExpress.Sparkline.v18.1.Core.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\DevExpress.XtraBars.v18.1.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\DevExpress.RichEdit.v18.1.Core.dll
|
||||
@@ -107,6 +106,7 @@ E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\ja\Dev
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\bin\Debug\ru\DevExpress.Office.v18.1.Core.resources.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.vbprojAssemblyReference.cache
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.frmMain.resources
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.Resources.resources
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.vbproj.GenerateResource.cache
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.exe.licenses
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\CONFIG_APP\obj\Debug\CONFIG_APP.vbproj.CopyComplete
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("2.8.0.0")>
|
||||
<Assembly: AssemblyFileVersion("2.8.0.0")>
|
||||
<Assembly: AssemblyVersion("2.9.0.0")>
|
||||
<Assembly: AssemblyFileVersion("2.9.0.0")>
|
||||
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -133,7 +133,7 @@ DigitalData.Modules.Logging
|
||||
Clears the internal log
|
||||
</summary>
|
||||
</member>
|
||||
<member name="M:DigitalData.Modules.Logging.LogConfig.GetClassFullName">
|
||||
<member name="M:DigitalData.Modules.Logging.LogConfig.GetClassFullName(System.Boolean)">
|
||||
<summary>
|
||||
Gets the fully qualified name of the class invoking the calling method,
|
||||
including the namespace but Not the assembly.
|
||||
|
||||
@@ -202,15 +202,18 @@ Public Class clsEmailIMAP
|
||||
|
||||
Dim oFoundMessages As Message() = New Message(oUniqueID.Length - 1) {}
|
||||
Dim oEnvelopes As Independentsoft.Email.Imap.Envelope() = oClient.ListMessages()
|
||||
|
||||
For oCounterEnvelope As Integer = 0 To oEnvelopes.Length - 1
|
||||
Logger.Debug($"oEnvelopes.Length: {oEnvelopes.Length}")
|
||||
For oCounterEmailInPostbox As Integer = 0 To oUniqueID.Length - 1
|
||||
|
||||
If oEnvelopes(oCounterEnvelope).UniqueID = oUniqueID(oCounterEmailInPostbox) Then
|
||||
Dim oMimeMessage As Mime.Message = oClient.GetMessage(oEnvelopes(oCounterEnvelope).UniqueID)
|
||||
If Not IsNothing(oMimeMessage) Then
|
||||
Dim oMessageID = oMimeMessage.MessageID
|
||||
oMessageID = oMessageID.Replace(">", "").Replace("<", "")
|
||||
'oEnvelopes(oCounterEnvelope).UniqueI
|
||||
Logger.Debug($"Isoft: Working on email: MessageID [{oMessageID}] - Subject[{oEnvelopes(oCounterEnvelope).Subject}] - Date [{oEnvelopes(oCounterEnvelope).Date.ToString}]")
|
||||
Logger.Info($"Isoft: Working on email: MessageID [{oMessageID}] - Subject[{oEnvelopes(oCounterEnvelope).Subject}] - Date [{oEnvelopes(oCounterEnvelope).Date.ToString}]")
|
||||
Dim oCHECKSQL = $"SELECT * FROM TBEMLP_HISTORY WHERE lower(EMAIL_MSGID) = lower('{oMessageID}')"
|
||||
Dim oCHECKDT As DataTable = _DB_MSSQL.Return_Datatable(oCHECKSQL)
|
||||
If Not IsNothing(oCHECKDT) Then
|
||||
@@ -227,11 +230,12 @@ Public Class clsEmailIMAP
|
||||
Dim oUpd = $"UPDATE TBEMLP_HISTORY SET DATE_DELETED_INBOX = GETDATE(), COMMENT = 'DELETED MESSAGE FROM INBOX (2ndRun ALREADY WORKED)' WHERE lower(EMAIL_MSGID) = lower('{oMessageID}')"
|
||||
_DB_MSSQL.Execute_non_Query(oUpd)
|
||||
Catch ex As Exception
|
||||
Logger.Warn($"Error deleting/Commentign message due to to already worked: {ex.Message}")
|
||||
Logger.Warn($"Error deleting/Commenting message due to to already worked: {ex.Message}")
|
||||
End Try
|
||||
|
||||
End If
|
||||
oClient.Store(oEnvelopes(oCounterEnvelope).UniqueID, "+FLAGS", "SEEN")
|
||||
|
||||
If MoveMailTo <> String.Empty Then
|
||||
Try
|
||||
oClient.AddMessage(MoveMailTo, oMimeMessage)
|
||||
@@ -239,6 +243,10 @@ Public Class clsEmailIMAP
|
||||
Logger.Warn($"Isoft: Could not move message to folder [{MoveMailTo}] - Error: {ex.Message}")
|
||||
End Try
|
||||
End If
|
||||
If oMessageCountRegular = 250 Then
|
||||
Logger.Warn($"Worked 100 Mails exiting oCounterEmailInPostbox!")
|
||||
Exit For
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
@@ -14,7 +14,7 @@ Public Class clsWorker
|
||||
Private _wrapper As clsEncryption
|
||||
Private _POLL_PROFILEID As Integer = 0
|
||||
Dim cs As String
|
||||
Sub New(LogConf As LogConfig, ConStr As String, POLL_PROFILEID As Integer, FB_DATASOURCE As String, FB_DATABASE As String, FB_USER As String, FB_PW As String, USE_WM As Boolean, Optional localeml As String = "")
|
||||
Sub New(LogConf As LogConfig, ConStr As String, POLL_PROFILEID As Integer, FB_DATASOURCE As String, FB_DATABASE As String, FB_USER As String, FB_PW As String, USE_WM As Boolean, Optional plocaleml As String = "")
|
||||
Logger = LogConf.GetLogger
|
||||
_email = New clsEmail(LogConf)
|
||||
_emailIMAP = New clsEmailIMAP(LogConf, ConStr)
|
||||
@@ -29,7 +29,7 @@ Public Class clsWorker
|
||||
_workmail = New clsWorkEmail(LogConf, ConStr, FB_DATASOURCE, FB_DATABASE, FB_USER, FB_PW, USE_WM)
|
||||
_wrapper = New clsEncryption("!35452didalog=", LogConf)
|
||||
_POLL_PROFILEID = POLL_PROFILEID
|
||||
ClassCurrent.CURRENT_DEBUG_LOCAL_EMAIL = localeml
|
||||
ClassCurrent.CURRENT_DEBUG_LOCAL_EMAIL = plocaleml
|
||||
End Sub
|
||||
|
||||
Public Sub Debug_Local_Email()
|
||||
|
||||
@@ -0,0 +1,7 @@
|
||||
' <autogenerated/>
|
||||
Option Strict Off
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
Imports System.Reflection
|
||||
<Assembly: Global.System.Runtime.Versioning.TargetFrameworkAttribute(".NETFramework,Version=v4.6.1", FrameworkDisplayName:=".NET Framework 4.6.1")>
|
||||
Binary file not shown.
Binary file not shown.
@@ -0,0 +1 @@
|
||||
5c442f91a6238bfda874aa2a69de6ef1e62a37ae
|
||||
@@ -22,6 +22,7 @@ E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\bin
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\bin\Debug\S22.Imap.xml
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\obj\Debug\DigitalData.EMLProfiler.Resources.resources
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\obj\Debug\DigitalData.EMLProfiler.vbproj.GenerateResource.cache
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\obj\Debug\DigitalData.EMLProfiler.vbproj.CoreCompileInputs.cache
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\obj\Debug\DigitalData.EMLProfiler.vbproj.CopyComplete
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\obj\Debug\DigitalData.EMLProfiler.dll
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\DigitalData.EMLProfiler\obj\Debug\DigitalData.EMLProfiler.xml
|
||||
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -133,7 +133,7 @@ DigitalData.Modules.Logging
|
||||
Clears the internal log
|
||||
</summary>
|
||||
</member>
|
||||
<member name="M:DigitalData.Modules.Logging.LogConfig.GetClassFullName">
|
||||
<member name="M:DigitalData.Modules.Logging.LogConfig.GetClassFullName(System.Boolean)">
|
||||
<summary>
|
||||
Gets the fully qualified name of the class invoking the calling method,
|
||||
including the namespace but Not the assembly.
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -0,0 +1,7 @@
|
||||
' <autogenerated/>
|
||||
Option Strict Off
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
Imports System.Reflection
|
||||
<Assembly: Global.System.Runtime.Versioning.TargetFrameworkAttribute(".NETFramework,Version=v4.6.1", FrameworkDisplayName:=".NET Framework 4.6.1")>
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -1 +1 @@
|
||||
194f0e0b9909d26a065a24a0efa14204b59b0794
|
||||
42de2b8f54b73569520f05720ef3d431bcc3629b
|
||||
|
||||
@@ -45,3 +45,5 @@ E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\SERV_EMAIL\obj\Debug\SERV_E
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\SERV_EMAIL\obj\Debug\SERV_EMAIL.exe
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\SERV_EMAIL\obj\Debug\SERV_EMAIL.xml
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\SERV_EMAIL\obj\Debug\SERV_EMAIL.pdb
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\SERV_EMAIL\obj\Debug\SERV_EMAIL.vbprojAssemblyReference.cache
|
||||
E:\SchreiberM\Visual Studio\GIT\DD_EmailProfiler\App\SERV_EMAIL\obj\Debug\SERV_EMAIL.vbproj.CoreCompileInputs.cache
|
||||
|
||||
Binary file not shown.
Binary file not shown.
Reference in New Issue
Block a user