Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отправить почту при помощи Delphi [D5, D7, Win2k]


Страницы:   1 2

stelius ©   (2005-08-08 12:52:00) 

Как в делфи создать и отправить письмо с прикрепленным файлом?


stelius   (2005-08-16 14:31:00) [1]

Thnx 2 all


pepper   (2005-08-16 13:31:00) [2]

Предлагаю пример для ВСЕМИ ЛЮБИМОГО INDY (кроме меня...)

         //---размер превышает все установленные рамки-----
         if LMDFileCtrl1.FileSize div 1024>maxsize then
         begin
           try
             tt:=IntToStr(MaxSize);
             Memo1.Lines.Add('размер файла превышает: '+tt+' кб');

             // оправляем его со злостью отправителю
               IdMessage2.Recipients.EMailAddresses:=IdMessage1.From.Address;
             IdMessage2.From.Text:=ServerUser[i];
             IdMessage2.Body.Text:=SMTPBODYTEXT;
             IdMessage2.Subject:=SMTPSUBJECT;
             IdSMTP1.AuthenticationType:= atNone;
             IdSMTP1.Host:= SMTPHOST;
             IdSMTP1.Port:=StrToInt(SMTPPORT);
             IdSMTP1.Connect;
             Application.ProcessMessages;
             IdMessage2.Body.Text:= WintoKoi(SMTPBODYTEXT);
             TIdAttachment.Create( IdMessage2.MessageParts, Patch+'\TEMP\'+InlineDecode(fnam,cs) );
             try
               IdSMTP1.Send(IdMessage2);
               KillMessage(intIndex);
               DeleteFile(Patch+'\TEMP\'+InlineDecode(fnam,cs));
             finally
               IdSMTP1.Disconnect;
               IdMessage2.MessageParts.Clear;
             end;

           except
           end;
         end //--превышает все установленные рамки--


stelius   (2005-08-16 09:21:00) [3]

Решил использовать инди, т.к. ниче ставить не надо и задачка разовая.
Знаю вопрос ламерский, просьба камнями не кидать...

Не ясно мне как атачмент присобачить?


Eraser   (2005-08-11 18:39:00) [4]

Hose   (11.08.05 18:32) [19]
а там патчить ничего не придется? как он с русским дружит?


Прийдётся ПОЛНОСТЬЮ убить старую версию Indy, включая все runtime паеты и исходные тексты, и только после этого устанавливать новую версию Indy. Подробная инструкция по "убийству" приводится в дистрибутиве новой Инди.
Как вариант можно при установке Делфи не устанавливать "родной" Инди. Потом процесс установки нового Инди будет вообще без проблем.


Hose   (2005-08-11 18:32:00) [5]


> Eraser ©   (11.08.05 14:18) [17]
> pepper ©   (11.08.05 09:41) [15]
>
> Так а кто про ранние версии говорит-то? А имею ввиду 10,
> ну в крайнем случае 9! С другими и не работал.


про версии вообще-то перец что-то говорил :))

> Советую устанвить Indy 10, если он конечно установиться
> на Д6, я слышал что устанавливается... в крайнем случае
> ставь Indy 9.
> С I8 проблем много, AFAIK.
>
> Скачивать отсюда http://www.indyproject.org/


а там патчить ничего не придется? как он с русским дружит?


Eraser   (2005-08-11 14:21:00) [6]

Hose   (11.08.05 12:58) [16]
да обычная у меня версия. из стандартной поставки Д6


Это и есть ранняя версия )
Советую устанвить Indy 10, если он конечно установиться на Д6, я слышал что устанавливается... в крайнем случае ставь Indy 9.
С I8 проблем много, AFAIK.

Скачивать отсюда http://www.indyproject.org/


Eraser   (2005-08-11 14:18:00) [7]

pepper ©   (11.08.05 09:41) [15]

