View Single Post
  #2  
Old November 8th 06, 06:09 PM posted to microsoft.public.outlook.program_vba
Ken Slovak - [MVP - Outlook]
external usenet poster
 
Posts: 5,848
Default How to set CC @ Outlook Redemption

Dim safRecip As Redemption.SafeRecipient

With safMail
safRecip = ")
safRecip.Type = olBCC 'or olCC, as desired
safRecip.Resolve

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


"Luk" wrote in message
oups.com...
can anyone post me a sample code, how to use the Outlook Redemption CC
& BCC ?
when i try .cc " or .bcc = " then i get an error
"read only"


The Code is:

Imports Microsoft.Office.Interop.Outlook
Imports Redemption

Class Form1
Dim outApp As Microsoft.Office.Interop.Outlook.Application
Dim outMail As Microsoft.Office.Interop.Outlook.MailItem
Dim safMail As SafeMailItem

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

outApp = New Microsoft.Office.Interop.Outlook.Application
outMail = outApp.CreateItem(OlItemType.olMailItem)
safMail = New SafeMailItem
safMail.Item = outMail

With safMail
")
.Cc = " - JUST READONLY ???
.Bcc = " - JUST READONLY ???
.Subject = "subject"
.Body = "something"
.Send()
End safMail

End Sub
End Class

can anyone help me?

tanks in advance!


Ads