Re: Email Sending - How To
- From: "Crazy Horse's crazier little brother" <cshannon@xxxxxxxx>
- Date: Fri, 29 Apr 2005 11:17:02 -0500
"Patrick" <patrick_dohogne@xxxxxxxxx> wrote in message
news:427211f3@xxxxxxxxxxxxxxxxxxxxxxxxx
>
> Where to start? Indy?
Yes, you can use TidSMTP and TidMessage:
{ setup SMTP }
SMTP.Host := SMTP_HOST;
SMTP.Port := SMTP_PORT;
{ setup mail message }
MailMessage.From.Address := 'looneylarry@xxxxxxxxxxxx';
MailMessage.Recipients.EMailAddresses := 'adolf@xxxxxxxx';
MailMessage.Subject := 'How's the weather?';
MailMessage.Body.Text := 'Be seeing you soon';
try
SMTP.Connect(1000);
SMTP.Send(MailMessage);
finally
if SMTP.Connected then SMTP.Disconnect;
end;
--
Download Blackbird Crow Raven's book
"STILL CASTING SHADOWS: Two American Families 1620-2006"
(.exe and Delphi source): http://cc.borland.com/ccweb.exe/listing?id=23106
.
- References:
- Email Sending - How To
- From: Patrick
- Email Sending - How To
- Prev by Date: Re: [ANN] New ModelMaker 8 + ECO Modeler software bundle
- Next by Date: ANN: EurekaLog 5.0 (Catch every Exception showing Line#)
- Previous by thread: Re: Email Sending - How To
- Next by thread: Re: Email Sending - How To
- Index(es):
Relevant Pages
|