Hello All,
I have the following code:
Set miMail = appOL.CreateItem(olMailItem) With miMail .To = rst![EMail] .Subject = "WPOA Annual Dues Statement: " & rst![OwnerLName] .Body = zMsgBody & "Bill" & Trim(Str(rst![OwnerID])) & _ " Owner: " & rst![OwnerLName] .ReadReceiptRequested = True zAttFN = zBillPath & "Bill" & _ Trim(Str(rst![OwnerID])) & ".pdf" Set oMyAtt = miMail.Attachments.Add(zAttFN) .Save End With 'miMail Set miMail = Nothing
That is working just fine. I would like to add to it to create the email with an existing Stationary. I’ve searched but can’t find a property or method to handle this. Any Ideas?