Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 10.01.2011, 04:53   #1
betirsolt
Форумчанин
 
Регистрация: 20.07.2009
Сообщений: 421
По умолчанию как отправить e-mail с подменой адреса?

всем привет,извините за тему,может кому то не понравиться,но у меня чисто спортивный интерес,есть сайты для отправки емейла с подменой отправителя,я думал что и сам смогу легко это сделать в дельфи следующим образом
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if IsConnectedToInternet then
 begin
idSMTP1.Host:='smtp.mail.ru'; // адресс почтового сервера
idSMTP1.Port:=25;    // порт по которому будет осуществляться подключение
   idSMTP1.Username:='xxx@mail.ru';  // логин пользователя
     idSMTP1.Password:='xxx';     // пароль пользователя
 with IdMessage1 do
      begin
        body.Text:='';
        From.Text := 'yyy@mail.ru';
        Recipients.EMailAddresses := 'xxx@mail.ru';
        Subject := '';
  end;
end;
ну итд т.е просто подставить в
Код:
From.Text := 'yyy@mail.ru';
все что я хочу
но не тутто было,если адреса тут
Код:
idSMTP1.Username:='xxx@mail.ru';
и тут
Код:
From.Text := 'yyy@mail.ru';
не совпадают то прога выдает ошибку
sender address must match autchenticated user
так вот скажите мне как это реализовать?
Уважаемые модераторы, Я всячески стараюсь не нарушать правила сайта, будьте снисходительны
betirsolt вне форума
Старый 10.01.2011, 11:17   #2
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,709
По умолчанию

Найти открытый релей
p51x вне форума
Старый 10.01.2011, 14:16   #3
betirsolt
Форумчанин
 
Регистрация: 20.07.2009
Сообщений: 421
По умолчанию

Цитата:
Сообщение от p51x Посмотреть сообщение
Найти открытый релей
извини что?
Уважаемые модераторы, Я всячески стараюсь не нарушать правила сайта, будьте снисходительны
betirsolt вне форума
Старый 10.01.2011, 14:45   #4
legendary
Форумчанин
 
Аватар для legendary
 
Регистрация: 21.04.2010
Сообщений: 125
По умолчанию

Цитата:
Сообщение от betirsolt Посмотреть сообщение
sender address must match autchenticated user
Нужно идентифицироваться, то есть что бы отправить с xxx@mail.ru надо знать пароль!!!!!
Цитата:
Сообщение от betirsolt Посмотреть сообщение
так вот скажите мне как это реализовать?
На делфи не знаю(вполне возможно что ни как).
Цитата:
Сообщение от betirsolt Посмотреть сообщение
есть сайты для отправки емейла с подменой отправителя
Только 95% таких сайтов нерабочие!
Вот скрипт(рабочий) и не парся(знаю твой спортивный интерес-)))
PHP код:
<?php

  
//Параметры письма

  
$subject 'Заголовок письма';

  
$message 'текст';

  
$from_name '';

  
$from_mail 'support@mail.ru';  //))))))))))))

  
$to 'xxx@mail.ru';

$priority 1//приоритет, от 1 до 3

//Заголовки письма 

  
$body "$message\n"

  
$from "$from_name <$from_mail>"

  
$headers "Content-Type: text/html; charset=windows-1251\n"

  
$headers .= "From: $from_mail\n"

  
$headers .= "X-Mailer: The Bat! 2005\n"

  
$headers .= "X-Priority: $priority\n"

//Отправка письма

  
mail($to,$subject,$body,$headers); 

?>
будут вопросы, обращайся!

Последний раз редактировалось legendary; 10.01.2011 в 14:58.
legendary вне форума
Старый 10.01.2011, 18:52   #5
betirsolt
Форумчанин
 
Регистрация: 20.07.2009
Сообщений: 421
По умолчанию

Цитата:
Сообщение от legendary Посмотреть сообщение
Нужно идентифицироваться, то есть что бы отправить с xxx@mail.ru надо знать пароль!!!!!
На делфи не знаю(вполне возможно что ни как).
Только 95% таких сайтов нерабочие!
Вот скрипт(рабочий) и не парся(знаю твой спортивный интерес-)))
будут вопросы, обращайся!
мне реально просто интересно самому это сделать, так как я знаю реальный рабочий сайт который предоставляет эту услугу, а с этим скриптом че мне делать? я пхп не знаю,как заставить все это работать?
Уважаемые модераторы, Я всячески стараюсь не нарушать правила сайта, будьте снисходительны
betirsolt вне форума
Старый 11.01.2011, 14:35   #6
TilerDerton
Пользователь
 
Регистрация: 12.02.2009
Сообщений: 34
По умолчанию

Цитата:
Сообщение от betirsolt Посмотреть сообщение
мне реально просто интересно самому это сделать, так как я знаю реальный рабочий сайт который предоставляет эту услугу, а с этим скриптом че мне делать? я пхп не знаю,как заставить все это работать?
Осмелюсь предположить, что данный сайт работает на подобном скрипте.
Как вариант - через те же "гет/пост" заполнить форму отправки на сайте=)
Т.е. программа обращается к сайту, а он делает всю работу.
(Хотя, это скорее в раздел о работе с сетью)
TilerDerton вне форума
Старый 11.01.2011, 15:56   #7
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

Подсказка: чем отличается SMTP клиент от SMTP сервера? И какие функции выполняет полседний? И кем, клиентом или сервером, является TIdSMTP?
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума
Старый 11.01.2011, 17:17   #8
legendary
Форумчанин
 
Аватар для legendary
 
Регистрация: 21.04.2010
Сообщений: 125
По умолчанию

Цитата:
Сообщение от GunSmoker Посмотреть сообщение
Подсказка: чем отличается SMTP клиент от SMTP сервера? И какие функции выполняет полседний? И кем, клиентом или сервером, является TIdSMTP?
Я пробивал отправлять мейл с подменой отправителя прогой написанной на чистом WinSock и все равно не сработало так как mail.ru(и многие другие) запретил доступ до мыла без идентификации.
legendary вне форума
Старый 11.01.2011, 17:20   #9
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

(вздох) да ничего вы не поняли.
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума
Старый 11.01.2011, 17:55   #10
legendary
Форумчанин
 
Аватар для legendary
 
Регистрация: 21.04.2010
Сообщений: 125
По умолчанию

Цитата:
Сообщение от GunSmoker Посмотреть сообщение
(вздох) да ничего вы не поняли.
Так объясните(хоть это и не моя тема)! а то у всех ваших постах только вот такие намеки и предположения! никогда нет ничего по сути проблемы!
P.S. не удивлюсь что после этого поста вы пожалуйтесь и я получу бан, но это будет только подтверждением моих слов!!!!(вы никому ничего не обязаны обеднять, но и все время отвечать типа “пойди туда не знаю куда и принеси то не знаю что” тоже не нужно)(выдох).
legendary вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как отправить на E-Mail текст используя компонент Indy!!!??? $T@LKER Помощь студентам 6 16.05.2010 13:34
Как програмно отправить письмо на E-mail ? SG13 Работа с сетью в Delphi 2 13.06.2008 12:50
Подскажите как отправить E-mail из программы... Артем Чижук Общие вопросы Delphi 1 07.06.2008 08:47