Outlook Express 6

Hi!

Can anyone help me with this. I have Outlook Express 6 on the machine that
default from Windows XP and try to send mail as shown below. I think I
must check the Project References but can not find out the name to get this
to work. Can anyone help me? As it is now then stops at the first Set-line.

Ole T.

Dim oOApp As Outlook.Application
Dim oOMail As Outlook.MailItem

Set oOApp = CreateObject("Outlook.Application")
Set oOMail = oOApp.CreateItem(olMailItem)

With oOMail
..To = "ole-t.s@online.no"
..Subject = "email subject"
..Body = "email message"
..Send
End With

This newsgroup is for support of Outlook 97, 98, 2000, 2002, 2003 & 2007
from the Office family for Intel PCs. For Outlook Express (OE) support you
can try starting here:
http://support.microsoft.com/ph/2578

Another good source of Outlook Express info can be found here:
http://insideoe.tomsterdam.com/

The references you're using are for Outlook not OE. Not sure if OE has an
object model but you can check the reference above.

"Ole Thomas Sløgedal" <ole-t.s RemoveThis @online.no> wrote in message
news:F8Cdnfx1j9EyfSjX4p2dnAA@telenor.com...
> Hi!
>
> Can anyone help me with this. I have Outlook Express 6 on the machine that
> default from Windows XP and try to send mail as shown below. I think I
> must check the Project References but can not find out the name to get
> this
> to work. Can anyone help me? As it is now then stops at the first
> Set-line.
>
> Ole T.
>
> Dim oOApp As Outlook.Application
> Dim oOMail As Outlook.MailItem
>
> Set oOApp = CreateObject("Outlook.Application")
> Set oOMail = oOApp.CreateItem(olMailItem)
>
> With oOMail
> .To = "ole-t.s@online.no"
> .Subject = "email subject"
> .Body = "email message"
> .Send
> End With
>
>