Поиск:

Ответ в темуСоздание новой темы Создание опроса
> как отправить Mail, отправить Mail 
:(
    Опции темы
A5uKa
Дата 18.1.2009, 22:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



Как отправить email ? 
себе с другого компьютера...

знаю, что вопрос не простой  smile 
PM   Вверх
Данкинг
Дата 18.1.2009, 23:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Indy ?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
A5uKa
Дата 18.1.2009, 23:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



IdTCPclient ? ... а дальше в чём идея :/ 
есть ли что-нить в SDK чтобы отправить ?
PM   Вверх
Данкинг
Дата 18.1.2009, 23:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



A5uKa, внизу страницы посмотри топики.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
A5uKa
Дата 19.1.2009, 00:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



ok

а можете этот испанский код прокомментировать

#include <NMsmtp.hpp>
#include <Psock.hpp>

Код:

TMemo* mInfo;
// Код
bool MyForm::sendMail ()
{
bool result = true;
if (mInfo->Lines->Count &&
!reg->getMailAddress ().IsEmpty () &&
!reg->getMailFrom ().IsEmpty () &&
!reg->getMailHost ().IsEmpty ())
{
TNMSMTP* SMTP = new TNMSMTP(0);
try
{
SMTP->PostMessage->FromName = "Argumentario";
SMTP->PostMessage->ToAddress->Add (reg->getMailAddress ());
SMTP->PostMessage->FromAddress = reg->getMailFrom ();
SMTP->Host = reg->getMailHost ();
SMTP->PostMessage->Subject = "Argumentario Report";
SMTP->PostMessage->Body->Text = mInfo->Text;
SMTP->Connect();
SMTP->SendMail();
}
catch (Exception& E)
{
report ("Imposible enviar e-mail: " + E.Message);
result = false;
}
delete SMTP;
} else
{
report ("No se encuentra configurado el env?o del mail.");
}
return result;
}

я вот не понимаю что лежит в hpp этих файлах

Это сообщение отредактировал(а) A5uKa - 19.1.2009, 00:00
PM   Вверх
Данкинг
Дата 19.1.2009, 00:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(A5uKa @  19.1.2009,  00:00 Найти цитируемый пост)
а можете этот испанский код прокомментировать

Перевести, что ли? smile 

Цитата(A5uKa @  19.1.2009,  00:00 Найти цитируемый пост)
report ("Imposible enviar e-mail: " + E.Message);

Невозможно отправить почту.

Цитата(A5uKa @  19.1.2009,  00:00 Найти цитируемый пост)
report ("No se encuentra configurado el env?o del mail.");

Не обнаружены настройки почты.

А пример вроде как аналогичный и здесь есть. smile 





--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
A5uKa
Дата 19.1.2009, 00:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



Не могу найти свой хост smtp.mail.ru и 2525 порт не помогает...
PM   Вверх
Данкинг
Дата 19.1.2009, 01:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(A5uKa @  19.1.2009,  00:57 Найти цитируемый пост)
Не могу найти свой хост smtp.mail.ru

В смысле, не можешь найти??


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
A5uKa
Дата 19.1.2009, 01:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



Код

First chance exception at $7C812AEB. Exception class EIdSocketError with message 'Socket Error # 11001
Host not found.'. Process Project1.exe (1592)


выскакивает на строчке
Код

IdSMTP1->Connect(10000); //Соединяемся с сервером


Добавлено через 6 минут и 17 секунд
IdSMTP1->Connect(10000); //Соединяемся с сервером

тут ошибку пишет что-то про сокеты и что не может найти Host...
PM   Вверх
Данкинг
Дата 19.1.2009, 03:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(A5uKa @  19.1.2009,  01:38 Найти цитируемый пост)
тут ошибку пишет что-то про сокеты и что не может найти Host... 

Покажи свой полный код...


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
A5uKa
Дата 19.1.2009, 13:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



Код

IdSMTP1->AuthType=satDefault; //У меня 2009 ая рад студио тут так... Надеюсь так...
IdSMTP1->Username="[email protected]"; //Ваш логин
IdSMTP1->Password="Censored"; // Пароль вашего мыла
IdSMTP1->Host="smtp.mail.ru"; // URL smtp сервера
IdSMTP1->Port=2525;
 //Письмо
IdMessage1->Body->Text="Censored";  // Текст письма
IdMessage1->From->Text="[email protected]"; //  От кого
IdMessage1->Recipients->EMailAddresses="[email protected]"; //Кому
IdMessage1->Subject="Censored"; //тема сообщения
 //Прикрепляем файл
// new TIdAttachment(IdMessage1->MessageParts,"C:\фото.jpg");
  //Отправка
IdSMTP1->Connect(10000); //Соединяемся с сервером
IdSMTP1->Send(IdMessage1); //Отправляем письмо
IdSMTP1->Disconnect(); //Разрываем связь с сервером


Код

First chance exception at $7C812AEB. Exception class EIdSocketError with message 'Socket Error # 11001
Host not found.'. Process Project1.exe (1592)

PM   Вверх
Данкинг
Дата 19.1.2009, 16:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



А что за логин странный такой, [email protected] ? Нужно такой логин, какой ты указываешь при входе в почту, т.е.  Censored. И попробуй время соединения убрать из .Connect().

Это сообщение отредактировал(а) Данкинг - 19.1.2009, 16:24


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
A5uKa
Дата 19.1.2009, 16:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



на mail ru я указываю логин целиком вроде...
пробую...

у меня есть тут сомнения небольшие 
IdSMTP1->AuthType=satDefault;

Это сообщение отредактировал(а) A5uKa - 19.1.2009, 16:29
PM   Вверх
A5uKa
Дата 19.1.2009, 20:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: 2
Всего: 16



Работает , но аномально что не везде ...
PM   Вверх
Данкинг
Дата 19.1.2009, 22:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(A5uKa @  19.1.2009,  16:28 Найти цитируемый пост)
на mail ru я указываю логин целиком вроде...

Да ладно, зайди на сайт, посмотри. smile 

Цитата(A5uKa @  19.1.2009,  16:28 Найти цитируемый пост)
IdSMTP1->AuthType=satDefault;

atLogin надо.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

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

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

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


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




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


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

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