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

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

Отправить файл на E-Mail [D7, XP]


Миша ©   (2008-03-27 09:15:00) 

Подскажите как это сделать или какие компоненты использовать???
P.S Желательно, что бы при отправке пользователь не знал об отсылке письма.


zdm77   (2008-03-27 10:13:00) [1]

uses IdAttachmentFile


zdm77   (2008-03-27 10:08:00) [2]

какие компоненты ты сбросил на форму?


Миша   (2008-03-27 10:04:00) [3]

Здесь ошибка, говорит нет такого компонента "TIdAttachmentFile"

TIdAttachmentFile.Create(IdMessage1.MessageParts,'путь к вложеному файлу') ;


zdm77   (2008-03-27 10:00:00) [4]

uses
 ....., IdTCPConnection, IdTCPClient, IdExplicitTLSClientServerBase, IdMessageClient,
 IdSMTPBase, IdSMTP,IdAttachmentFile, IdMessage,....


zdm77   (2008-03-27 09:59:00) [5]

нет не визуальный
Кидаешь на форму IDMessage , а она имеет сие свойство


Миша   (2008-03-27 09:40:00) [6]

Простите, IdAttachmentFile визуальный компонент? Что то найти не могу... :(


zdm77   (2008-03-27 09:37:00) [7]

на счет прокси, если ошибусь, мастера поправят. У меня работает во всяком случае.
Proxy определяется в IE, исключения адресов в сетевом окружении. И система "пляшет" от них. Т.е. если все прописано, проблем быть недолжно. Явных указаний в INDY на proxy я не встречал.


Миша   (2008-03-27 09:34:00) [8]

2 zdm77

Спасибо, сейчас попробую ...


zdm77   (2008-03-27 09:27:00) [9]

ой наврал в первых строчках, HOST='smtp.mail.ru' а ADRESS=отправитель


zdm77   (2008-03-27 09:26:00) [10]

сама отправка типа такой фигни на скорую руку
try        
       IdSMTP1.Host:=EditSMTP.Text;
       IdMessage1.from.Address := 'smtp.mail.ru';
       IdMessage1.Recipients.Add;
       IdMessage1.Recipients.Items[0].Address := 'qqq@mail.ru';
       IdSMTP1.Connect;
       if IdSMTP1.Connected=true then
       begin
        TIdAttachmentFile.Create(IdMessage1.MessageParts,'путь к вложеному файлу') ;
       end;
       IdSMTP1.Send(IdMessage1) ;
       IdSMTP1.Disconnect;
     Except
       Application.MessageBox ('Невозможно соедениться с сервером, повторите попытку позже или обратитесь к системному администратору','ОШИБКА',MB_OK);
     end;


Миша   (2008-03-27 09:25:00) [11]

2 zdm77

Еще вопрос, Интернет установлен через прокси-сервер. Indy поможет ?


zdm77   (2008-03-27 09:22:00) [12]

INDY тебе поможет. Но с P.S. - боюсь облом


Palladin   (2008-03-27 09:20:00) [13]

это почему это он не должен об этом знать?


Наверх

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