|
Вопрос # 6 673/ вопрос открыт / |
|
Приветствую, уважаемые эксперты!
Пытаюсь получить письмо с mail.ru с помощью IdPOP3.
Не могу расшифровать IdMessage1.Subject
Вместо кириллицы вопросики.
По всему интернету решение проблем только отправки, а получения не нашел.
 |
Вопрос задал: вел (статус: Посетитель)
Вопрос отправлен: 26 августа 2017, 21:10
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 19; последнее сообщение — 27 августа 2017, 17:58; участников в обсуждении: 2.
|
min@y™ (статус: Доктор наук), 26 августа 2017, 21:14 [#1]:
Цитата (вел):
Не могу расшифровать IdMessage1.Subject
а остальное?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
вел (статус: Посетитель), 26 августа 2017, 21:16 [#2]:
текст прекрасно расшифровывается с помощью utf8toansi()
|
|
|
вел (статус: Посетитель), 26 августа 2017, 21:23 [#3]:
в тексте мне шлют html <META HTTP-EQUIV='Content-type' CONTENT='text/html; charset=UTF-8>
соответственно выдираю текст utf8toansi(IdMessage1.body.text)
а с темой чет вообще не пойму. тема приходит такой, какой её при отправке зашифровали? или с mail.ru все письма с темой в одинаковой кодировке приходят?
|
|
|
min@y™ (статус: Доктор наук), 26 августа 2017, 21:26 [#4]:
сюда смотри
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
вел (статус: Посетитель), 26 августа 2017, 21:32 [#5]:
да я это по нескольку раз читал.
нету в теме никаких "=?ISO-" и "=?+Windows-1251".
просто по одному вопросику на каждый символ кириллицы.
или я чет не догоняю
|
|
|
вел (статус: Посетитель), 26 августа 2017, 21:36 [#6]:
IdDecoderMIME тоже не помогает.
причем вопросиками только кириллица. цифры и точки я вижу нормально
|
|
|
min@y™ (статус: Доктор наук), 26 августа 2017, 21:41 [#7]:
Сохрани в файл методом SaveToFile() и дай сюда.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
вел (статус: Посетитель), 26 августа 2017, 21:57 [#9]:
блин там все вопросики "3f". причем это письмо почтовый клиент foxmail прекрасно скачал и показал тему
|
|
|
min@y™ (статус: Доктор наук), 26 августа 2017, 21:58 [#10]:
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
min@y™ (статус: Доктор наук), 26 августа 2017, 22:09 [#12]:
Ну и чего ты от меня хочешь?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
min@y™ (статус: Доктор наук), 26 августа 2017, 22:10 [#13]:
Цитата (вел):
чет я не понял где это
Это был пример.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
вел (статус: Посетитель), 26 августа 2017, 22:12 [#14]:
извини, если напрягаю.
я сюда пришёл помощи искать.
это письмо почтовый клиент нормально скачал.
|
|
|
min@y™ (статус: Доктор наук), 26 августа 2017, 22:19 [#15]:
Скачай пример по Indy, скомпили и проверь.
Мне некогда щас этим заниматься, я очень занят.
Обратись сюда, скажи, что от меня, там помогут.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
вел (статус: Посетитель), 26 августа 2017, 22:19 [#16]:
вот так я его получаю:
IdPOP31:=tIdPOP3.Create;
IdSSHandler1:=TIdSSLIOHandlerSocketOpenSSL.Create;
IdPOP31.IOHandler:=IdSSHandler1;
IdPOP31.UseTLS:=utUseImplicitTLS;
IdMessage1:=tidmessage.Create;
IdPOP31.Host:='pop.yandex.ru';
IdPOP31.Port:=995;
IdPOP31.Username:='info@forummm.biz';
IdPOP31.Password:='123';
IdPOP31.Connect;
i1:=IdPOP31.CheckMessages;
showmessage(inttostr(i1));
IdPOP31.Retrieve(1,IdMessage1);
IdMessage1.SaveToFile('c:17.123');
|
|
|
вел (статус: Посетитель), 26 августа 2017, 22:20 [#17]:
ок, спасибо
|
|
|
вел (статус: Посетитель), 27 августа 2017, 14:58 [#18]:
Скомпилил indy maildemo, та же проблема. В теме писем "3F" вместо русских букв.
|
|
|
вел (статус: Посетитель), 27 августа 2017, 17:58 [#19]:
решил вопрос через RetrieveRaw
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
