L
Luk
can anyone post me a sample code, how to use the Outlook Redemption CC
& BCC ?
when i try .cc ="(e-mail address removed)" or .bcc = "(e-mail address removed)" 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
..Recipients.Add("(e-mail address removed)")
..Cc = "(e-mail address removed)" <- JUST READONLY ???
..Bcc = "(e-mail address removed)" <- JUST READONLY ???
..Subject = "subject"
..Body = "something"
..Send()
End safMail
End Sub
End Class
can anyone help me?
tanks in advance!
& BCC ?
when i try .cc ="(e-mail address removed)" or .bcc = "(e-mail address removed)" 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
..Recipients.Add("(e-mail address removed)")
..Cc = "(e-mail address removed)" <- JUST READONLY ???
..Bcc = "(e-mail address removed)" <- JUST READONLY ???
..Subject = "subject"
..Body = "something"
..Send()
End safMail
End Sub
End Class
can anyone help me?
tanks in advance!