Newsgroups : Borland : borland.public.delphi.internet.winsock : 2007 Mar : Re: HTML and indy 9
| Subject: | Re: HTML and indy 9 |
| Posted by: | "AORANGI" (aorang..@wanadoo.fr) |
| Date: | Thu, 22 Mar 2007 20:37:23 |
Ok D7 Indy 9....
That is what I do
What I want to do is
To get an HTML Letters with my heading(image) direct on the email
application windows.
In the exemple they talk about a contentID. Well D7 tell me Unknow when I
put it like
in the exemple in{A} ContendID:='TeteLettre.jpg';
Now with that code I get the heading (TiAttachment in the Email
windows but I cannot get the message in Tidtext
With TIdtext.Create(idMessage1.MessageParts,nil) do
begin
ContendID:='TeteLettre.jpg';
Body.Text:= '<HTML><HEAD><META NAME="GENERATOR" CONTENT="Adobe PageMill 3.0
Win">'+
'<TITLE>Document sans titre</TITLE></HEAD><BODY BGCOLOR="#ffffff">'+
'<!--SELECTION--><IMG SRC="cid:/TeteLettre.jpg" WIDTH="709" HEIGHT="116"'+
'ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="0"><P> </P>'+
'<P><B>Approvisionnement en fournitures et livres scolaires pour'+
'la rentrée scolaire 2007/2008</B></P></BODY></HTML>';
ContentType:='Text/Html';
end;
With TIdAttachment.Create(IdMessage1.MessageParts,
'c:\MailingApplication\TexteMessage\TeteLettre.jpg') do
Begin
ContentType:='Image/jpeg';
FileName:='TeteLettre.jpg';
end;
I miss something somewhere. On my form I have the component idMessage1
I you don't undestand ask again because I am not the best to explain.
regards
Claude
"Claude" <livreplus@magic.fr> a écrit dans le message de news:
4602b2b4@newsgroups.borland.com...
> Hi
> I try to use the exemple one the nevrona page about html with indy to send
> a html page which display as such in a email.
>
> It just doesn'want to work. Content ID Unknow
> For the body text I put the HTML Text in text!
> I got the html text code source on the email but no pages
>
> With TIdtext.Create(idMessage1.MessageParts,nil) do
> begin
> Body.Text:=F_Coordonnees.ADODataSet2.FieldByName('MEMOTEXTE').AsString;//
> HTML TEXTE in a mamo field in a database
> ContentType:='Text/Html';
> end;
>
> what do I do wrong?
> regards
> claude