Error send message using htm with embebed images

Giganews Newsgroups
Subject: Error send message using htm with embebed images
Posted by:  Flavio (diasflav…@yahoo.com.br)
Date: Thu, 13 Oct 2005

I'm using delhi 7 and Indy 10.0.52.

I?m finding troubles to send a HTML message with an embedded image. i?m using the

TidSMTP component to do this. The conection is successed, but then i recieve an

error when tring to send the message:

Below is the source code:

---------------------------
Debugger Exception Notification
---------------------------
Project SendMail.exe raised exception class EIdSMTPReplyError with message

'unimplemented (#5.5.1)
'. Process stopped. Use Step or Run to continue.
---------------------------
OK  Help
---------------------------

Everyone can help me?
at below it follows the used code:

procedure CreateImagePart(AMessage: TIdMessage; APath, AFileName: String;

AParentPart : Integer);
begin
  with TIdAttachmentFile.Create(AMessage.MessageParts,
        APath + AFileName) do
  begin
    ContentType := GetMIMETypeFromFile(APath + AFileName);
    ContentID := '6HO5P6hid8HpjYjmFiBbJApLY4Isi_65yi';
    DisplayName := AFileName;
    ParentPart := AParentPart;
  end;
end;

procedure CreateHTMLPart (MyMessage : TIdMessage; AParentPart : Integer);
var arq : string;
  i : Integer;
  StrList : TStringList;
begin

  arq := ExtractFilePath( application.ExeName ) + 'temp.html';
  with TIdText.Create(MyMessage.MessageParts) do
  begin

    // set the first part of header content
    // Im using the component of Project JEDI to convert rtf in html

    frmEmail.JvRTFHtmlCabecalho.ConvertToHtml(frmEmail.rtfEdCabecalho, arq);
    StrList := TStringList.Create;
    StrList.LoadFromFile(arq);
    // set first part of header content
    frmEmail.JvRTFToHtmlConteudo.Header.AddStrings(StrList);
    // save the content to verify
    frmEmail.JvRTFToHtmlConteudo.Header.SaveToFile(ExtractFilePath( application.ExeName )
          + 'Header.txt');

    StrList.Clear;
    // the Editor is a RTF component
    frmEmail.JvRTFToHtmlConteudo.ConvertToHtml( frmEmail.Editor.Editor, arq );
    StrList.LoadFromFile(arq);
    i := 0;
    // remove the blank lines
    while i < strlist.Count  do
    begin
      if StrList[ i ]= '' then
        strlist.Delete( i );
      inc( i );
    end;    // while
    Body := StrList ;
    StrList.Free;
    ContentType := 'text/html';
    ParentPart := AParentPart;
  end;
end;

procedure CreateTextPart(AMessage: TIdMessage; AText: TStrings;
  AContentType: String; AParentPart: Integer);
begin
  With TIdText.Create(AMessage.MessageParts, AText) do
  begin
    ContentType := AContentType;
    ParentPart := AParentPart;
    if AText = nil then
      Body.Text := '';
  end;
end;

procedure Send;
var
  lMessage : TIdMessage;
const
  sourcePath: String = 'C:\';
begin
  lMessage := TIdMessage.Create(nil);
  try
    CreateHTMLPart( lMessage, -1 );
    CreateImagePart(lMessage, sourcePath, 'test.jpg', -1);
    lMessage.ContentType := 'multipart/related; type="text/html"';
    { set the configuration }
    with lMessage do
    begin
      From.Text := 'diasflav…@yahoo.com.br';
      ReplyTo.EMailAddresses := 'diasflav…@yahoo.com.br';
      Recipients.EMailAddresses := 'diasflaviod…@hotmail.com';
      Subject := 'Test'
      Priority := mpNormal;
      CCList.EMailAddresses := '';
      BccList.EMailAddresses := '';
    end;

    with frmEmail do
    begin // the configuations of TidSMTP
      IdSMTP.Host := 'smtp.yahoo.com.br';
      IdSMTP.Port := 25;
      IdSMTP.Username := 'My UserName';
      IdSMTP.Password := 'My Password';

      frmEmail.IdSMTP.AuthType := atDefault;
    end;
    try // adittional souurce  to open message in Outlook Express
      lMessage.ExtraHeaders.Add('X-Unsent: 1');
      lMessage.ExtraHeaders.Add('X-MimeOLE: Produced By indy 10');
      lMessage.SaveToFile( 'C:\test_mail.eml' );

      frmEmail.IdSMTP.Connect;
    try
      frmEmail.IdSMTP.SendMsg(lMessage);
    finally
      frmEmail.IdSMTP.Disconnect;
    end;
  finally
    FreeAndNil(lMessage);
  end;
end;

the html generated:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<table width="700" border="0">
  <tr>
    <td><img src="cid:6HO5P6hid8HpjYjmFiBbJApLY4Isi_65yi"></td>
    <td>
<FONT COLOR="#000000" SIZE="2" FACE="MS Sans Serif">
</FONT>
    </td>
  </tr>
</table>
<FONT COLOR="#000000" SIZE="2" FACE="MS Sans Serif">
<BR><P ALIGN="CENTER">Teste
</P>
</FONT>
  </BODY>
</HTML>

the message created:

// stat of message

From: "diasflav…@yahoo.com.br" <diasflav…@yahoo.com.br>
Subject: Teste
To: diasflaviod…@hotmail.com
Content-Type: multipart/related; type="text/html";

