Using Redemption and Excel: CCs, calendar items

[DFStoneJr]

Windows XP, Office 2003

I'm currently using variations of the following Excel VBA code to send
e-mails through Outlook from Excel via the Redemption add-in:

Sub SendSafeitem()
Set objOL = CreateObject("Outlook.Application")
Set Namespace = objOL.GetNamespace("MAPI")
Namespace.Logon
Set SafeItem = CreateObject("Redemption.SafeMailItem") 'Create an
instance ofRedemption.SafeMailItem
Set oItem = objOL.CreateItem(0) 'Create a new message oItem.Save
FiletoSend = Sourcedir & FiletoSend
SafeItem.Item = oItem 'set Item property
SafeItem.Recipients.Add Recipients
SafeItem.Subject = Subject
SafeItem.Body = Body
SafeItem.Send
Set objOL = Nothing
Set oItem = Nothing
End Sub

Is it possible, with or without Redemption, to:
1) add an attachment to the message,
2) add CC recipients rather than TO: recipients; and
3) add an item based on the message being sent to the Outlook calendar
(e.g., a task to follow-up on the item at a certain date and time)?

TIA.

 

[Alexander Gorlach]

Hi,

you can also try Outlook Security Manager:
http://www.add-in-express.com/outlook-security/

It is very simple component: you'll able to turn on/off all security in
Outlook by one call, and to use all "protected" methods of Outlook API
without warnings. Outlook API is single-thread, so using of this component
will not affect the global security.

Alexander Gorlach,
MAPILab Ltd.
http://www.mapilab.com/outlook/