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

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

Подскажите ссылочку с обучающими самплами по отправке мыла по API [D7, WinXP]


Aleksandr ©   (2004-04-19 18:00:00) 

Задолбался я INDYйскими компонентами пользоваться - кривизна прет из всех щелей. На послать одно письмо еще работает, а на работу с 2000 на прием/на отсылку полный финиш. Подскажите ссылочки, будьте добры, типа "Отправляем мыло ручками" для начинающих! TCP-соединение я уж сам состряпаю, а последовательность, какими и для каких случаев командами должны клиент и сервер обмениваться, я вообще ни в зуб ногой...


Rouse_   (2004-04-20 11:04:00) [1]

Ну раз ручками то:
Отправка SMTP,
http://www.sources.ru/protocols/smtp_learning.shtml

Прием POP3
http://www.sources.ru/protocols/pop3_learning.shtml

Так же почитай
http://rfc.sunsite.dk/rfc/rfc822.html


serg128   (2004-04-20 10:16:00) [2]

// Извини что на билдере, на делфях есть на http://nobat.ru

   TMapiMessage* MapiMessage;
   TMapiRecipDesc* MapiRecipDesc;
   TMapiFileDesc* MapiFileDesc;
   Cardinal MError;
   AnsiString RecipName = "??????";
   AnsiString RecipAddress = "sergp@f1tradenet.com.ua";
   AnsiString Subject = "???? ??????";
   AnsiString NoteText = "";
   AnsiString CurFile2 = "C:\\file.html";

   MapiMessage = new TMapiMessage;
   MapiRecipDesc = new TMapiRecipDesc;
   MapiFileDesc = new TMapiFileDesc;

   MapiRecipDesc->ulReserved = 0;
   MapiRecipDesc->ulRecipClass = MAPI_TO;
   MapiRecipDesc->lpszName = RecipName.c_str();
   MapiRecipDesc->lpszAddress = RecipAddress.c_str();
   MapiRecipDesc->ulEIDSize = 0;
   MapiRecipDesc->lpEntryID = NULL;
   MapiFileDesc->ulReserved = 0;
   MapiFileDesc->flFlags = 0;
   MapiFileDesc->nPosition = 0;
   MapiFileDesc->lpszPathName = CurFile2.c_str(); // ??? NULL ???? ????? ????
   MapiFileDesc->lpszFileName = NULL;
   MapiFileDesc->lpFileType = NULL;
   MapiMessage->ulReserved = 0;
   MapiMessage->lpszSubject = Subject.c_str();
   MapiMessage->lpszNoteText = NoteText.c_str();
   MapiMessage->lpszMessageType = NULL;
   MapiMessage->lpszDateReceived = NULL;
   MapiMessage->lpszConversationID = NULL;
   MapiMessage->flFlags = 0;
   MapiMessage->lpOriginator = NULL;
   MapiMessage->nRecipCount = 1;
   MapiMessage->lpRecips = MapiRecipDesc;
   MapiMessage->nFileCount = 1;
   MapiMessage->lpFiles = MapiFileDesc;
   MError = MapiSendMail(0, reinterpret_cast<unsigned int>(Application->Handle),
   *MapiMessage,  MAPI_DIALOG, 0);
   if (MError) ShowMessage("??????");

   delete MapiMessage;
   delete MapiRecipDesc;
   delete MapiFileDesc;

// MAPI_NEW_SESSION - ??????? ?????? MAPI_DIALOG, ????? ??????? ???????????? ???? ?????????


SammIk   (2004-04-20 08:16:00) [3]

Вот ссылка http://www.protocols.ru/.
Весь саит облазь, есть и то что тебе надо, ну очень подробно.
Поищи в нете статьи по работе с сокетами на апи их тоже то
х..много


Наверх

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