🚀 go-pugleaf

"Francesco" <.> wrote in message news:43b3c0ba@newsgroups.borland.com...

> I cleared Indy installation and reinstalled. I created a new
> application and generated data files as you told me, unfortunately
> same result as before. :-(

After much review, it appears that Indy 9 is not capable of sending the type
of message you are attempting unless you have *2* TIdText parts in the
MessageParts collection.  So add a TIdText of type 'text/plain' before the
HTML.  For example:

    MailMessage->From->Address = "iffbva@tin.it";
    MailMessage->From->Name = "iffbva@tin.it";
    MailMessage->Recipients->EMailAddresses = "iffbva@tin.it";

    // ADD THIS !!!
    TIdText *PlainText = new TIdText(MailMessage->MessageParts, NULL);
    PlainText->Body->Text = "This message contains HTML and images.";
    PlainText->ContentType = "text/plain";

    TIdText *HTML = new TIdText(MailMessage->MessageParts, NULL);
    HTML->Body->LoadFromFile(WPath+"\\email.htm");
    HTML->ContentType = "text/html";

    TIdAttachment *IImagePart = new TIdAttachment(MailMessage->MessageParts,
WPath+"\\content.gif");
    IImagePart->ContentID = "content.gif";
    IImagePart->ContentType = "image/gif";
    IImagePart->FileName = "content.gif";

    TIdAttachment *IImagePart2 = new
TIdAttachment(MailMessage->MessageParts, WPath+"\\down.gif");
    IImagePart2->ContentID = "down.gif";
    IImagePart2->ContentType = "image/gif";
    IImagePart2->FileName = "down.gif";

    TIdAttachment *IImagePart3 = new
TIdAttachment(MailMessage->MessageParts, WPath+"\\topaug.gif");
    IImagePart3->ContentID = "topaug.gif";
    IImagePart3->ContentType = "image/gif";
    IImagePart3->FileName = "topaug.gif";

    SMTP->Connect(1000);
    try {
        SMTP->Send(MailMessage);
    }
    __finally {
        SMTP->Disconnect();
    }


Gambit