Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.01;
Скачать: CL | DM;

Вниз

Интернетпочта   Найти похожие ветки 

 
VS   (2005-09-13 10:53) [0]

Пожалуйста,подскажите как из программы на Делфи послать и принять почту (файл) через ящик в Инете?


 
Digitman ©   (2005-09-13 11:33) [1]


> послать


см., например, TIdSMTP


> принять


см., например, TIdPOP3


 
VS   (2005-09-21 09:45) [2]

немогу найти исчерпывающую информацию, TIdSMTP и TIdPOP3 для моих целей подходят. Плиз, дайте работающий код, спасибо за помощь!


 
Digitman ©   (2005-09-21 09:58) [3]


> VS   (21.09.05 09:45) [2]


в демо-каталоге Делфи есть готовые примеры использования этих компонентов


 
Плохиш ©   (2005-09-21 11:44) [4]


> VS   (21.09.05 09:45) [2]
> Плиз, дайте работающий код,

500 Euro


 
IceBeerg ©   (2005-09-21 11:59) [5]

procedure TForm1.Button1Click(Sender: TObject);
var
Msg:TIdMessage;
begin
try
Msg:=TIdMessage.Create(self);
Msg.Subject:="!!!";
Msg.Recipients.EMailAddresses:="my@mail.ru";//gjkexfntkm
Msg.From.Address:="support@microsoft.com";//указываем автора письма
Msg.Body.Text:="Message";//размещаем текст сообщения
Msg.Date:=StrToDate("01.01.2010");//дата отправки письма может быть любой

TIdAttachment.Create(Msg.MessageParts,Application.ExeName);
with TIdSMTP.Create(nil) do
 try
  Port:=25;
  Host:="mail.server.ru";
  AuthenticationType:=atNone;
  Connect(5000);
  Send(msg);
  Disconnect;
 finally
  Free;
 end;
finally
 msg.Free;
end;
end;

Возможно рабочий... Переодределяй Host, Address, EMailAddresses... бери бубен и копай дальше



Страницы: 1 вся ветка

Текущий архив: 2006.01.01;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
14-1134197036
Kerk
2005-12-10 09:43
2006.01.01
Ура! В Самаре зима наступила! Снег кружится и падает! :)


11-1116038421
uli
2005-05-14 06:40
2006.01.01
разрешение экрана


1-1133525387
Alexandr
2005-12-02 15:09
2006.01.01
настройка видимости контрлов в программе


14-1133866105
Serg_r
2005-12-06 13:48
2006.01.01
ODBC драйвер


14-1134040207
SergProger
2005-12-08 14:10
2006.01.01
Как в Pascal