Added recipient does not receive mail - Outlook 2003

[Sharad Naik]

Hello,

I made a simple macro to add recipient in Bcc field, as under:
This was working perfect with Outlook 2000. But the same code
is no more working with Outlook 2003.

The code is as under:-

If InStr(1, ActiveInspector.CurrentItem.BCC, "(e-mail address removed)",
vbTextCompare) > 0 Then
Exit Sub
Else
j = MsgBox("'Bcc:' field does not contain 'All PVIN'!! Add 'All PVIN'
to Bcc Field?", vbYesNoCancel, "PV IN Mail Security & AntiSpam Programs:")
If j = vbYes Then
Set l = ActiveInspector.CurrentItem.Recipients.Add("All PVIN
([email protected])")
l.Type = olBCC
End If
If j = vbNo Then
Exit Sub
End If
If j = vbCancel Then
Cancel = True
End If
End If

The code does add the recipient in the Bcc field. When I check the msg in
outbox or in Sent Items,
it shows the recipient was added in the Bcc field. However the recipient
address is not hyperlinked in the
Bcc field, like it is for the manually added recipients.

Any suggestions would be greatly appreciated.

Sharad

 

[Michael Bauer]

Hi Sharad,

Set l = ActiveInspector.CurrentItem.Recipients.Add("All PVIN
([email protected])")

I know this syntax:

.... .add("<name> (e-mail address removed)")

After adding a recipient you can check if it can be resolved.

 

[Sharad Naik]

Thanks Michael, but even that did not solve the problem.

But I could solve the problem finally. I found .Resolove method in the help,
and after 'l.Type = olBCC' line in my code I just added, 'l.resolve' and
now it works perfectly.

Sharad

 

[Michael Bauer]

and after 'l.Type = olBCC' line in my code I just added, 'l.resolve'
and

now it works perfectly.

That was my intention