Mail template : add sender in enterCopyto (CoreEmailclasses)

Hello All,

I’m customizing the mail template for our internal use;

By default, all emails should include no bcc and a copyto a given address.

I tried to add this address to the “EnterCopyTo” field by adding a function called just the “Call Me.m_noteUIMemo.Send()” in the QuerySave of the CoreEmailClasses Declaration.

The function is :

Sub AddCopyTo()

Dim copyt As Variant

If Me.m_noteMemo.Hasitem(“EnterBlindCopyTo”) Then

Call Me.m_noteMemo.Replaceitemvalue"EnterBlindCopyTo",“”)End If

copyt = Me.m_noteMemo.GetItemValue(“EnterCopyTo”)

Redim Preserve copyt(Ubound(copyt)-Lbound(copyt)+1)

copyt(Ubound(copyt))= “emailtocopyto”

Call Me.m_noteMemo.Replaceitemvalue(“EnterCopyTo”,copyt)End Sub

I noticed in the querysend event of the memo that the entercopyto is empty.

Could you help please ?

thanks in advance

Subject: Mail template : add sender in enterCopyto (CoreEmailclasses)

Hello,I’m trying something similar - in fact I want to add an address to the bcc field (this should happen in the background depending on some conditions)

The QuerySend event should be the right place but I’m unable to modify the bcc value.

I have seen in the forum that some were able to achieve but nobody posted the LotusScript code.

Any hints?

Reinhold