Получение письма с почты

@Dima-nk · Регистрация: 23.04.2013

Студворк — интернет-сервис помощи студентам

Ребять. я получил сообщение с почты, как посмотреть отправителя?
И еще, вместо смс пишет "This is a multi-part message in MIME format"
Как сделать нормально?

@Wi0M · 22.05.2014, 19:24

1. http://lmgtfy.com/?q=%D0%BF%D0... 1%84%D0%B8
2. "This is a multi-part message in MIME format" написано же "Это сообщение из нескольких частей в формате MIME", т.е. свойство объекта TIdMessage "ContentType: string" характеризует формат электронного почтового сообщения - Multipurpose Internet Mail Extensions (MIME). ContentType может иметь значения: text/plain, text/html, text/xml и т.д.

@Dima-nk · 23.05.2014, 14:49 **[ТС]**

Во всем разобрался, кроме того что в сообщении выводит "This is a multi-part message in MIME format".
Помогите кто-то

@Wi0M · 23.05.2014, 14:57

ты походу мое сообщение проигнорировал, да?))

Добавлено через 40 секунд
спасение утопающих, дело рук самих утопающих

Добавлено через 4 минуты
тебе при приеме сообщения нужно выставить в IdMessage.ContentType формат сообщения. если бы ты нажал на ссылку которую я тебе дал, то все у тебя получилось бы)

@Dima-nk · 23.05.2014, 15:18 **[ТС]**

Я пробовал форматы что ты давал. Не помогло

@Wi0M · 23.05.2014, 18:06

а ты перейди по ссылке, и там посмотри, там ты найдешь еще кучу форматов

Добавлено через 2 минуты
капец, вот прям носом ткнуть надо!?

Сразу оговорю тот момент, что при приеме почты нужно анализировать структуру письма, т.е свойство объекта TIdMessage:

property ContentType: string;

которое характеризует формат электронного почтового сообщения - Multipurpose Internet Mail Extensions (MIME). ContentType может иметь значения:

text/plain
text/html
text/xml
text/enhanced
image/jpeg
image/gif
audio/basic
audio/au
video/mpeg
application/octet-stream
application/postscript
application/ms-word
application/ms-excel
application/rtf
multipart/mixed
multipart/alternative
multipart/parallel
multipart/related
message/rfc822
message/external-body

Свойство Msg.Body будет содержать текст письма, в случае, если ContentType представляет собой разновидность текстового содержимого, т.е. text/plain, text/html, text/xml, или text/enhanced. это отдельная подтема и её нужно отдельно изучить.

Добавлено через 22 секунды
вторая ссылка гугла если ввести "получение почты средствами делфи"

Добавлено через 8 минут
и вообще MIME - это значит что тело письма состоит из частей, и нужно искать эти части, а потом каждой из частей нужно провильно еще и CharSet определить.

Добавлено через 7 минут
я тут опять за тебя погуглил немного
http://kbyte.ru/ru/Programming... =art&id=65
http://www.delphisources.ru/fo... php?t=6989

Добавлено через 3 минуты
и вот еще))
ты бы хоть погуглил немного)) и код кинул, как ты письмо то получаешь?

@Dima-nk · 23.05.2014, 23:31 **[ТС]**

Вот кот. Некоторые сообщения открывает, а некоторые нет. И не открывает именно то, что мне нужно

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
smpt:=TIdPOP3.Create(nil);
  smpt.Host:='pop.mail.ru';
  smpt.Port:=110;
    smpt.Username:='fyodor_svinoboj@mail.ru';
    smpt.Password:='LUqOmijIWYZA726';
    smpt.Connect();
    Label1.Caption:=IntToStr(smpt.CheckMessages);
    smpt.Retrieve(smpt.CheckMessages-1, IdMessage1);
 
for c := 0 to IdMessage1.MessageParts.Count - 1 do
 
begin
 
if IdMessage1.MessageParts.Items[c] is TIdAttachment then
 
