View Single Post
  #2   Report Post  
Posted to microsoft.public.word.mailmerge.fields
Peter Jamieson Peter Jamieson is offline
external usenet poster
 
Posts: 4,582
Default How do I get read & delivery receipts for an Email merge?

If you started with an "email document", I do not think Word will honour
any of the e-mail related settings in that document - it probably only
looks at the ones you set in the dialog that starts the merge to email.

So...

One way you could approach this (I haven't tested the code here):

Set all the read/delivery receipts in Outlook, e.g.
a. before the merge, ensure your Outlook Outbox is empty, then stop
Outlook from sending. Leave Outlook open
b. do the merge
c. run the following macro. It should work from both Outlook and Word,
but in Word you will need to ensure that there is a reference to the
Microsoft Office xx.0 Outlook Library (with the VBA macro open in the
VBE Editor, use Tools|References to check the appropriate version of the
library).

Sub MarkAllInOutbox()

Dim objOutlook As Outlook.Application
Dim objNameSpace As Outlook.NameSpace
Dim objFolder As Outlook.Folder
Dim objMailItem As Outlook.MailItem
Set objOutlook = GetObject(, "Outlook.Application")
Set objNameSpace = objOutlook.GetNamespace("MAPI")
Set objFolder = objNameSpace.GetDefaultFolder(olFolderOutbox)
For Each objMailItem In objFolder.Items
objMailItem.ReadReceiptRequested = True
objMailItem.OriginatorDeliveryReportRequested = True
objMailItem.Save
objMailItem.Send
Next
Set objFolder = Nothing
Set objNameSpace = Nothing
Set objOutlook = Nothing
End Sub

d. Start Outlook sending again.

There is another possible approach that does one merge for each email,
but it would be handy to know whether you are sending as plain text,
HTML or attachment - and it may have problems with Outlook security prompts.


Peter Jamieson

http://tips.pjmsn.me.uk

Sooz wrote:
I have created a Word (2003) document and sent it via Outlook (2003) using
the mail merge function. The emails were sent successfully as far as I know,
however, to be sure they were sent and read, I checked the boxes for read and
delivery receipt in the Tools/Option within my email document . I did not
receive any delivery or read receipts. Is there something else I should do?