Attachments not right

Giganews Newsgroups
Subject: Attachments not right
Posted by:  Rhys Sage (abu…@127.0.0.1)
Date: Wed, 26 Nov 2003

Ok. Looks like I'm going to lose that MSN account to spam now. C'est la via.
Outlook Express 6 sends immediately instead of waiting like OE 5.5 did :(
And the blasted cancel doesn't work either!

Ok. This is what I received in MSN's junkmail folder. What should have
arrived is a message with a nicely attached file (JPEG in this instance).
The code follows the message. Where am I going wrong? And will somebdoy
please cancel those other messages!
X-Message-Info: 6sSXyD95QpUypKMHi+vQyZCSa3vsGZ0e
Received: from cmailm5.svr.pol.co.uk ([195.92.193.21]) by
mc6-f42.hotmail.com with Microsoft SMTPSVC(5.0.2195.6713);
     Wed, 26 Nov 2003 11:50:05 -0800
Received: from modem-2031.jaguar.dialup.pol.co.uk ([81.76.183.239]
helo=apollo)
    by cmailm5.svr.pol.co.uk with esmtp (Exim 4.14)
    id 1AP5fn-0003SZ-Gn
    for ; Wed, 26 Nov 2003 19:50:03 +0000
From: p…@bear.com
Subject: none
To:
Sender: p…@bear.com
Organization: Some organisation
Disposition-Notification-To: p…@bear.com
Date: Wed, 26 Nov 2003 00:00:00 +0000
Message-Id: <E1AP5fn-0003SZ-Gn.2003-11-26-19-50-…@cmailm5.svr.pol.co.uk>
Return-Path: p…@bear.com
X-OriginalArrivalTime: 26 Nov 2003 19:50:06.0366 (UTC)
FILETIME=[7D95C3E0:01C3B456]

ÿØÿà
This is a test message to say "Woo hoo.
Homer's home".
procedure TForm1.Button5Click(Sender: TObject);begin// set message
headersidMessage1.ClearHeader;idMessage1.ClearBody;idMessage1.From.Address
:= LabeledEdit1.Text;idMessage1.Sender.Address :=
LabeledEdit1.Text;idMessage1.Subject :=
LabeledEdit3.Text;idMessage1.Organization := 'Some
organisation';idMessage1.Date := Date;idMessage1.Recipients.EMailAddresses
:= LabeledEdit2.Text;idMessage1.ReceiptRecipient.Address :=
LabeledEdit1.Text;// add attachment if necessaryif
Length(LabeledEdit7.Text)>0 then
idMessage1.Body.LoadFromFile(Form1.LabeledEdit7.Text);idMessage1.Body.AddStr
ings(Memo1.Lines);// post messageidSMTP1.Send(idMessage1);end;

Replies