diff --git a/DDEmailService/EmailService.vb b/DDEmailService/EmailService.vb index 9475dcac..594ffad7 100644 --- a/DDEmailService/EmailService.vb +++ b/DDEmailService/EmailService.vb @@ -137,14 +137,17 @@ Public Class EmailService Private Sub EmailQueue_DoWork(sender As Object, e As DoWorkEventArgs) Try If _Firebird?._DBInitialized Then + _Logger.Info("Starting Firebird Sending") SendEmailFrom(DatabaseType.Firebird, Nothing) End If If _MSSQL?.DBInitialized Then + _Logger.Info("Starting MSSQL Sending") SendEmailFrom(DatabaseType.MSSQL, _MSSQL) End If If _MSSQL_Test?.DBInitialized Then + _Logger.Info("Starting MSSQL Test Sending") SendEmailFrom(DatabaseType.MSSQL, _MSSQL_Test) End If Catch ex As Exception