65 lines
2.3 KiB
VB.net
65 lines
2.3 KiB
VB.net
|
|
Public Class EmailData
|
|
Public Property EmailAdress As String = ""
|
|
Public Property EmailSubject As String = ""
|
|
Public Property EmailBody As String = ""
|
|
Public Property EmailType As Constants.EnvelopeStatus = Constants.EnvelopeStatus.Invalid
|
|
Public Property ReferenceID As Integer = 0
|
|
Public Property ReferenceString As String = ""
|
|
|
|
Public Property ReceiverAccessCode As String = ""
|
|
Public Property ReceiverName As String = ""
|
|
Public Property SenderName As String = ""
|
|
Public Property SenderAdress As String = ""
|
|
|
|
Public Property SignatureLink As String = ""
|
|
Public Property Message As String = ""
|
|
Public Property EnvelopeTitle As String = ""
|
|
|
|
Public Property EmailAttachment As String = ""
|
|
Public Property ATT1_RELATED_ID As Long
|
|
Public Property ATT1_REL_TYPE As String = ""
|
|
|
|
''' <summary>
|
|
''' Constructor for sending email to receiver
|
|
''' </summary>
|
|
''' <param name="pEnvelope"></param>
|
|
''' <param name="pReceiver"></param>
|
|
''' <param name="pStatus"></param>
|
|
Public Sub New(pEnvelope As Envelope, pReceiver As EnvelopeReceiver, pStatus As Constants.EnvelopeStatus)
|
|
EmailAdress = pReceiver.Email
|
|
EmailSubject = String.Empty
|
|
EmailType = pStatus
|
|
|
|
Message = pEnvelope.Message
|
|
ReferenceID = pEnvelope.Id
|
|
ReferenceString = pEnvelope.Uuid
|
|
ReceiverName = pReceiver.Name
|
|
ReceiverAccessCode = pReceiver.AccessCode
|
|
SenderAdress = pEnvelope.User.Email
|
|
SenderName = pEnvelope.User.FullName
|
|
EnvelopeTitle = pEnvelope.Title
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Constructor for sending email to creator
|
|
''' </summary>
|
|
''' <param name="pEnvelope"></param>
|
|
''' <param name="pStatus"></param>
|
|
Public Sub New(pEnvelope As Envelope, pStatus As Constants.EnvelopeStatus)
|
|
EmailAdress = pEnvelope.User.Email
|
|
EmailSubject = String.Empty
|
|
EmailType = pStatus
|
|
|
|
Message = pEnvelope.Message
|
|
ReferenceID = pEnvelope.Id
|
|
ReferenceString = pEnvelope.Uuid
|
|
ReceiverName = pEnvelope.User.FullName
|
|
ReceiverAccessCode = String.Empty
|
|
SenderAdress = pEnvelope.User.Email
|
|
SenderName = pEnvelope.User.FullName
|
|
EnvelopeTitle = pEnvelope.Title
|
|
End Sub
|
|
|
|
End Class
|