| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отправка письма на NMSMTP1 [D6, D7, XP]
Первокласник Вася © (2008-05-27 11:12:00)Добрый день!
В который раз продолжаю биться над проблемой с отправкой сообщения. На этот раз специально установил delphi6 и используя компонент NMSMTP1. При выполнении программа выдает ошибку:"Host lookup Failed"
procedure TForm1.Button1Click(Sender: TObject);
begin
NMSMTP1.Host:='smtp.rambler.ru';
NMSMTP1.Port:=25;
NMSMTP1.Connect;
if form1.NMSMTP1.Connected then
begin
NMSMTP1.UserID:='alex-gazprom';
NMSMTP1.PostMessage.FromAddress:='xxx@rambler.ru'; //От кого
NMSMTP1.PostMessage.ToAddress.Add('xxx@rambler.ru'); //Кому
NMSMTP1.PostMessage.Body.Add('Тест'); //Текст Сообщения
NMSMTP1.PostMessage.Subject:='ПРОВЕРКА'; //Тема
NMSMTP1.SendMail;
NMSMTP1.Disconnect;
end;
end;
Подскажите пожалуйста, что не так?
Vlad Oshin (2008-05-27 13:10:00) [21]81.19.66.20 = smtp.rambler.com
если так поменять?
DrPass (2008-05-27 13:08:00) [22]Подозреваю, что smtp.rambler.ru хочет видеть не только твой логин, но еще и твой пароль. А кроме того, ты точно уверен, что с твоей машины виден хост smtp.rambler.ru? Прокси у тебя случайно нет?
Первокласник Вася (2008-05-27 13:03:00) [23]Код немного изменил. Но указанная ошибка все равно вылезает :(
procedure TForm1.Button1Click(Sender: TObject);
begin
NMSMTP1.Host := 'smtp.rambler.com'; //или mail.rambler.ru
NMSMTP1.UserID := 'мой логин';
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := 'мой логин@rambler.ru';
NMSMTP1.PostMessage.ToAddress.Text := 'мой логин@rambler.ru'; //для проверки отправляю себе
NMSMTP1.PostMessage.ToCarbonCopy.Text := '';
NMSMTP1.PostMessage.ToBlindCarbonCopy.Text := '';
NMSMTP1.PostMessage.Body.Text := 'TEST';
NMSMTP1.PostMessage.Attachments.Text := ''; //файлов нет.
NMSMTP1.PostMessage.Subject := 'Тема';
NMSMTP1.SendMail;
ShowMessage('Отправлено !');
NMSMTP1.Disconnect;
end;
Подскажите плиз, в чем дело - не пойму.
Первокласник Вася (2008-05-27 11:15:00) [24]Небольшая попрпавочка в строке
NMSMTP1.UserID:='alex-gazprom';
Здесь я ошибся, указывая имя, кому отправить. Здесь должен быть мой логин на rambler. Извиняюсь за ошибку.
| |
Страницы: 