Отправка почты
procedure TForm1.Button1Click(Sender: TObject);
begin
NMSMTP1.Host := 'smtp.mail.ru';
NMSMTP1.UserID := 'jaybe';
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := 'hasan@excite.com';
NMSMTP1.PostMessage.ToAddress.Text := 'someone@xmail.com';
NMSMTP1.PostMessage.Body.Text := 'Текст письма';
NMSMTP1.PostMessage.Subject := 'Тема письма';
NMSMTP1.SendMail;
if (NMSMTP1.Connected) then NMSMTP1.Disconnect();
end;
Написал вот это.. все сделал как везде в интеренете описано.. но почту не отправляет. Подскажите в чем может бть проблема?
begin
NMSMTP1.Host := 'smtp.mail.ru';
NMSMTP1.UserID := 'jaybe';
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := 'hasan@excite.com';
NMSMTP1.PostMessage.ToAddress.Text := 'someone@xmail.com';
NMSMTP1.PostMessage.Body.Text := 'Текст письма';
NMSMTP1.PostMessage.Subject := 'Тема письма';
NMSMTP1.SendMail;
if (NMSMTP1.Connected) then NMSMTP1.Disconnect();
end;
Написал вот это.. все сделал как везде в интеренете описано.. но почту не отправляет. Подскажите в чем может бть проблема?
А разве NMSMTP1.Connect и NMSMTP1.SendMail не возвращают никаких величин или не устанавливают кода ошибки?
Опять же, я не вижу, где ты вводишь пароль.
Опять же, я не вижу, где ты вводишь пароль.
Некоторые смтп сервера потом не отвечают... а заставляю сначала проходить поп авторизацию. Это защита или у меня чтото нитак?
Пароль для смтп авторизации часто не нужен.
Пароль для смтп авторизации часто не нужен.
Я проверил, smtp.mail.ru ТРЕБУЕТ аутентификацию.
Цитата:
hasan@excite.com
-а он существует? Под паролем?
Если не существует, то письмо не отправится, а если под паролем, то нужна авторизация.
ПС. Для отправки почты лутше всего [email]delphi@mail.ru[/email] -в авторизации не нуждается.:)
Еще можеш глянуть, я приводил пример отправки письма, но через WinSock: Жми здесь
А можно через стандартынй компонент smtp прикрепить файл для отправки?
Цитата:
А можно через стандартынй компонент smtp прикрепить файл для отправки?
Пожалуй нет, или я просто не знаю.
Ищи компоненту отправки письма с полем AttachFile
Всё спасибо все сделал )