AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Messaging: Add Get_MessageDate

Browse Source
This commit is contained in:
Jonathan Jenne 2022-02-01 16:30:47 +01:00
parent 9ff72caaf4
commit 575bae14f5
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
Modules.Messaging/Email2.vb
View File

@ -353,6 +353,17 @@ Public Class Email2
Next Next
End Sub End Sub
Public Function Get_MessageDate(Mail As IMail) As Date
Try
Dim oDate = Mail.Date
Return oDate
Catch ex As Exception
Logger.Warn("Could not get Date from Mail [{0}]", Mail.MessageID)
Logger.Error(ex)
Return Date.MinValue
End Try
End Function
Public Function Get_MessageSender(Mail As IMail) As String Public Function Get_MessageSender(Mail As IMail) As String
Try Try
Dim oAddress = Mail.From.First() Dim oAddress = Mail.From.First()