begin
 
if fileexists(TIdAttachment(IdMessage1.MessageParts.Items[c]).FileName) then
 
deletefile(TIdAttachment(IdMessage1.MessageParts.Items[c]).FileName);
 
TIdAttachment(IdMessage1.MessageParts.Items[c]).SaveToFile(TIdAttachment(IdMessage1.MessageParts.Items[c]).FileName);
 
end
 
else
 
if IdMessage1.MessageParts.Items[c] is TIdText then
 
begin
 
 Memo4.Lines.Clear;
 Memo4.Lines.AddStrings(TIdText(IdMessage1.MessageParts.Items[c]).Body);
 Label2.Caption:=IdMessage1.From.Address;
 
end;
 
end;

@Wi0M · 24.05.2014, 00:52

вот смотри. четвертая ссылка в 6-м сообщении.

memo1.lines.addstring(TidText(mail.messa geparts.item[1]).body

потому что сообщение

This is a multi-part message in MIME format

это и есть тело письма. просто ты не все получаешь. тело письма разбито на части. тебе и нужно их собрать. и сразу скажу, так сказать на опережение, и опять же цитатой из той же последней ссылки

мемо умеет отображать только текст, а хтмл для него - слишком сложно

, в продолжении остается добавить, все теми же цитатами из той же последней ссылки)))

так надо проверять тип части сообщения. Это может быть, например, прицепленный файл. Надо проверять способ кодирования части. Это может быть plain(простой текст), Base64 или QuotedPrintable.

проверку делаю так
if mail.MessageParts.Items[1] is TIdText then
memo.Lines.AddStrings(TIdText(mail.Messa geParts.Items[1]).Body);

вот как то так))

Добавлено через 3 минуты
и ты бы логин с паролем от мыла скрыл бы

@Bagrat · 28.07.2014, 18:09

круто)))))

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@Dima-nk 1 / 1 / 1 Регистрация: 23.04.2013 Сообщений: 210

	Получение письма с почты 22.05.2014, 19:00. Показов 7644. Ответов 8 Метки нет (Все метки) Ребять. я получил сообщение с почты, как посмотреть отправителя? И еще, вместо смс пишет "This is a multi-part message in MIME format" Как сделать нормально? 0

@Wi0M 395 / 123 / 48 Регистрация: 26.10.2013 Сообщений: 734
	22.05.2014, 19:24
	1. http://lmgtfy.com/?q=%D0%BF%D0... 1%84%D0%B8 2. "This is a multi-part message in MIME format" написано же "Это сообщение из нескольких частей в формате MIME", т.е. свойство объекта TIdMessage "ContentType: string" характеризует формат электронного почтового сообщения - Multipurpose Internet Mail Extensions (MIME). ContentType может иметь значения: text/plain, text/html, text/xml и т.д. 2

@Dima-nk 1 / 1 / 1 Регистрация: 23.04.2013 Сообщений: 210
	23.05.2014, 14:49 [ТС]
	Во всем разобрался, кроме того что в сообщении выводит "This is a multi-part message in MIME format". Помогите кто-то 0

@Wi0M 395 / 123 / 48 Регистрация: 26.10.2013 Сообщений: 734
	23.05.2014, 14:57
	ты походу мое сообщение проигнорировал, да?)) Добавлено через 40 секунд спасение утопающих, дело рук самих утопающих Добавлено через 4 минуты тебе при приеме сообщения нужно выставить в IdMessage.ContentType формат сообщения. если бы ты нажал на ссылку которую я тебе дал, то все у тебя получилось бы) 0

@Dima-nk 1 / 1 / 1 Регистрация: 23.04.2013 Сообщений: 210
	23.05.2014, 15:18 [ТС]
	Я пробовал форматы что ты давал. Не помогло 0

@Bagrat 2 / 2 / 1 Регистрация: 06.04.2013 Сообщений: 70
	28.07.2014, 18:09
	круто))))) 0