Add hidden recipient to each mail

  • Thread starter Thread starter Michele TheGuru
  • Start date Start date
M

Michele TheGuru

Hi,
I use Outlook 2000 and I want add a recipient (CCN) when a
mail is sending.
I wanna have a copy of each mail sent by the PC and I
don't want that the users see it. Is possible?
I use this code but it doesn't work... Why?

Private Sub Application_ItemSend(ByVal Item As Object,
Cancel As Boolean)
Dim NewRec As Recipient
Set NewRec = Item.Recipients.Add("(e-mail address removed)")
NewRec.Type = OlMailRecipientType.olBCC
End Sub

Bye Bye and Sorry for my terrible english.

Michele
 
This is the correct statement you need to set the Type:

NewRec.Type = olBCC
 
Back
Top