|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Работа с idSMTP и вытекающие проблемы.
Народ, кто нить подскажет? Сделал вроде все как указано в данном мануале: http://svdpro.info/page.php?id=32
Но у меня выскакивает такая ошибка: Цитата:
перевод ошибки мне вполне понятен. Но я не понимаю смысл.. ))) То есть вроде все поля я заполнил и вроде правильно. В общем кто нить ткните носом в ошибку! Пожалуйста |
#2
|
||||
|
||||
Я делаю так:
Код:
begin SMTP.Host := 'smtp.mail.ru'; // испытанно на: yandex'e, mail'e SMTP.Port:=25; SMTP.Username:='________'; // логин SMTP.Password:='____'; // пароль SMTP.AuthenticationType:=atLogin; with IdMessage do begin Body.Assign(Memo1.Lines); // Текст из Memo From.Text := '_______'; // от кого Recipients.EMailAddresses := '_____'; //кому Subject := ''; end; SMTP.Connect; try showmessage('подключение произведено успешно'); SMTP.Send(IdMessage); finally SMTP.Disconnect; end; end; |
#3
|
||||
|
||||
Кода не выложил так как большую часть делал в конструкторе.
Затем тупо перекатал с вышеуказаной странички:
Код:
IdSMTP1.Connect(10000); Msg.Subject:='тема сообщения'; Msg.Recipients.EMailAddresses:='XXX'; Msg.From.Address:='XXX'; Msg.Body.Text:='текст сообщения'; Msg.Date:=StrToDate('01.12.2004'); Msg.From.Address:='XXX'; Msg.From.Name:='XXX'; If IdSMTP1.Connected = true then IdSMTP1.Send(Msg); IdSMTP1.Disconnect; end; Спасибо за отзыв, сейчас попробую сделать как Вы. B действительно все получилось! Спасибо ещё раз за помощь! =) Последний раз редактировалось XIO, 09.01.2008 в 06:47. |