Launch Outlook Express instead of Outlook

[Gwena]

Hi Guys,
I'm Trying to send an email with outlook express and for some reason the ms_outlook is launched instead, although outlook express is set as the default e-mail program.
Maybe there is something wrong with my code?

Dim oo As New Outlook.Application
Dim ooi As Outlook.MailItem
Set ooi = oo.CreateItem(olMailItem)
ooi.Attachments.Add (strDocPath)
ooi.Display

Any suggestion?

 

[strongm]

Any idea? Yes. Your code is directly automating Outlook. The default email program setting isn't even a factor here.