powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / чтение входящей почты\vbnet
10 сообщений из 10, страница 1 из 1
чтение входящей почты\vbnet
    #38700043
majhool001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте.
Следующая проблема:
Как можно реализовать чтение входящей почты (mail.ru) с выводом текста письма на форму?
И если есть вложение - с возможностью его скачать.
По типу того что на рисунке:
Т.е получает список писем и можно просмотреть каждое.

То что использовал ранее
http://www.cyberforum.ru/vb-net/thread343195-page4.html#post4211423
Но там письмо приходит с ненужной пользователю информацией:
Вот так:
http://s12.postimg.org/fvrk6av7x/image.png

Модератор: Тема перенесена из форума "Visual Basic".
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700223
Arm79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
majhool001Как можно реализовать чтение входящей почты (mail.ru)
pop3 либо через MAPI с помощью популярных почтовых программ

majhool001с выводом текста письма на форму?
html формат - через WebBrowser
rtf - через RichTextBox
(для WPF не знаю)

Либо встроить в свое приложение через Ole какой-нибудь просмотрщик

majhool001Но там письмо приходит с ненужной пользователю информацией
То, что у вас на скриншоте - это не ненужная для пользователя информация. Это внутренности e-mail в сыром виде, до MIME-преобразований.
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700388
majhool001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Arm79,
есть ссылка на рабочий вариант под вин.формс? я нашел для асп.нет только http://tiny.cc/flo6ix
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700416
Arm79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ссылка на рабочий вариант чего? Почтовика? TheBat!, Outlook, Thunderbird

Сам я не занимался такой странной задачей. Вот получать письма и парсить их, получать значения - было дело.
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700424
majhool001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Arm79,

у меня задача такая -
на почту приходят письма с содержанием -
1)сообщение от преподавателя
2)файл в zip с самим домашним заданием
приходят на почтовый ящик.
мне нужно получить список сообщений пришедших на почту с возможностью их просматривать и скачать вложение.
что лучше использовать?
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700433
Arm79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
чем аутлук не устраивает? зачем нужно писать самому?
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700443
majhool001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Arm79,

ну задание такое дали.
не знаю как реализовать.
отправка понятно,а получить как в таком формате - нет.
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700453
Arm79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тогда просто:
1) Находите любую библиотеку, работающую с Pop3
2) Скачиваете в сыром виде письма
3) Находите любой MIME-парсер
4) С помощью парсера транформируете заголовки и содержание письма в нормальный вид
5) получаете список частей, из которых состоит письмо
6) Нужные вам части отображаете на форме
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700461
petalvik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
majhool001отправка понятно
С этого места поподробней. Как отправляешь?
...
Рейтинг: 0 / 0
чтение входящей почты\vbnet
    #38700475
majhool001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
petalvik,

Dim email As New MailMessage
Dim smtp As SmtpClient
poluchatel = ComboBox2.SelectedItem
smtp = New SmtpClient(smtp1)
smtp.Credentials = New Net.NetworkCredential(mail, parol)
email.From = New MailAddress(mail)
email.To.Add(New MailAddress(poluchatel))
email.Body = TextBox1.Text
email.Subject = TextBox2.Text
If TextBox3.Text <> "" Then
email.Attachments.Add(New System.Net.Mail.Attachment(TextBox3.Text))
End If
smtp.Send(email)
MsgBox("Сообщение отправлено")
TextBox3.Clear()
TextBox2.Clear()
TextBox1.Clear()
ComboBox1.SelectedIndex = -1
TextBox1.Text = vbCrLf + "Сообщение отправлено:" + mail
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / чтение входящей почты\vbnet
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]