![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отправка письма [D6]
Danco © (2008-08-10 13:46:00)Здравствуйте, помогите пожалуйста с программной отправкой письма (E-mail).
Использую компонентTNMSMTP
procedure TForm1.Button1Click(Sender: TObject);
begin
try
NMSMTP1.Host:='smtp.mail.ru';
NMSMTP1.UserID:='addressmail1';
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress:='addressmail1@mail.ru';
NMSMTP1.PostMessage.ToAddress.Text:='addressmail2@mail.ru';
NMSMTP1.PostMessage.Body.Text:='Текст письма';
NMSMTP1.PostMessage.Subject:='Тема письма';
NMSMTP1.SendMail;
except
ShowMessage('Ошибка соединения!');
end;
end;
Раньше этот код работал, а сейчас выдает ошибку. Подскажите где нужно исправить или кокой компонент лучше использовать для отправки письма? Заранее спс :)
Anatoly Podgoretsky (2008-08-11 08:54:00) [1]Проще - применил штатный почтовик.
Сергей М. (2008-08-11 08:52:00) [2]
> Нашел другой выход
Поди влупил вместо имени smtp-хоста его ip-адрес ?)
{RASkov} (2008-08-10 15:06:00) [3]-"Чем прикажете рожать?"
-"Не переживайте, найдем выход!"
© "Вверх тормашками"
Danco (2008-08-10 14:58:00) [4]
> А что с того времени произошло?... Вообще же тебе же говорят,
> что адрес не верен.
В том то и дело ничего не произошло.
> А майл.ру с смтп работают? Я не в курсе, просто спрашиваю
> ....раньше они вроде только поп3 предоставляли...
С smtp майл.ру давно уже работает.
Спс за внимание. Нашел другой выход :)
{RASkov} (2008-08-10 14:51:00) [5]> [5] Danco © (10.08.08 14:41)
> Раньше этот код работал, а сейчас выдает ошибку
А что с того времени произошло?... Вообще же тебе же говорят, что адрес не верен.
А майл.ру с смтп работают? Я не в курсе, просто спрашиваю ....раньше они вроде только поп3 предоставляли...
Danco (2008-08-10 14:41:00) [6]
> > а сейчас выдает ошибку
>
> Эту?
>
> > ShowMessage('Ошибка соединения!');
>
> :)
> Давай подробнее, вот это и будет взаимность...
Да эту ...но соединение с интернетом как видите нормальное. Если убрать обработчик ошибок (try ...except) то выдает ошибку "Null Remote Address" (Пустой Отдаленный Адрес)
{RASkov} (2008-08-10 14:29:00) [7]> [3] Danco © (10.08.08 14:27)
> Какую взаимность Вы требуете от меня?
> а сейчас выдает ошибку
Эту?
> ShowMessage('Ошибка соединения!');
:)
Давай подробнее, вот это и будет взаимность...
Danco (2008-08-10 14:27:00) [8]
> http://www.podgoretsky.com/OtherParts/DM/BadWill.aspx
Хороший пиар-ход ))) но я не ради Заветов написал сообщение :)
> Никаких ответов, пока не будет взаимности с твоей стороны.
Какую взаимность Вы требуете от меня?
Anatoly Podgoretsky (2008-08-10 14:14:00) [9]> Danco (10.08.2008 13:46:00) [0]
Единственный совет, это ссылка на
http://www.podgoretsky.com/OtherParts/DM/BadWill.aspx
завет номер 4, относится к тебе.
Anatoly Podgoretsky (2008-08-10 14:12:00) [10]> Danco (10.08.2008 13:46:00) [0]
Никаких ответов, пока не будет взаимности с твоей стороны.