Chatelain
02-05-2002, 09:55 AM
Is there a way to include the autosignature that is setup in Outlook to be included on the message created by the following code (without having to include the html code for the autosignature within the vba code)?
Public Function Emailer(ccode, coname, emailto, bodyinfo)
Dim objOutlook As Object
Dim objMailMessage As Outlook.MailItem
Set objOutlook = CreateObject("Outlook.Application")
Set objMailMessage = objOutlook.CreateItem(0) ' 0 = MailItem.
With objMailMessage
.To = emailto 'Email address of recipient
.Subject = ccode & " - " & coname
.HTMLBody = bodyinfo
.Send
End With
Thanks for your help!
Public Function Emailer(ccode, coname, emailto, bodyinfo)
Dim objOutlook As Object
Dim objMailMessage As Outlook.MailItem
Set objOutlook = CreateObject("Outlook.Application")
Set objMailMessage = objOutlook.CreateItem(0) ' 0 = MailItem.
With objMailMessage
.To = emailto 'Email address of recipient
.Subject = ccode & " - " & coname
.HTMLBody = bodyinfo
.Send
End With
Thanks for your help!