This commit is contained in:
Jonathan Jenne
2023-09-20 14:07:20 +02:00
12 changed files with 119 additions and 16 deletions

View File

@@ -35,17 +35,23 @@ Public Class EnvelopeEditorController
For Each receiverItem As EnvelopeReceiver In Envelope.Receivers
' TODO Email-Template füllen
Dim oEmailBody As String = String.Empty
Dim oEmailData As EmailData = New EmailData With
{
.EmailAdress = receiverItem.Email,
.EmailSubject = Envelope.Subject,
.EmailBody = oEmailBody,
.ReferenceID = Envelope.Id
.Message = Envelope.Message,
.ReferenceID = Envelope.Id,
.ReceiverName = receiverItem.Name,
.SenderAdress = Envelope.User.Email,
.SenderName = Envelope.User.FullName,
.SignatureLink = Helpers.GetEnvelopeURL(State.DbConfig.SignatureHost, Envelope.Uuid, receiverItem.Signature)
}
' TODO Email-Template füllen
Dim oTemplate As EmailTemplate = New EmailTemplate(State)
oTemplate.SetEmailBody(oEmailData)
If EmailModel.Insert(oEmailData) = False Then
Logger.Error("EMail data could not be inserted.")
oResult = False