boundary="ZihHOYF=_F3JQE5g4IGmIZOVKNuIKa18tg"
MIME-Version: 1.0
Reply-To: diasflav…@yahoo.com.br
Date: Thu, 13 Oct 2005 09:13:34 -0300
X-Unsent: 1
X-MimeOLE: Produced By Indy 10

This is a multi-part message in MIME format

--ZihHOYF=_F3JQE5g4IGmIZOVKNuIKa18tg
Content-Type: text/html
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title></title>
<meta http-equiv=3D"Content-Type" content=3D"text/html; charset=3Diso-=
8859-1">
</head>
<body>
<table width=3D"700" border=3D"0">
  <tr>
    <td><img src=3D"cid:6HO5P6hid8HpjYjmFiBbJApLY4Isi_65yi"></td>
    <td>
<FONT COLOR=3D"#000000" SIZE=3D"2" FACE=3D"MS Sans Serif">

</FONT>
    </td>
  </tr>
</table>
<FONT COLOR=3D"#000000" SIZE=3D"2" FACE=3D"MS Sans Serif">
<BR><P ALIGN=3D"CENTER">Teste
</P>
</FONT>
  </BODY>
</HTML>

--ZihHOYF=_F3JQE5g4IGmIZOVKNuIKa18tg
Content-Type: image/pjpeg;
        name="teste.jpg"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
        filename="teste.jpg"
Content-ID: 6HO5P6hid8HpjYjmFiBbJApLY4Isi_65yi

