HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

[Delphi] как отправить данные на email?
  #1  
Старый 15.04.2010, 23:55
donka
Познающий
Регистрация: 07.10.2009
Сообщений: 37
Провел на форуме:
170871

Репутация: -4
Thumbs up [Delphi] как отправить данные на email?

Всем привет!
Кто ни будь подскажите как зделать на delphi
отправку на e-mail тока что б пользователь об этом не чего не знал)))
В нэте шарил не чё полезного не нашёл(
Всем спс!!!)))
 
Ответить с цитированием

  #2  
Старый 16.04.2010, 00:06
slesh
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


По умолчанию

херово значит шарил.
http://www.google.ru/search?hl=ru&newwindow=1&q=%D1%84%D0%B0%D0%B9%D0%B B+email+Delphi&lr=&aq=f&aqi=&aql=&oq=&gs_rfai=
Выдает кучу сайтов.
Вот допустим пример:
http://forum.ru-board.com/topic.cgi?forum=33&topic=10146

Вот я не понимаю, что впадлу было вбить в гугле чтоли?
Если нужно на WinSock - то на форуме был пример как отправить письмо.
Если нужно чтобы фаер ничего не сказал, забей на это.
 
Ответить с цитированием

  #3  
Старый 16.04.2010, 00:34
FeRiuS
Познающий
Регистрация: 26.02.2010
Сообщений: 76
Провел на форуме:
522804

Репутация: 16
По умолчанию

По форуму поискал бы..
_http://forum.antichat.ru/showpost.php?p=2067379&postcount=6127
 
Ответить с цитированием

  #4  
Старый 16.04.2010, 11:01
donka
Познающий
Регистрация: 07.10.2009
Сообщений: 37
Провел на форуме:
170871

Репутация: -4
По умолчанию

Не получается((Мне надо примерчик если не сложно
 
Ответить с цитированием

  #5  
Старый 16.04.2010, 11:03
TrueBit
Познающий
Регистрация: 21.11.2009
Сообщений: 77
Провел на форуме:
2482290

Репутация: 29
По умолчанию

Цитата:
Сообщение от donka  
Не получается((Мне надо примерчик если не сложно
Что именно не получается?
 
Ответить с цитированием

  #6  
Старый 16.04.2010, 11:11
donka
Познающий
Регистрация: 07.10.2009
Сообщений: 37
Провел на форуме:
170871

Репутация: -4
По умолчанию

Мне надо отправить текст с edit1 и edit2 сообщением на мыло!Яндекс или майл роли не играет)
 
Ответить с цитированием

  #7  
Старый 16.04.2010, 11:14
TrueBit
Познающий
Регистрация: 21.11.2009
Сообщений: 77
Провел на форуме:
2482290

Репутация: 29
По умолчанию

Цитата:
Сообщение от donka  
Мне надо отправить текст с edit1 и edit2 сообщением на мыло!Яндекс или майл роли не играет)
ну и в чём проблема? тебе же дали ссылку на кусок кода, в котором нужно изменить данные под себя и всё
.......
Вот видео- урок в котором всё показано тыц

Последний раз редактировалось TrueBit; 16.04.2010 в 11:28..
 
Ответить с цитированием

  #8  
Старый 16.04.2010, 11:55
cheater_man
Постоянный
Регистрация: 13.11.2009
Сообщений: 437
Провел на форуме:
709575

Репутация: 17
По умолчанию

Цитата:
Сообщение от donka  
Мне надо отправить текст с edit1 и edit2 сообщением на мыло!Яндекс или майл роли не играет)
Хорош тупить тебе FeRiuS пример дал!
 
Ответить с цитированием

  #9  
Старый 16.04.2010, 19:52
ilyhamas
Новичок
Регистрация: 25.10.2009
Сообщений: 22
Провел на форуме:
179346

Репутация: 0
По умолчанию

Код:
idsmtp1.Host:='smtp.yandex.ru';
idsmtp1.Port:=25;
idsmtp1.Username:=Edit1.text;
idsmtp1.Password:=Edit4.text;
idmessage1.Body.text:=memo1.Text;
idmessage1.from.Text:=Edit5.Text;
idmessage1.Recipients.EMailAddresses:=edit3.Text;
idmessage1.Subject:=Edit2.text;
idsmtp1.Connect();
idsmtp1.Send(idmessage1);
idsmtp1.Disconnect;
 
Ответить с цитированием

  #10  
Старый 17.04.2010, 00:04
donka
Познающий
Регистрация: 07.10.2009
Сообщений: 37
Провел на форуме:
170871

Репутация: -4
Thumbs up

Цитата:
Сообщение от ilyhamas  
Код:
idsmtp1.Host:='smtp.yandex.ru';
idsmtp1.Port:=25;
idsmtp1.Username:=Edit1.text;
idsmtp1.Password:=Edit4.text;
idmessage1.Body.text:=memo1.Text;
idmessage1.from.Text:=Edit5.Text;
idmessage1.Recipients.EMailAddresses:=edit3.Text;
idmessage1.Subject:=Edit2.text;
idsmtp1.Connect();
idsmtp1.Send(idmessage1);
idsmtp1.Disconnect;
я так делал но потом ошибку выдаёт Socket Error #10060 Connection timed out у меня Windows 7
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Халявный интернет или как спрятаться надежнее чем VPN или SSH с цепочкой соксов. kodzero Статьи 20 06.08.2010 23:54
Юмор. Анекдоты, смешные рассказы/логи. Mobile Болталка 1356 16.06.2010 16:46



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.