Insert Signature

J

J

When I append to the body, it reformats my signature. How can I keep the
format of my signature and still append new text to the body??

Thanks!
 
J

J

Hi Michael -

Here's my code. I'm running this from within Access. With the below code,
it doesn't add "Test reminder" to the message, but the signature stays.

Dim objOutlook As Outlook.Application
Dim objMail As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient

Set db = CurrentDb()

Set objOutlook = New Outlook.Application
Set objMail = objOutlook.CreateItem(olMailItem)

With objMail
' Add the To recipient(s) to the message.
Set objOutlookRecip = .Recipients.Add("[email protected]")
objOutlookRecip.Type = olTo
.Display
.Subject = "Weekly Email"
.HTMLBody = "Test reminder." & vbCrLf & vbCrLf & .HTMLBody

End With

Also, how do I actually send the message after I get the formatting fixed??

Thanks,
J
 
M

Michael Bauer [MVP - Outlook]

You should try the HTML format, whcih e.g. doesn't know a vbCRLF but uses
<p></p> or <br> tags.

To send the message simply call its Send method. As you do this from within
Access it'll cause the security diaog to pop up. To avoid that you might use
the Redemption (www.dimastr.com) - or send from within Outlook itself.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Organize eMails:
<http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>

Am Mon, 2 Jul 2007 07:32:02 -0700 schrieb J:
 
Top