Access Generated Outlook Signature

[abbaddon223]

Hi,

I'm using the below proceedures to create and email loop from access into ms outlook. I'm desperately trying to get outlook to load my default signature (which contains graphics in the signature) when access opens the event. No matter what I do, all it does is pull through the body text in access but doesn't put the signature in that outlook does if a created a new one through outlook!! Any help appreciated. Thanks in advance...

Do
If IsNull(Me.URN) Then
MsgBox "Email Completed", vbInformation, "User Update"
Exit Sub
End If
Dim olk As Outlook.Application
Set olk = CreateObject("Outlook.application")
Dim olkmsg As Outlook.MailItem
Set olkmsg = olk.CreateItem(olMailItem)
With olkmsg
Dim olkrecip As Outlook.Recipient
On Error Resume Next
Set olkrecip = .Recipients.Add(Me![EmailAddress])
olkrecip.Type = olTo
.Subject = (Me![SubjectLine])
.Body = (Me![BodyText])
On Error Resume Next
.Display
.Send
End With
On Error Resume Next
Set olk = Nothing
Set olkmsg = Nothing
Set olkrecip = Nothing
DoCmd.GoToRecord acDataForm, "Frm_EmailOut", acNext
Loop
End Sub

 

[darbid]

If you only have one standard email signature then use outlook to make this and then turn on in outlook that all emails have this signature. This works for 2003 and am sure it would also work for 2007 or 2010.

 

[abbaddon223]

Hi mate,

I've tried that and it doesn't work I'm afraid

 

[darbid]

Hi mate,

I've tried that and it doesn't work I'm afraid

Sorry about that, but I am not in the habit of guessing things. You are going to have to help me to help you. And my intention is also that you learn from that help.

What did not work? Which version of Office? How did you test it? What kind of signature?

Imagine I am an idiot and know only how to turn on the computer and start outlook. Then what did you do. And what would you like it to do.