asked on

Display the default signature in a new Outlook mail message

I have a VB6 program that generates an Outlook email, the problem is it does not contain the user's signature? Any ideas how to ensure that it is part of the email

Dirk Haest

The GetInspector is what adds the default signature

http://www.dreamincode.net/forums/topic/31537-use-of-default-signature-from-outlook-olmail/

Dim oOutlook As Outlook.Application  
02 Dim olMail As Outlook.MailItem  
03 Dim oAddSig As Outlook.Inspector  
04    
05 Set oOutlook = CreateObject("Outlook.Application")  
06 Set olMail = olApp.CreateItem(olMailItem)  
07    
08 Set oOutlook = olMail.GetInspector  
09    
10 With olMail  
11       Call .Recipients.Add("h***@there.com")  
12       .Subject = "Blah blah blah" 
13       .Body = "Email test message 1" 
14       Call .Send  
15 End With  
16 Set oOutlook = Nothing

Open in new window

ASKER CERTIFIED SOLUTION

Chris Bottomley

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

rocky050371

ASKER

The GetInspector method does not add the signature

Chris Bottomley

It will certainly work by importing it after the fashion of the supplied link then.

Chris

rocky050371

ASKER

I implemented Ron's code, the problem I have is that the images are missing,

Chris Bottomley

I honestly cannot recall if I ever tried it with graphics so are you using the HTML file import ... and is the email HTML, for example?

Chris

rocky050371

ASKER

Yes I set the objMail.HTMLBody but it leaves out the images

Chris Bottomley

I need to try and play with this ... so I may be a while - and perhaps someone knowing more will be able answer soon.

Chris

rocky050371

ASKER

Hi Chris,

I managed to open the signature replace the image path with the full path and it worked fine. Thanks for you help

Chris Bottomley

Ah

I would never have seen that as your problem as I was using a direct path already ... well done.

Chris