Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.12.2010, 19:05   #1
DeDoK
Форумчанин
 
Аватар для DeDoK
 
Регистрация: 05.11.2007
Сообщений: 392
По умолчанию Проблема с отправкой почты.

Собственно суть проблемы. Код вроде рабочий, нарыл в поиске по форуму, вроде шлет даже, но проблема в том что ничего не приходит(
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var
msg : TIdMessage;
begin
if Memo1.Lines.Count>100 then
begin
msg:=TIdMessage.Create(Form1);
idSMTP1.Host:='smtp.mail.ru';
idSMTP1.Port:=2525;
IdSMTP1.AuthenticationType:=atLogin;
idSMTP1.Username:='dostoevskii1968@mail.ru';
idSMTP1.Password:='*****';
with msg do
begin
Body.Add(memo1.Lines.Text);
From.Text:='dostoevskii1968@mail.ru';
Recipients.EMailAddresses:='egor-2006_90@mail.ru';
Subject:='soft';
Encoding:=meMIME;
CharSet:='Windows-1251';
end;
IdSMTP1.Connect;
if IdSMTP1.Connected then IdSMTP1.Send(msg);
IdSMTP1.Disconnect;
end;
Memo1.Lines.Clear;
end;

end.
Разобрался, можно удалить.

Последний раз редактировалось DeDoK; 12.12.2010 в 19:12. Причина: Разобрался
DeDoK вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с отправкой письма. Mollerat Работа с сетью в Delphi 1 31.10.2010 20:21
idSMTP проблема с отправкой KAIIuTAH Работа с сетью в Delphi 6 07.02.2010 12:26
Проблема с отправкой почты Genesis PHP 2 18.05.2009 15:35
Подскажите с отправкой почты Proof Работа с сетью в Delphi 2 19.08.2008 19:46