/9j/4AAQSkZJRgABAQEASABIAAD/2wBDAAQDAwMDAwQDAwQFBAMEBQcFBAQFBwgGBgcGBggKCAgI
CAgICggKCgsKCggNDQ4ODQ0SEhISEhQUFBQUFBQUFBT/2wBDAQUFBQgHCA8KCg8SDwwPEhYVFRUV
FhYUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBT/wAARCACQAMADAREA
AhEBAxEB/8QAHAAAAQUBAQEAAAAAAAAAAAAABAECAwUGBwAI/8QARxAAAgEDAgQEBAQDBgMDDQAA
AQIDBAURABIGEyExFCJBUQcVMmFCcYGRI1KxFiQzYqHBQ4KScqLRCBclJjRzg5OkssLS4f/EABsB
AAMBAQEBAQAAAAAAAAAAAAECAwQABQYH/8QAMhEAAgIBAwMEAQIFBAMBAAAAAAECESEDEjEEQVET
ImFxgSMyFDORofAFQlLBYtHxsf/aAAwDAQACEQMRAD8Ai+TJ182Rr9BpHxTa3Mclk3Ham5mwThRk
4AyT+g76D+RlfIvydB+LRo7dYvyZP5tdRSL8CizL33Z0MAbF+TpjO/prjoyQ4WaP+f8AXOgNY4WW
P+fSnK+RfksZP1a6xk2L8kX+fQGXI4WaLH1Y/XQFTxkcLLH/ADa4Y8LKn82hZyHfJYu+789Cx3aw
e+TQ/wA2usU8LNF/NoNnC/JocfV20LC8kcltootommSLecJvYKM+2TgaWU1Hkah4s0Q/HprvIrVH
O6OzRXv4gXC4SdIrZKKKhkHbMagyhhnru36w1etZt1F6ems5Z0T5LFj6u2t1mCuxyC62KMcScbU1
UGlSotkTxg/RgyDo2fLgcvGffXgdXHbrNvuj29KlCLvwdNtHCNLb0qJlmlmnrJzPLPOfOwHki6dM
DYox016fQwS0k+7R5XWzcp1ikGzcPUtRFJBN54ZlZJF91YYI1sbwRTaYV4Bc/Uca1GFy95HLbgyi
WKaanq4DzKWrgbZNBLgjmRP1wwBP29DkanPTU1T4Ghq7OCessFRQ3SQNcqiZdke+ILFHC3MjVz5Q
m4dT6N/p01LR96UsltSSi+OcnvAIfU60Et1jvAJj6joDWqPeBX+Y64DocLePc/voWNY9bcPdtK2G
yQW5R066FhsT5cB6nQ3BTd5F+Wj3Ou3HJCi3qB3Og5DId8tB6kn99DcdY428fzHrpbKWM8APc/vo
2JYngB7nP56O4WzL8S8XWDhk8msqf45VjjOQpwSN2MnB7azavUKBeEd3JjKHjGmuEcXEtyjDPRUr
RtRgh4krJJpIw65xkCBN3TP1a8bW6vdq2+F2NUI+3Fms4Z4mS7QutRRyQJFjbKmRHs7ZKnsOoOt3
SdZLU5WCOrGKXyWfDlhipZbnKO9RcJp93UZDYAP36DWuCy2HqHaRofl647n99Vsx2rOVcYUTU/GN
Vy5Nm+goItp8yETyVgJYdegOvF/1FKU0j2ujnF6Vc5OkWyjD22lZmkZ2hVm5h8wLDOD+XbXpdJjS
R5HVyiptBRt6+5xrTZBMl2RZJOtNkGkndCskOxu30nS2ykYotb/HF85q1PTHLH7QprP0rfpr/O5f
qIpajRXiOHVnJko0P2RemhZTHAqpF9tBs4cEh+35aW2clQ8LGPbQbHxYuI++gFeT22PPcY1w1ZFA
j0GckOwmNA68HgseuDHIu2M99A4Qomus7lFBxdd/klnmqqfBqSMRqff7Drk6WToSS7LufK1y4lmj
qJhPb6aqqpWcNM6OJRIWOXV9xz19DkenTXha2u/HB6kdG1fgLj8fcrKKumo2KUO1KiliwCWyRvdc
5LMDgbe/XtrHraynjh1z5NENJqT8G74DuKofE0twWmm5ix1lraF4k5fmACseZgHy+vv7afpv06kn
T+eDPracv29ju9rnpqujiq4wo5ijIUhwP8u4d8a+khK0eZeQ7anvprDtyYG82uK68ZXikMYLfIbb
PGfvHVVQ6fvrHOO7Vr4N2nJQ0YvvuZs7eZXpIjWBVqyg5+3tu+2tcVtVGCe1thJEemAwbwC9dadx
lnFWI9AOW+R+E/00N4yjkt+IaJfnlf7CQD9lA/21Dpn+mjR1WdRsrfAj1GruRBRHrQ/bQciiix3g
Rj20EwqLH+BGP6aWx9uD3gR20Nx3psd4EemusotNnhQjQcjtjF8CPbQ3Hemzwo13LHleYVLBM+Yq
DgkL3IBIydByQz0nXA8UAB++usHpNDvArpbGeme8CNCwbHRUcRWSCrtztMjSeHBlVFO3OB6n29dK
5NBgnE+XaDh6u4s4s+VOjQR22LmrDhS0UceHOcdOYVbOcd/TXkT/AFW0ei24x78r+5a/DGuqE4up
uSqwUlUKqDa30pBUdN7987cBvz668yoPUzwaGnba5X5Nzb+BKWmvjcMVQ3tU5uNrqV7crLeXcMdU
fDpgnvr2I6Ud1GTU17W46VwnZvB0lTGQBH4hliZfpZBjzBfTJzrdpLaqPOnl35NB4JdVsXazKR0m
PibWJ3/9V6U//XT6hf634NDTXTr7NV4Ma02ZNrPeCGlsZwKrmBf8Fnj69gdy/s2dajC22xWratY3
yqSjacY8jdvvkf66VhjJ2Wd+uirfLgsytCRUuPOMDy9PqGV9PfUtD+XH6HnOUnnDBlrsjcm1l9x1
GqhUnQ4VrD0GuGU5CitbGuGWrJ8jhWnQKbmKKxtKDcx3jG9hrmNvlYvjD7DQG3SsXxh9tA7e6GpT
2+Splu70sXzSmhAp6wZEyBpYwwVhgjIAz74GpTSbQ6m2mSGuc9T1JOTnr++nBvke8a3trgb2Ka0+
2gHfIa1TvBRkBQ9CMZ6H7aV8Hb2cm+F1rFHxHxhUVQXm+KMfXIdY5hu6lu4x6+41j6ZUnZr6rUa2
qPgx3A9lp7teqeqpajwi1JqzS7ozKonDvtyoeIlQF3Abh+usOhoqUqZfW1JRWPi/o7WKK4HiGnuV
WKeZTByi0Y2rDs69Awz589Tn9Nertp2ea5e3JexzLTqQAFXudUETEFfJKpMabV/C7/12662HeYW2
S3Kk+Kc0VyrhcaqbhVG5wp0pQqLcJMIqoTkDPdiT+mo8ahecm+nXizeeMb2GtBl3iGrb2GuDKTYW
bZD3yNXsySVuzxtsHLbqPpP9NLLgroxTmrLO926I3q5MSOtVLkf8x1PQ/lx+htaP6kvsrPklCzbi
qhv5k8p/dcaqTUUL8oC/4c+R6LKA3+o2nQHwKtBt+uMH7xnP+jbdcckO8NR9mkEZ9pBs/rjQsp2J
hbYCMhht9/TQsah3y2D3GgFoX5bB7jXBSPLbYMkblyOpHrg9joNnUieK3Q7Jl3DzR9f0kQ6lJ5Q1
Yoj+WQfzDT2Kz3y2D+Ya46hflsH8w0LOo8LbB7jQs5UBLwvbI6yeujVRLVxcqpx2cA5GfyydJSDF
JHPbNwRFw38QKK3I6Pb2iq6+iHQsgl8jD/rGenvrHp6PpzNMtVzR0/5dF2yNbsGQhkoY5ZkpnwYl
QSE47gHAU+nfS1Q3JMbfB/NpgGBqaekh+M9OkkqRxPwU7szEAeW5HvnU8byzbWj8WbvwNOV3BlYE
dDquDIuBPl0HqemgPQ7wwz+ur7jPKNMd4XIwAevTSzlhjaf7l9lheaY/OLgfTxc2f/mHU9B/pr6K
a/8ANl9gnhtU3CRQ7wuhuGoXw/20LHQvhvT09tduRww22EnITa38yZQ/93Gl3IbI5aB1+mZvycB/
/A/66G8NC+HnXuqN/wBklf65/rrtwaIJbhbIquntFRa991cNNTXJT54k8qNG20+YPnygjvnGsk21
qp2bIaClo7vn8hsSRecZxmFvqBX8ae+NWnPKIR09yb8DRDGezL+h0+4lQyM08k89KhzPTbOauD05
i71wfXodLvKOGCbw66NiHvDroOQPoUwA6G4bazPtRwvx3G7pmSHh/fE3turWRv3B0j5KV7S+8OPb
pp9xCjNcW8T0vDVgud7gRLgbcEEtNHIoZXfdtz7+5UdcdtSnqpZFVOaWTH2b4m1fFFllrKOjS2TR
JzGq6nc9OqBd2cYViM+Ue50kepsrKGfg5RUccCq+Iwvt8hjr4ILKwoqWTaId0lTlOZ33xKzGRQUz
2G3ONZ/X9241R0r0drb/AM7na+BeKae7SfLNkCI68+lkgDxROH6skayFshfTB/Qa1w1W+TzpQo3n
IXVdw7QSIhp95Oh/LAwQOzD+upzlgfTj7kHXSLN0rj71Uv8A950unP2ofV/e/sG5Ix99M5iUKIlJ
25G4YJXPUA9umh6h1DhANDeGheSBrvUGocIRobwqLF5I0N4+09yRobjtoFJQUUl0gqp44/GxI6wN
tUttb/NjI9caRvJp01PY64LFU2mTHfw0hH6NGdBvKFiufo4dWfGe4Q3qqtLUdvhSn2osziWTfMVS
QqVXJACS5z17ddFyzS5KQ6a47qYQOO75zqialktYrJpgJeVG0pKwxRKAo6+5znQzYJpNV44NxwNf
rjxAla1z2bqfYMJEYgrNnOQf/HQ9T3V8C6mj3NhyU74GNNuIbBeUuO2huDRnnjT+30SY+rhmQ/8A
TcI//wBtKp5G7fNjONeIqThHhW4cSSSQqKSIGAyZZHlY4jUBOpyfb9x30XqUdDTcn9cnxlxBxG91
tVRf3WFkqr5EFjgEkdKszUUjO6xt5lD7uwJ65wcY15+u2zQ9NYxQRcqispfh1S11PXxBrnWuEoUU
CbKr5ipyXCYyD266EXho5JeosP8A9eDJ8NCW7XRKOFCKuaCKki27eY0ktQvLGR1JLMBk5P6DQdp4
Zqf8q/LPo74B1FdUSNSVTy+GhEiPRznPJqqXapKZ6rncdw9D299a+n9p5nUqmlR3oomOuNbNxNo+
Y+F/jjxBSyeMula92pFUvU088axFlzjKkL/Db2AyPtryP4rUhLOS2po++l/Q7tYOJbzfxQVkHDVb
BZrkByK2rSVId0bnm4lUYJ2oxXK48pz3GN8+ojVN58B6fp5OXD/z5NFfrzfrbU3OoquBbi0Ed1mg
p5I6zzT0+88uoVfDOBv77Ccgds6h/GaUY51EqQ+povfShLN57FVRcb0dTUpS1XDPEFCxqBBLK3Ll
RFLlebjlRkr0zorq9N/tnFhj0rrKZyLhzi+4Wj4iXm98RQVcUVbUT0lZGmyZFWBmjhEXLccxByxt
JGcdcazevJarb4DqaWFFHQbb8TJ7hGjU/Cl/qoGedzW01OJYhEXxAmYi6MwwwfzdMDpq66iXjBKU
U0q7cjpvijQUtX4eosl5hBcIGkhETeZgqMUlMeA2f5umqR6jyh5aHt3GhvHGVg4auZs3E072e4iI
T8qrUEctiQG3wGdOpU+uemguqgxXpOOGXFJX0VfRpcKCojqqKWPmxTxODG6+hD9gOnc6qpqXA2yn
k+Ur18WOPbhdKyZ7u1FTq7f3S21J8PEikhWjkhOHTp9eTu79jrzNfWkptWzX6cdvBreC/ipxFNcL
ea5qm+1NU00fh5Qu78ATw4RVY7MSZHudDR6yW9J5Cumez2ujts3HPBdJX1tDU36hiqaGlY18Tvhq
cTSwRR8/p/DLPKow3Xrr0JTEjoyVnCLn8OJ0vlruC321z2251lVsmpo5Z3WW2w1DTSdBvcIY+SQi
nLY640uL3WOtdtOlgGn4Qslj4eusKcT0VWiKpp1pWNNNU+INPMY4CnmBR2wxYf1066r39icoV5z+
Ttnw94AbgKCtojWyVgqXB/jEtKpTocsxbuAOx08527ILg2e0E9Ac/bQ3AcSivHFfDtnlNDX3mgpa
/ID00sqGVFI3FmjGWGE69RpHMKX2VFnq7dWcV2mot9XHV039laiLnRuJBuSvpchsZwy7ux7a6MvA
3oenDLGcScEWnjjhm2WS4qYrbDNDUvADuyIwfJnr3zo7kLcqw+f7nHb7wYg46ruF66mpTaqipWqp
IKOCNE8BFaikMexh/iq3k35zk5zqDhfJXU00tFST4ZS0fAFQ11rKWW3LS2empqurtKVyhpKSK4vy
qRq0qPqVY9+M5GAepOl2067Ce7D8/wDRkfhHYhF8V6GKk31FPaGNwZgoO+OgqigfaM43BNw12nGp
GnWj7Hb5R9V8O8N2jgumrKmFcz1bvUVbIuSzvLJKWAHX/iY6egGtdnn7Ld2HQ17/ADmtimWVIo4I
ZKdWdWVxLuy4UeZMMCu1vbI0d2Dvasdz54ht/Bc68mxQ0wj5ySypBI8Ckx5IZVYHqm7I7a+In1nU
x/ea9Tvlm4j45utpns6LRXaqoaWWDz0yqm2CndpNkhU5Kyc1t3l69M5GtWhra/7nQN1c2amu+Ol/
t4p7bauFZKyiiq3qFqcySMqs8h2MXmYsf4nRuv5auuq1ZRzGKfyW3OQJbvjdxZ8tq6W40l5nqjNF
UwVbU6QSQ8g7hErInn3HH1fcE9dTl1E7d6cX4o7TnOqOSS8Nw1lZW1zNLzamd6toXo54QryuZCCY
93UBiMjTw6ySlbj/ANlZOVbY4dcm7pOO6ahgPhuELdRUHgUhraGikuVumq66m2NA8U5liCw5Vtyo
OucsST09HT/1FNpOzDLScYuKS7Pmrznz/Q2Vv+MNrpqGmnuEV4pZY2VrhSxXqtljZhG3KjjiqPER
8uRl2yBmBwwYBsNin8Zpy/8Ahs21pZb3f047Zv8AJz/jtR8QK9OKKaB+XWUqloHnEkgWJZHXrgq+
C2BrFCb3NJN5OnWooyeMV/jMnbLVxfblhuPDNwe1u0W4+cxSFPZ43yp8zt0Kkap6qg6do5xjKPt4
MlaeDXuzbKHfJL5i9SJeXhSTnKlGHQkjXanULhggrvLr4NXZqK9W+oS2UFRT0fg6KqaXmyOsZSQk
SZkUL/EO5dmBj75Gs05pJXzf0en0nRPVtrhLvzkloeCuInoOJqmorRW3O72+GOKWaoUzMy3OknYm
WSQMfLGzbSc9+mvQhrbo8Mw6elsk038E9RYOIqfiu2QX0LYoFhmajWdv7qs0ca4ZEww3S7e4TGT1
0k54d2LPTrjJFeuGqy30jyvcaKukW4c+qKyEylp5KXauGQEkq29sYx6dNJuTaY0NNuOf/oPX1/HE
gWyc+vFFAZUVsef+9Om+A1B8/hmdcsu4L+I6MepaVNkJ6cYvirB3n4yuNGqOLmlvlR6qChR3ki8Q
0UgDRxGR33KTnDdc66GrJPDtBjGKi7MlaeHbzbeJ/CVHiTVoKuEyyqx6mkdkcuww/VgM9s9NUWpv
Y/T6UXL4Lu28U8U8E8SVPEdpoORLWUfJxJFuirBI3QlE2E7JID1znP2xqkdZbsZRKcJSXg6Gvxi4
0a6tY6W20EccBNNBW1CyRwzOqJywHeVF3knGAcH7apvdWSjCN1ZRXD4jcUCV+Jbrb6A10EyUDRFW
glZeWWdVBO7Klfb29jox1G0U1duzY3kA/wDOvxVeqi417LT26TiHFIJYh0WOkUmCNmJJyRUEOcds
YxqOpq7fonDTd13/AM4Of0d+4itN1uvEFHWvbZ54BRmem2xMVqalpcRlewPJGevUeuNdHVKegttZ
Ou274l8UpaOXHSRXWqqI6ky82Xl1bGWaZpHjBJyERekfspxqsdWXfgm9PS2vySV3xcmu9bS0HDK3
WlulRUUaU5Z6N5KkU80ss0A5abcSROMZ6e+tNPvTEjCN33L23WizWo/3Lh23Qe5SIJ26dsnXzM4q
Z6FUy3eWVskRIuDoKNDYsQxxnpywX9dvb9dKK4xGGmYFuWzRqf1A0boaEfB4xSp2kA9Ad2uTKXks
LXa7xcp9tBIryRLlp3kQLGrdPM79BnVtLQeq/aiUtWMOeQ6t+GPxMvlRSRUfFNgsvNaRYKeKtknk
mZUPfw8KZI3AkBug162l08NPj8maW7UVfOC+4W+Gt2t1HQUdZ8RrfcqakrK6K/LT1E8slQzIlOaY
YnyjRDmZB+lmHTV9xbT0bXvefjgi4y4V4ZsdivNTW3y4Xniqk4aq7tDHNDLS0lS1qHSdpZgwSYxn
l45o5oG7BIyJaqWolF8X+RowjF2uaPij5vPda0Q7pEuVRUxusEgEnNfcSvWQ8tE82NhPXH66d7F2
MdTk/s2vCdbxNS19PaHSloY15tQ/zGLY8kNIJZqiAOsWwnkxOcZY4Ude2u1djjtq0U6eE4vN8HVu
FeNP/J8vU1ZW3Pg23QTUlPUzirrJ6qfxZSNmijiInk2GXB67O3ppf24XYrp7Zcm74n4y+F1ZRxWO
1x0FDs/9JXCpneWrQ1EpOYoJYTU78GR8jCYGzAwMCGtc1jkte2VmPbjb4f00clPLWSVeKjnRCjo5
gyAwRR4DSyU+esX9NRXSzeLD6kCtq/iJwntMVNaLjP7PL4OAf6pVn99VWjRKWpGSKmr+JCNhrdw1
aIPLtaSc+ImPfG/ZFCnY/wAmm9OJKM2UlT8QeJ/opaeyUo3ZUxW+PfkdQdz5/pplGB3qy/dWQaHi
Di6tjr5zVv8AMglMkIpUgpT4Znk5iqI448rvSPpofpx8Hb5NFd4KpqZle+SVW4AuWki5xBZSG2sc
+nQnHbXLUjX6dWI0aOhmscMUkbf+yh4HDVCSSbThxvVSPt6dtRcdRxqT/ocoxrPkvPmPCcsJhgrK
SKaQDmSVNPUv2/F5aeTBOcanHp28sb1IpYKaisfD1wv1/irLzZxa5Ka34q5oqto0llSUEKgp9+9d
uSMKCD0YHWmCpJc0DLjcjnN6sBpriaiO51c0GVcbWZIlK4GzHRW+gHOOoPUA5GqrUsi6/IDcaV7h
TtSSStT07jEnh1ALoCCEO4noCo7aO8EVSZ9Mxz8PhsfOoljx13pIDn/m9NeP6Gp/xN8nEOSlt1Ud
lFdqeZz+Dcc/sqsdJ6Mu6Y1ryWVLwRxLWk/LaGG4pjPlllU/vsUaqtC+zJbr4oSfh+42kMt2pLZR
rnJNTfKen2g+yysG/cHVH0W7uUU/gq6ibgemDGr4osFBWAeWOG5Cu/Qino5/99Muja5YHqfg4LxP
xNxRcjLE72aOny1PSziqpoSIVk3Aqpilc5x3KqevYHXoacY6eIGTVabTf9i64E+MPxB4MqqapoeI
rJJFTFh4Guqaqalk3JsHMgo4YVYqACG+rPrprbXAy3rKyaDh/wCOVz4fopqK2XCmt09atK9yqrej
b56umiWB5gDycc4Rj7j7nrpHfcf+IxRneJeP34yhuls4luNXebZdq+lr5qSeV49k1HE0MccMm+SR
YiHyU3EbuugovkRazkuMFAOFuEUkWZqSz0e0hglVWNOwYdjtSSV8/poZYybTw6LWoub10q8+8Gt5
DZgLTSyonTGYxMSUyPYDppGvIq+yaDwZXMxlqD+HbNy1/wBFY9/vo7kjnFjZIoXbKRhF/kyz4/Vi
TpZSKPHATR2663w+BtdLPcGQ7vD0sJkC49W2DC/m2jchEqLih4EqJY5J66qgpo4iQ604FY4I7qZU
eOkDf5TUbv8ALpJUuWPtxnBZf2e4VoqV6kwyS8qMyT1VwkbZEoGcmNTSR/pmUD31nn1K/wBmTlFE
/wAot9vjhrTBTpDPAlRA8Ii2tDOu9GHKO05X8j79dZNbWm3Xc6SXJDzIZgrUCQcogBtu2SXIOdoV
dzH/AJsAHSqLdDbd37cFjQUFZHMKtJDFN2Lq5DhW/wAy4/boNWTUC8NLhljVvLHD4urZ50pUIjld
jK/XqVXOdgPrjQ3bn3GlJJGGuN9oIioq62CMVs2ZD5WMmDsVVZcnoRjb20dVTSpIya2p7tpDbrjb
Iq6/VVbLTRCSvoYYRJIqq+yjYnaTjOAevtnTTlejFK7Ep9+Cx+V2biANaIJqYVdYyC33ENujSf8A
BBJtJXbPkKCfpbac4zp9DVkrUuSMqUucGDm4aqqnnQW2Ob5zQqwulknGKtHibDtAvQyquPMv1r7E
ddbNyDK6pnZD8aJ6Rt1vpbNSuGzmktEZPXp0aok//HVtw8pOzKXn4o8V3up59Rc6lSkbQxiDbSAR
E5xtgCDuBqblLsLL5Zk5JYpwRUUyVYJ6CpeeUAewXmBep+2nU2IkrBntNqm72ygi6kgRUkCeb7sF
z++leox1awMjsVsztNLToCfMeUpx98Y129opFeC0jsvClPkEPUZ9IKWKAf8AVIzH/uaSUn5BBNLw
K0FhVSKezQ8zB2zzNzHH3ARYV/0OmU7ZRcEXhoOg5MWO/VF/8ND1BNlZHcmAgZVP0UaVyyM1z4G+
Hph5uUi49cY0QUky5snBnEnEgL8P2iuradfqqYFcU6fd522xKPzbQavI0V38moovhW4R5r5xFTUs
UAzUJbAbu0f/ALyoXl0KH7NUZ+2uUUh9jfwWi8PcI2rli0UtReKsruMlwj8d29RHH4SkT9fEazy6
iCVrJTZ7V3JLma2siit9X4qK3qnM+X5xEfsaeDlwAfYQrj11h1NeWphsOpDF8fQFPFHODUTvJURU
ycoNO2WRewRe+Fx6DUlb5Yl+2pcshhp6eZGnggaKHHKWuk/fyr+Lr2I6ffTxitw3pzWEs+QSG3Rc
9lpiWLjDycpVjypyCkbb/wBD0P5ao9GnfcZaHuD1slDDSssyKWK+eTaMnP5hv20zm7Lx06tD4bZC
IYo0yIQM7PLjH5Kmu3KzpQpUZ272+jr5GiHMWNgYo0j2R5z9TFwoI6eue2rbnFWQ1bpbeTNUvCnD
wq42p6MqkE2+NzIxbIG3H1Hr0znUtTUlw32Mjkt+UX39iqAOKhLeI5ZWDu0z/wDEA256ufQ9tdpz
fBzg3hA1dwLYHhiMNK1JPSnc6xOyAYOceQhcZPTpo7pPLEnoYHz8P1N8t1bfaC5zjjuyHxrTTMZJ
Z7eihDOki7X5tO2NwJJZDu/Cda9B7sM6FJZ5MSlJXesoAPoTnWt6kBGnuCo4qhT5ps/YLqbcZDqK
C8v29fc6G4VxSFG7ODpXxZSHA7IAwT699BDC5GO2u+he/I+JJJpRBCrSTt0SOMFnJ+yjJOjsHeoj
ZUfws42qKT5lcaCOw2ju1yv08dsgAPr/ABiJD+iaKgwc5zRc0Hw/4Vgh8ZcbzXXuENtMlnp1t9s3
t2T5rdTDC3/w42P207hFcjRhufJcQ1fCNjZf7P2m2tUIQedDG16qlUKWL+OuarSjqP8Ag0bfnrPL
qYLga1dc0CXjii4Xh42nFTVODlY6yd63ljPl2xS/3ZPb+HAusmr1UvwMrnEr5BUVQjar3yclNsas
xl5Y7/i3bB19NZfUx8s70m18JBGw0ylpl5UbjyMzfVjJ+k9AOnrpHlqI0IpLPAGaun3RJSJFNM+0
Njrjf12t5Rj98fcatDTwDbPnkbHTxVI2VDw1glBeNKVuahYsQf4gPXaQR09Rqse/kvHTWFLgnWGU
NHzmy8SqsKBchVAwPXGnW2sFFHbwHR0cVDTiads7/wAROO/YbfTUnJrHIeRtUDtAgztbysHbJ+/f
7aW3fwH5AblVcqnS2QRvzXwrS/SuzbnbnOPP/tq0Fm+xCbV7W8/9FVUtV2+1VFcyxpAsnLQYZp2M
g/CTvB29PT199DiVCykopAVvjgaIZcHfvHLC+U5Od2fwk6zbW3bMumrtoJkhen8r+aIg74sN2Oeu
WJyQBqqxwO4V9E6RktFDAxwFOJZOpcDPQ4PYZ124TnkBWvqeHrrFd7XPLQXiGQtSVY2sqMQV3bWA
BDBiCGzkdNU3bHuJ68aeLMhge3Qa3JjSrceGPbXMMa7C+h/1+2jmxLotrFwtxJxNKIuH7VW3N843
UsTOg/OT6B+p0702G6o3KfBi4WpFn4/v9k4Rg6HkVlQtVXH/ALNPAT1/5tctL8jty+vs0lo4D4Di
pWrrTZr7xcidPm15ZeHbCG/mLytBJIv2BbOqUo5Cs/0CKrjhLGJaC03O32eljhbmW/gWjiWTMYHS
S6Vql2yT1McR1CXV6adZb/sJGWaVGKqONleuiuNKqU9Vs8lVXFr3cJZ2P1GetDbG9uUqgddYZ9dJ
/wDiHUfyQ1nEtZeqzFzrK6tlAbFdVHmdgwPLjLSYHlx/TUlNvnNlFJSdZsigqomLQQ10bsFVngfE
UgRc/UScDOB00vprB0dsO+eBXuQQCE7DVBlih5UnX77tpJ7N6/ppXl/H+f8A6CWpsJ4lui8vmLFT
EHnRLHgyTBs7RtcM+X6/fHXXKFuvP9ivpu026HW55LdXNd7knOqQPNSSqk8mSu08xYk2YycgYJ9/
UaotP/iVjBx5eAuESVLP4JDBRzMpKk7+qjaGVT1JwNPt2rOS+3naGLQpTIZTFy39JM+c+vYepH6a
SWrY+1ElOzg+Ic4QnyB/Ujp0xk/npZ44FcldMKkDspaRGfL9ZG27QB7Lk9RnodLF3gEmqwVVVUQx
DxBjkIU5ijP4ivYkj7ddXhDtgEvajMyVG+Z6iVTzHOMTxHblu2c9B299W4VErIb7EzT01LakiqIY
I98k1RO2xc+ZpIQqZVmI6noOnTUMPlmTqF4ZJbxMh2QSGToD/DkA3n8S4JB7/b+upqORI32eAqoq
2YvBNICzoYyWJULH7sO/Un7k+2rVX4H5ftA6Z2/hxQlYpt6nEzMm/Z9yTj9dJ3z3BFXklqnMqRja
8iP5tm9JNwA86iQHGemR6apWGdKFYkC8PfC34h8VbWtdirPDPn+9VK+FpwR/nm2Z/wCUHXpbGiMt
VbsKzYj4RcLcMyKPiNx1QUMxG4Wi0KausYDoV6gkH0xyzp46a+wOfnBp6K38OWhY5OEfh1E8b9Kf
iLj+rSijk7eaKlnZSw/7KjRclFZaQqrxf2eufH1UxktXE/F9dU8sY+QcHwJabdtx/hiulAldV7Ns
QfY6z6nWaen8j78MwNRd62Cpaq4YpaC1IkrBqmnSoqK0g9SWrKwNI7jHTAUAjOsU+qk5XdCTXqRp
vDImu9deardcrktVVYXm1FRM8uHjXG3bOFAx6DHT31DdJvJaEVtds9QW+3+Iy8sJuEcirGqxoQSS
Mb3XbjGfQ9emhttUyi0YVtscvDlMsS1EzRASSOGLdZgFYkFT74zn9Ouu/wA+C60dKKygeYW8UnLt
SDfy+rbeYRk5OUKyPMNjDPTto7c8E6io4/d4ARNcaucS0b0UlKOsgccmbyjoNo6LuPTpnJ7jTU1L
LIrTcn7u39Q2GhuNFJzrhRLGEyKK2HkmQq6/WGiXauM4Bfqf21NRf+01acJKPm8/RYtU3CQBBzIK
dVLR0sD7Sucb+oKnLeuTq/CuJugpP9yoZSUkskvNZNzd2WVvNnv16nP/AFa7fQifZF5GxjTxGQp2
DPXz/ZVA9B9tQaKX/QHNU87By+Y16bR1JI/LP66aMUgVQskxlIiVtpAIO7yjpj7e/wB9c1f0T3Lw
eNVUQwOsn+L2LMS2T6jofTHX/TRUEzvpGYE9TcKozpvelV8ITlQVzknd6E//AM1o9sFRGUt88cEE
VN4k1TyzTwCmjZImjAeUzyDopDeU+Un+vTQ1eFXIup5eKM1trRM84NarfRmYI2I4/LsHLO3LgjG8
lsfnnUZJXnsYNvg0yPT0tMHgkSOeQ+UE8wgFcnzN5lw+BtbQjFNFYuKBZamrnCxS7X3BY6cqFLeY
MQ8mT0Hp+3p2PGRdyIGqqmfZLHJ/EhiBYKvmOGwxYfp1xoNYph9REtJd6N0HNOZOZ/GwuzdkeZxt
7D/bTKbarwNeDol54/W6Cf8AtRxTfuIpEjDfLbInyS0K5yNkkuOfIq46nbr0pdXBftyzDOV4drIF
RcYXC0pyuFLbarEtRC7ePoabNYfXLVM4kl/zdGHTWX+Ke3n8FYLa/sztbJJcmetvNXUV1Wm1GnqJ
JJpgdwJKu2QBjA/21nm3LuctGpOySdKGtiWljhKISGVZNzqi9j3K9Se/brqW3OAY20DBdkqvvWN6
nKCLKLtESEL0831A9V/ftrowT/A23bhugSeGiEZlApYJqgqZiC2fNhhu2LhsnAx9sn31ydcgjjBJ
QxwLLBJI8W2o/hRRAyq+8HPRHUqrNjPU/b308UnhF46dchVY1ROVqzHMhWfZWwojvJGyDJZsMd4Z
Qe37jQ04tvJTVhGWbf8A6GfLoKWKOapugSqn2ALHE6ukf/DLRNsboe2BjrqnqSfbA0dKPPGQ0XGn
EYQRCaX1qG2o4YjG9QqAen5/lrqtfBt9ON2iREqqyPnieRkbJjV93VsdcZ9/fVHOKGjG3nAdEkJg
ETxctXI5seclmHue79vtpVfLJzl8sLZysQlg2FQ3U9u/t1Gox8Pgfd3AJ5pKmUltwp42J3dfpXq2
c56dOp1Xj7Ou89gjzGRo1kjjp8iJBt7nqW3YxuUhlxg6nRPtafBNIII1WLZsGFJbGR37nJ9Addtb
HT3LLM7fby3NNvjDvnq6o+3d6spY7s59Rj7arDTrL5IzmuFZTV1cqUkSLG8rY2Q08M3h5ZW9g4xj
/fTiKSin3A6i8JaqYW6aGNqo7tytPz1Luu5w/Ujpk7C57D7aGoQ1LYLQU61bVla1bRv4GaCSWCJ1
MrJPvTmpF5XdUZV347Bh6Z1CVyVvBnlu7mnokeaBJKaWNecuSZYWEQCrt2+ZThjt7/t008Y39F4Q
Xd2NEZc5rreh8uxI28igNgHyoEYlegz6ap/cfbF8kNzs9IhSpoo5VjlIgjfGVbqDubZ1ySvp7a70
040uwrSkuaAKJ4KDArt7h/MkhyDEq/SVzkd8/n2zpFCXIIqLW00FNaOZUqoqmknmXMtPAu1Q69x6
9RjcR06ak9r/AGmbUj7m27oWlkpXrvBvGTPPJzonj2rGDjBflL1Y4756Y7DrotK/JWEk6rBHc2pa
Gf8AusoqZQeXTGMERNKfN1zsweoP20dl5DlY7hMFCoooKieWSCmnn/hbizCNQd+1t20BjjOMD8zp
L5FcHFY8lfxFdrbbZVnpt5jnjdJUxE7klvIMlDtPTOFz6aK0r7gq13Kmkd7wxNPE0ef8VTgbdoHM
bauOm7oFxnHvqeqvdQYty9rN0UpKexQ0c8Mbw1CZqpCvKaKUD8QADfkQwOc+mn0vg3w06W34KhjS
QjmxowqZV5fNZtz8vO0SZHkDOGxnvq6h54D6NZa+hUo2nqTTqniJlTZuDb/4YPcuc4+51WPkrBx4
LKC2UjxESBZ1fodn0qw6gZ9/21Gc3Yyl3Jktu5ht3lWbbvjyqggdPz0N+MB9zQWkUak+IBLADqT1
yPsAf30uaFavCKvmLKCWY01HTx7v5QqY8x83sB0xp0pfk5S7Dloobjyyf4kUZ5qTRnKnHVSPcHr6
/ppJSoaQX4SRISi/xmA2tFjDAsQxLD3x1P76DmG8Fdc5xRw7sjnyj+D0BBZv8RyD2xjpq0FbvwTc
zJKuzczxlNo2sWIYYcZz1AIP66q57n5Ivc3Yfw9BJc6isrZWh8FZ5ijGJzzFn27oWkUr025B251P
UllLyS3tt12KTiK0Je7xKamjowky5C7RHE3LxmPlgEsSevTAy2M6PqdrBJuCUu5X2SzTUckhjMUE
ZcLHyFSBSCMZDjDOF3YxnGOup6slJ7UzNO8M15uIp0URh0k2rTxz1G1Q7fhZQpTJI9QMdj30kLj+
7g0Lc8dx8t38VLIjiFyuHMYB875w/bvgDOPX8tNva4ObbQsl0Qrsnp5+h2ROrZMKthdrbCqj6uxB
/ProPU2sVypccFVU0v8Ad53lMiw0Uu+ZnVJm2n1kYDcdoYdx2wfvo7t3H+7go5rUteD/2Q==

--ZihHOYF=_F3JQE5g4IGmIZOVKNuIKa18tg--

.

// end of message

Thanks in advance.

Replies