Hi

I am using redemption to forward emails.

When I do not display the item, it will send without the body(message). But
if I display the item first, then close it and send, everything is sent
including the message.

Is there a way around this. It would be nice if there were no window opening
and closing when the code is running.

Many thanks in advance
Richard

Part of code:

Set myFolder = myNameSpace.GetDefaultFolder(olFolderDrafts)
Set myItem = myFolder.Items
Set Utils = CreateObject("Redemption.MAPIUtils")

qryResults.MoveFirst

Do Until qryResults.EOF

If a Count Then

Set myTempItem = CreateObject("Redemption.SafeMailItem")
Set FWDItem = myItem.Item(1).Forward

FWDItem.to = qryResults!EMAIL
FWDItem.Display 'if I don't display, the message is sent
without message.
FWDItem.Close olSave
DoEvents
FWDItem.DeleteAfterSubmit = True

myTempItem.Item = FWDItem
myTempItem.Send