check for missing mailsession

2023-10-11 15:35:04 +02:00
parent a64823ae5e
commit 7b01ef788a
1 changed files with 5 additions and 1 deletions
--- a/Messaging/Mail/MailSender.vb
+++ b/Messaging/Mail/MailSender.vb
@@ -9,7 +9,11 @@ Namespace Mail

        Public ReadOnly Property Connected2Server As Boolean
            Get
-                Return MailSession.Session.Connected
+                If MailSession IsNot Nothing AndAlso MailSession.Session IsNot Nothing Then
+                    Return MailSession.Session.Connected
+                Else
+                    Return False
+                End If
            End Get
        End Property