Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Html email
Message
From
16/01/2001 11:11:08
 
 
To
15/01/2001 23:12:40
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Miscellaneous
Thread ID:
00464060
Message ID:
00464209
Views:
17
>From Vfp I would like to send html email, is it possible and how does one do it?
>I have tried CreateObject("Outlook.Application") but this will not convert the html.
>With CreateObject("CDONTS.NewMail"), I receive an error on the send (not registered). I installed CDO 1.2 from outlook 2000 and also manually registered cdo.dll.

Hello, Anthony.

You have to put your text in the HTMLBody property, not in Body.

Here is a little example. It's not checked at the command window, just cut and pasted from a couple of methods from a form.
loApplication = CreateObject( "Outlook.Application" )

llActive = ( varType( loApplication ) = "O" )

if llActive

   loMapiSpace = loApplication.GetNameSpace( "MAPI" )

   loInbox = loMapiSpace.GetDefaultFolder( 6 )

   loNew = loInbox.Items.Add()

   loNew.Recipients.Add( tcAddress )
   loNew.Subject = tcSubject
   loNew.HTMLBody = tcHTMLBody
   loNew.Send()
endif
Hope this helps,
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform