HTML email with Attachment

Hi,

How to send an html email with attachment.?

I tried like this below . But the attachment is missing and some chars
appear in the email body.


IdMessage1.ContentType := 'text/html';

   with TIdAttachment.Create(IdMessage1.MessageParts, 'c:\folder\file.ext')
do
    begin
        ContentType := ' multipart/mixed';
        FileName := 'file.ext';
        // fill in other properties as needed...
   end;


Also i have an error "Undeclated Identifier" while using
GetMIMETypeFromFile(). I am using D5.

Please Help
Heney