Redemption : Send message as a public folder

Joined
Sep 10, 2009
Messages
1
Reaction score
0
Hi,

The mail system is Exchange/Outlook.
I have a system of public folder to send external mails.
When I use redemption from Excel with the following code, the mail is sent from my mailbox:

Code:
Dim SafeItem, oItem
Set App = CreateObject("Outlook.Application")
Set SafeItem = CreateObject("Redemption.SafeMailItem")

Set oItem = App.CreateItem(0) 'Create a new message
SafeItem.Item = oItem 'set Item property	

SafeItem.To = "[email protected]"
SafeItem.Subject = "Subject"
SafeItem.HTMLBody = "test"
SafeItem.bodyformat = 1
SafeItem.SentOnBehalfOfName = "FRATEST"
SafeItem.send

As you can see the SentOnBehalfOfName is FRATEST (a public folder used to send external emails)
But the message is sent from my personnal mailbox instead of FRATEST. In the from field I can see FRATEST but I retreive the message in my "sent items"

I know that this system is not standard but do you have an idea on how I can proceed to send my mails from the public folder automatically ?

Thx in advance,
Best Regards.
 
Back
Top