Так а кто про ранние версии говорит-то? А имею ввиду 10, ну в крайнем случае 9! С другими и не работал.


Hose   (2005-08-11 12:58:00) [8]


> > Hose   (10.08.05 17:41) [13]
> > лично я Indy использую и очень доволен..
>
> Тебе повезло с версией...она у тебя старше моей.....я аж
> за сердце схватился......

да обычная у меня версия. из стандартной поставки Д6. просто ребята из Indy не знают, что есть такая страна Россия. а так все классно работает.
хотя...
вот логер их у меня в автомате не заработал.


pepper   (2005-08-11 09:41:00) [9]


> Fay ©   (10.08.05 20:28) [14]
> Согласен, synapse (после напильника, конечно) очень хороши!


Eraser
>Я считаю, что Indy грамотней )


Гы гы ну не знаю не знаю.......на мой взгляд indy (ранние версии) хороши только после принятия определенной дозы спиртного....


> Hose   (10.08.05 17:41) [13]
> лично я Indy использую и очень доволен..

Тебе повезло с версией...она у тебя старше моей.....я аж за сердце схватился......


Fay   (2005-08-10 20:28:00) [10]

2 pepper ©   (10.08.05 9:47) [11]
Согласен, synapse (после напильника, конечно) очень хороши!


Hose   (2005-08-10 17:41:00) [11]

лично я Indy использую и очень доволен. правда пришлось немножко их сырцы подправить "что бы русский subject не корежило" :)) ну и от еще кое-каких радостей избавиться.


Eraser   (2005-08-10 15:49:00) [12]

pepper ©   (10.08.05 09:47) [11]
Я Вас советую взять грамотную библиотеку (сейчас камни в меня полетят - нащел скажут грамотную),SYNAPSE с исходниками, а не заморачиваться со всякими INDY,так как старые версии не могут нормально работать с русскими кодировками...


Я считаю, что Indy грамотней )


pepper   (2005-08-10 09:47:00) [13]

Че вы бедного чувака глюкуете, потом все форумы будут забиты его сообщениями "Как мне сделать, что бы русский subject не корежило, или че у меня за закорючки в тексте письма"    
Я Вас советую взять грамотную библиотеку (сейчас камни в меня полетят - нащел скажут грамотную),SYNAPSE с исходниками, а не заморачиваться со всякими INDY,так как старые версии не могут нормально работать с русскими кодировками...

Synapse homesite
is at http://www.ararat.cz/synapse/


Eraser   (2005-08-09 19:31:00) [14]

stelius ©

Копай в сторону компонентов Indy.


Fay   (2005-08-09 19:25:00) [15]

2 stelius ©   (09.08.05 18:07) [8]
Всё таки лучше отправлять на прямую компонентами SMTP.


stelius   (2005-08-09 18:07:00) [16]

2 Fay ©   (09.08.05 15:14) [7]
почитал я сие, там не при помощи MAPI сделано
я новичок в этом... разбираться так досконально нет времени
неужеи в MAPI нет что нибудь параметра типа NOT_SHOW_DIALOG


Fay   (2005-08-09 15:14:00) [17]

2 stelius ©   (09.08.05 13:55) [6]
см [4]


stelius   (2005-08-09 13:55:00) [18]

неужели нельзя избавиться от диолога подтверждения (см. [5])


stelius   (2005-08-08 18:57:00) [19]

а при помощи МАPI нельзя сделать так чтобы окошко с подтверждением отправки сообщения не вылетало?


Наиль   (2005-08-08 17:30:00) [20]

Всё таки лучше отправлять на прямую компонентами SMTP.
Какой выбрать - решать тебе, а о том как они работаю читай здесь:
http://www.delphimaster.ru/articles/smtp/index.html
Помоему там имеется даже образец программы и ссылки на компонент.
PS. Сам я отправлял только через вызов программы Rar.exe с необходимыми ключами. Удобно, заархивировал и отправил.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо