Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.04.2015, 19:08   #1
Контроль
 
Регистрация: 30.04.2015
Сообщений: 3
Вопрос Не работает сохранение письма в отправленных. IdIMAP41.AppendMsg()

Всем привет.
Пишу программу работы с почтой.
Delphi7 + Indy 10.

Отправка почты работает на отлично.
А вот последующее сохранение письма в отправленных на сервере не происходит.

Вот код отвечающий за сохранение письма:

Код:
IdIMAP41.IOHandler := IdSSLIOHandlerSocketOpenSSL1;
  IdIMAP41.AuthType := iatUserPass;
  IdIMAP41.UseTLS := utUseImplicitTLS;
  IdIMAP41.Username := 'Login';
  IdIMAP41.Password := 'Password';
  IdIMAP41.Host := 'imap.yandex.ru';
 
  try
    IdIMAP41.Connect();
    if (IdIMAP41.AppendMsg('Login', IdMessage1, nil, [])) then
      ShowMessage('Сохранение прошло успешно!')
    else
      ShowMessage('Сохранение завершилось неудачей!');
  except
    ShowMessage('Соединение с сервером завершилось неудачей!');
  end;
    IdIMAP41.Disconnect();
По итогу после отработки

Код:
IdIMAP41.AppendMsg('Login', IdMessage1, nil, [])
мы получаем FALSE и сообщение ('Сохранение завершилось неудачей!').
На сколько я понимаю, соединение с сервером прошло, но по какой-то причине не сохранилось письмо.

Кто сможет подсказать в чем проблема? Спасибо.
Контроль вне форума Ответить с цитированием
Старый 01.05.2015, 19:44   #2
xxbesoxx
Участник клуба
 
Регистрация: 10.08.2010
Сообщений: 1,389
По умолчанию

Цитата:
Сообщение от Контроль Посмотреть сообщение
Вопрос все еще актуален.
1) Я думаю что пара уже забить Delphi7 и переходить боле новое версии , хотя бы XE3 если не выше
2) Смотрите суда http://programmersforum.ru/showthread.php?t=251882 на yandex отправить письмо не когда не было проблема

Последний раз редактировалось xxbesoxx; 01.05.2015 в 19:47.
xxbesoxx вне форума Ответить с цитированием
Старый 01.05.2015, 19:52   #3
Контроль
 
Регистрация: 30.04.2015
Сообщений: 3
По умолчанию

Вы не правильно прочитали мой пост. С отправкой письма проблем и нету. все работает.
Если проблема с внесением этого отправленного письма в список отправленных на сервере яндекса.
PS: ссылка которую вы дали - там обсуждают именно отправку, да еще и по старому протоколу без SSL.

Последний раз редактировалось Контроль; 01.05.2015 в 19:55.
Контроль вне форума Ответить с цитированием
Старый 01.05.2015, 20:06   #4
xxbesoxx
Участник клуба
 
Регистрация: 10.08.2010
Сообщений: 1,389
По умолчанию

Цитата:
Вы не правильно прочитали мой пост.
Да не внимательно почитал
Цитата:
А вот последующее сохранение письма в отправленных на сервере не происходит.
Как вариант можно реализовать что все писамо сохранить .txt файле после отправление. про SSL нечего не скажу
xxbesoxx вне форума Ответить с цитированием
Старый 01.05.2015, 20:42   #5
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
AppendMsg('Login'
А что такое 'Login'? Это что так mailbox назвается?
Первый параметр этого метода - имя ящика на мыле твоем а не Логин
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 01.05.2015, 20:44   #6
Контроль
 
Регистрация: 30.04.2015
Сообщений: 3
По умолчанию

Это и есть имя ящика на сервере. Образно назвал его для Вас "Login".

Или вы имеете ввиду имя папки на сервере?
Контроль вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ловля отправленных пакетов limonin Софт 0 02.08.2013 19:50
Сохранение вложения письма. dima040891 Работа с сетью в Delphi 3 31.05.2013 22:17
IdIMAP41.RetrieveAllHeaders() RikkiTan Работа с сетью в Delphi 0 23.03.2013 23:50
Получить список отправленных писем Terikon Работа с сетью в Delphi 1 02.01.2013 22:29
Подсчёт объёма отправленных данных в TClientSocket Cold_Night Работа с сетью в Delphi 0 06.03.2010 12:56