[AccessD] OT: Default BCC

Stuart:

Well I cribbed this of the net:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMe As Recipient
    Set objMe = Item.Recipients.Add("bchacc at san.rr.com")
    objMe.Type = olBCC
    objMe.Resolve
    Set objMe = Nothing
End Sub

But don't have a clue how to implement it.

Looks like I'll be learning something new this week.

Rocky
 




 	
	

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan
Sent: Sunday, April 22, 2007 3:01 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] OT: Default BCC

On 22 Apr 2007 at 12:44, Rocky Smolin at Beach Access  wrote:

> Is there a way to default an email address into the BCC field in 
> Outlook when you create a new message?

Gues you'd have to create a VBA macro in Outlook and set the Item.BCC
property  in the Item_Send event


Of course if you use Pegasus Mail,  you can set it for each identity 
separately under the Sending Mail preferences :-)








-- 
Stuart


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

No virus found in this incoming message.
Checked by AVG Free Edition. 
Version: 7.5.463 / Virus Database: 269.5.6/770 - Release Date: 4/20/2007
6:43 PM