Консультация № 67532
18.12.2006, 14:51
0.00 руб.
0 3 3
Здравствуйте, уважаемые эксперты!
К сожалению, мне так и не удалось отправить сообщение - появляется та же ошибка. Посмотрите, пожалуйста код программы - может у меня где-то здесь ошибка. Заранее спасибо.

С уважением Archangel


Приложение:
var msgText:TidMessage; begin msgText:=TIdMessage.Create(Nil); Form2.IdSMTP1.Username:=Ivan;// Form2.IdSMTP1.Password:="Пароль"; Form2.IdSMTP1.Host:="SMTP.MAil.ru"; msgText.From.Address:=Ivan@MAil.ru msgText.Recipients.Add.Address:=Darya.Yandex.ru; msgText.Subject:="Hello"; msgText.Body.Text:=Memo1.Lines.Text; Application.ProcessMessages; Form2.IdSMTP1.Connect(5000); If (Form2.IdSMTP1.Connected=false) then begin Form2.Memo1.Text:=‘Error‘; exit; end; Form2.IdSMTP1.Send(msgText);

Обсуждение

Неизвестный
18.12.2006, 15:04
общий
это ответ
Здравствуйте, Archangel!
Интересно, а как ты вообще работаешь с почтой?
Ты напрямую подключен к mail.ru - сомнительно?
Посмотри в своих настройках интернета (своего провайдера, который дает тебе доступ в интернет) параметры smtp-сервера и укажи его

Например для Stream в поле Host нужно записать smtp.tochka.ru
Неизвестный
18.12.2006, 15:06
общий
это ответ
Здравствуйте, Archangel!

а разве адрес пишется не так:
msgText.Recipients.Add.Address:=‘Darya@yandex.ru‘

ну в шелпе написано еще можно и вот та
msgText.Recipients.Add.Text:=‘<Darya> Darya@yandex.ru‘
(Будет рассматриваться как <Darya> - name, а Darya@yandex.ru - address)

в хелпе погляди TIdEMailAddressItem.Address
давно
Мастер-Эксперт
425
4118
18.12.2006, 19:28
общий
это ответ
Здравствуйте, Archangel!
1. Все строковые константы необходимо заключать в одинарные кавычки. Вы этого не делаете почему-то.
2. Двойные кавычки при написании строковых констант применяются в Си, а отнюдь не в Дельфи. У Вас ошибка.
3. Каким образом у Вас осуществляется соединение с интернетом?
Об авторе:
Я только в одном глубоко убеждён - не надо иметь убеждений! :)
Форма ответа