Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> delphi+email 
:(
    Опции темы
COOLHack
Дата 14.2.2008, 23:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
Подскажите как отправить Файл на мыло?

Видел много разынх кодов, но так и не смог это сделать.
Вечно какие-то ошибки, вообшем обратился сюда, атк как в гугле не нашол.

Хотелось бы пример рабочего кода 

Это сообщение отредактировал(а) COOLHack - 14.2.2008, 23:50
PM MAIL   Вверх
ivan219
  Дата 15.2.2008, 02:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: нет
Всего: 12
Держи.

Присоединённый файл ( Кол-во скачиваний: 49 )
Присоединённый файл  Mail_File.rar 6,70 Kb


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
COOLHack
Дата 15.2.2008, 02:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
А другие варианты есть? этот не совсем подходит
PM MAIL   Вверх
COOLHack
Дата 15.2.2008, 17:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
Неужели это так сложно? 
PM MAIL   Вверх
Snowy
Дата 15.2.2008, 18:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484
Специально для тебя внизу страницы целая коллекция ссылок.
PM MAIL   Вверх
COOLHack
Дата 15.2.2008, 18:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
Я искал, не нашол... По этмоу сюда написал
PM MAIL   Вверх
Snowy
Дата 15.2.2008, 18:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484
www.drkb.ru
PM MAIL   Вверх
COOLHack
Дата 18.2.2008, 01:18 (ссылка) | (голосов:2) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
вСЁ, проблема решена... Появилась новая... Там я смог отправить почту так сказать через мой ящиг, указывал логин, пароль... 

А как отправлять почту так сказать со своего компа?! то есть прям с твоей машины на e-mail?! 
PM MAIL   Вверх
Virtuals
Дата 18.2.2008, 13:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 476
Регистрация: 27.11.2006

Репутация: 2
Всего: 11
отправляем на вася@майл.ру...

коннект майл.ру
юзер вася@майл.ру
для вася@майл.ру
.....
далее как обычно

ЗЫ
но есть несколько но
некоторые спамфильтры:
не примут почту от неизвестного адресата
не примут почту если вы напишете напр... от [email protected] а в реале у вас будет адрес типа dial121.ns1.dialapshik.ru
PM MAIL ICQ   Вверх
Virtuals
Дата 18.2.2008, 14:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 476
Регистрация: 27.11.2006

Репутация: 2
Всего: 11
connect smtp.майл.ру



...
> HELO твой_ип
...
> MAIL FROM:<ТЫ@майл.ру>
...
> RCPT TO:<вася@майл.ру>
...
> DATA
...
> From: ТЫ@майл.ру

> To: вася@майл.ру
> Subject: от меня
> Sender: ТЫ@майл.ру
> Mime-Version: 1.0
> Content-Type: text/plain; charset="iso-1251"
> Date: Mon, 18 Feb 2008 16:09:02 +0500
> 
> привет вася
> .
...
> QUIT


Это сообщение отредактировал(а) Virtuals - 18.2.2008, 14:31
PM MAIL ICQ   Вверх
VKoresh
Дата 18.2.2008, 18:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 67
Регистрация: 14.6.2007
Где: Запорожье

Репутация: нет
Всего: 1
Добрый день!
Не стал постить новую тему.. Эта вроде тоже подходит к моему случаюsmile
Задался я тут целью почтовик написать. И столкнулся с таким траблом - не могу несколько аттачей прикрутить.
Может, кончено, малость корявоsmile
Код

 MailS:  TCustomWinSocket;
...


mails.SendText('Mime-Version: 1.0'+ #13#10) ;
mails.SendText('Subject:'+subj+ #13#10);//тема
mails.SendText('Content-Type: multipart/mixed; boundary="unique-boundary-1"'+ #13#10) ;
mails.SendText(#13#10 );

mails.SendText('--unique-boundary-1'+ #13#10 ) ;
mails.SendText('Content-Type:text/plain;'+ #13#10 ) ;
mails.SendText(#13#10 ) ;
mails.SendText(mes+ #13#10 ) ;//собственно текст сообщения
mails.SendText(#13#10 ) ;


//раз картинка
mails.SendText('--unique-boundary-1'+ #13#10 ) ;
mails.SendText('Content-Type: image/jpeg; name="a0.jpg"'+ #13#10 );
mails.SendText('Content-Transfer-Encoding: base64'+ #13#10 ) ;
mails.SendText(#13#10 ) ;
tms:=tmemorystream.Create;
tms.LoadFromFile('e:\\!!email\a0.jpg');
tms.Position:=0;
setlength(s,tms.Size);
tms.Read(s[1],tms.Size);
MailS.SendText(TIdEncoderMIME.EncodeString(s)+ #13#10 );
mails.SendText(#13#10 ) ;

//два картинка
mails.SendText('--unique-boundary-1'+ #13#10 ) ;
mails.SendText('Content-Type: image/jpeg; name="a1.jpg"'+ #13#10 );
mails.SendText('Content-Transfer-Encoding: base64'+ #13#10 ) ;
mails.SendText(#13#10 ) ;
tms:=tmemorystream.Create;
tms.LoadFromFile('e:\\!!email\a1.jpg');
tms.Position:=0;
setlength(s,tms.Size);
tms.Read(s[1],tms.Size);
MailS.SendText(TIdEncoderMIME.EncodeString(s)+ #13#10 );
mails.SendText(#13#10 ) ;
mails.SendText('--unique-boundary-1--'+ #13#10 ) ;
mails.SendText('.'+ #13#10 ) ;


тут вроде все и без каментов ясноsmile
Да и отсылает он как-то коряво.. приходиться точку потом еще раз отсылать почему-то...
На почту приходит только первая картинка.
Скажите, пожалуйста, где косяк?

Это сообщение отредактировал(а) VKoresh - 18.2.2008, 18:05
PM MAIL ICQ   Вверх
VKoresh
Дата 23.2.2008, 22:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 67
Регистрация: 14.6.2007
Где: Запорожье

Репутация: нет
Всего: 1
Разобрался. 
Косяк в отм, что не надор отсылать каждую строчку отдельно - 
Код

mails.SendText('Mime-Version: 1.0'+ #13#10) ;
mails.SendText('Subject:'+subj+ #13#10);//тема
mails.SendText('Content-Type: multipart/mixed; boundary="unique-boundary-1"'+ #13#10) ;
mails.SendText(#13#10 );
и т.д.


а надо было слать все вместе - 
Код

s:='Mime-Version: 1.0'+ #13#10+
'Subject:'+subj+ #13#10+
'Content-Type: multipart/mixed; boundary="unique-boundary-1"'+ #13#10+
и т.д.

....
mails.SendText(s);


Также вот ЗДЕСЬ лежит описание протокола MIME, причем на русском, все доступно и понятно smile 
Пользуйтесь.
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0519 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.