I have an Access app that feeds a semi-automated e-mail. My problem is that I can touch the e-mail to get the signature to display using .display but as soon as I write the body, the signature is overwritten.
Here is trunacted code depicting problem:
Sub Test()
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
objOutlookMsg.To = "address"
objOutlookMsg.Subject = "Subj"
objOutlookMsg.Display
objOutlookMsg.Body = "body"
End Sub
When I step through the code writing .body cancels the default signature.
Does anyone know how to get around this?
Here is trunacted code depicting problem:
Sub Test()
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
objOutlookMsg.To = "address"
objOutlookMsg.Subject = "Subj"
objOutlookMsg.Display
objOutlookMsg.Body = "body"
End Sub
When I step through the code writing .body cancels the default signature.
Does anyone know how to get around this?