Fix LastName mapping and bug where forwarding was enabled without forwarding address in hMailServer5
This commit is contained in:
parent
7277dbf947
commit
a0fe5fdc21
1 changed files with 7 additions and 4 deletions
|
@ -377,7 +377,7 @@ Public Class hMailServer5
|
||||||
objAccount.Password = mailbox.Password
|
objAccount.Password = mailbox.Password
|
||||||
objAccount.MaxSize = mailbox.MaxMailboxSize
|
objAccount.MaxSize = mailbox.MaxMailboxSize
|
||||||
objAccount.PersonFirstName = mailbox.FirstName
|
objAccount.PersonFirstName = mailbox.FirstName
|
||||||
objAccount.PersonLastName = mailbox.FirstName
|
objAccount.PersonLastName = mailbox.LastName
|
||||||
objAccount.SignatureEnabled = mailbox.SignatureEnabled
|
objAccount.SignatureEnabled = mailbox.SignatureEnabled
|
||||||
objAccount.SignaturePlainText = mailbox.Signature
|
objAccount.SignaturePlainText = mailbox.Signature
|
||||||
objAccount.SignatureHTML = mailbox.SignatureHTML
|
objAccount.SignatureHTML = mailbox.SignatureHTML
|
||||||
|
@ -397,9 +397,12 @@ Public Class hMailServer5
|
||||||
|
|
||||||
'set forwarding address
|
'set forwarding address
|
||||||
If mailbox.ForwardingEnabled Then
|
If mailbox.ForwardingEnabled Then
|
||||||
objAccount.ForwardAddress = mailbox.ForwardingAddresses(0)
|
If Not String.IsNullOrEmpty(mailbox.ForwardingAddresses(0)) Then
|
||||||
objAccount.ForwardEnabled = True
|
'Log.WriteInfo("forwarding enabled on creation of email account")
|
||||||
objAccount.ForwardKeepOriginal = mailbox.RetainLocalCopy
|
objAccount.ForwardAddress = mailbox.ForwardingAddresses(0)
|
||||||
|
objAccount.ForwardEnabled = True
|
||||||
|
objAccount.ForwardKeepOriginal = mailbox.RetainLocalCopy
|
||||||
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
objAccount.Save()
|
objAccount.Save()
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue