Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Инди давай быстрее, быстрее! [D7, WinXP]

Страницы: < 1 2 3 >
barakuda © (2006-08-17 11:51:00)
Делаю рассылку, ниже приведенный алгоритм, работает просто великолепно, но на одно письмо уходит 15-20 сек. (БЕЗ АТАЧА),
в базе 800-1500 клиентов, Цикл рассылки будет вечно длится

Кто, что, посоветует

procedure TForm1.cxButton1Click(Sender: TObject);
begin
IdMessage1.Clear;
IdMessage1.From.Text :=cxtextEdit1.Text;
IdMessage1.ReplyTo.EMailAddresses:=cxtextEdit1.Text;
IdMessage1.Recipients.EMailAddresses:=cxtextEdit2.Text;
IdMessage1.Date:=Date;
IdMessage1.Subject:=cxtextEdit3.Text;
IdMessage1.Priority:=mpNormal;
IdMessage1.Body.Assign(cxMemo1.Lines);
if not (cxtextEdit4.Text='') then TIdAttachment.Create(IdMessage1.MessageParts,cxtextEdit4.Text); //Attache le fichier

IdSMTP1.AuthenticationType:=atLogin; //Type d'authentification
IdSMTP1.Host:='www.freemail.ukr.net'; //Hote (par exemple pour Free : smtp.free.fr)
IdSMTP1.Port:=25; //Port (par exemple pour Free : 25)
IdSMTP1.UserName:='barakuda-design'; //Nom d'utilisateur
IdSMTP1.Password:='123123'; //Mot de passe
IdSMTP1.Connect; //Connexion
try
IdSMTP1.Send(IdMessage1); //Envoi du message
finally
IdSMTP1.Disconnect; //Deconnexion
showmessage('Тестовое письмецо отправилось');
end;

SergP. (2006-08-17 13:50:00) [21]
Отправка одного письма - это отправка одного письма,
а рассылка письма 800-1500 клиентам, - это СПАМ. Исключение имеется только в том случае, когда клиенты сами попросили/дали согласие на получение этого письма, а в данном случае я очень сомневаюсь в наличии такого исключения...
а СПАМ - это преступление против человечества.
Все СПАМеры должны умереть!
Тот, кто помогает СПАМеру - сам является соучастником преступления.

Ketmar (2006-08-17 13:43:00) [22]
> [15] umbra © (17.08.06 13:28)
будет. в заголовках карбонки остаются.

barakuda (2006-08-17 13:42:00) [23]
Кто рыдал

Плохиш (2006-08-17 13:42:00) [24]

> barakuda © (17.08.06 12:57) [12]

> я магистр Донецкого Государственного Института Искусственного
> Интеллекта

Рыдал...

barakuda (2006-08-17 13:38:00) [25]
Slym - напиши для меня один модуль, сложной фильтрации TTable. Я тебе денег заплачу

umbra (2006-08-17 13:37:00) [26]
RTFM!!!!!

barakuda (2006-08-17 13:35:00) [27]
BCCList - тип строка, или что?

Slym (2006-08-17 13:35:00) [28]
barakuda © (17.08.06 12:57) [12]
магистр Донецкого Государственного Института Искусственного Интеллекта
а Я супер пупер программер, напишу вам любую программу, разошли это писмо всем своим друзьям может мои услуги им понадобятся...
кто ты если не спамер, рассылка писем на 800-1500 реципиентов?
да еще с атачем и коментарием в исходнике //Attache le fichier
и еще Цикл рассылки будет вечно длится

umbra (2006-08-17 13:28:00) [29]
чтобы быстрее отсылались письма, надо сначалаподготовить сообщения, затемодин раз законнектиться и отослать их все по очереди. Основное времяисплнения вашего кода, как я подозреваю, уходит на коннекты.

Что касается того, что будут видны все адреса, то можно список присваивать свойтсву BCCList, тогда они не появятся в поле "Кому:". Только, по-моему, где-то в заголовках сообщения все равно будет полный список.

barakuda (2006-08-17 13:15:00) [30]
А за это кто извинятся будет???

Slym © (17.08.06 12:20) [7]
Бей спамера!
barakuda © (17.08.06 11:51) Я щас тебе пиписку удлиннять буду, и пихать в тебя виагру с валеумом, а еще прочитаю тебе полезную лекцию про бух учет и укрывательство от налогов

Ketmar (2006-08-17 13:04:00) [31]
> [12] barakuda © (17.08.06 12:57)
извиняться будем? или нагадили и нормально?

barakuda (2006-08-17 12:57:00) [32]
ДА НЕ СПАМЕР Я, я магистр Донецкого Государственного Института Искусственного Интеллекта. факультет «Интеллектуальные системы принятия решений»

SergP. (2006-08-17 12:51:00) [33]
> Делаю рассылку, ниже приведенный алгоритм, работает просто
> великолепно, но на одно письмо уходит 15-20 сек. (БЕЗ АТАЧА)
> ,
> в базе 800-1500 клиентов, Цикл рассылки будет вечно длится

Видимо ты еще только начинающий спамер, ибо спамеры обычно не пишут спамерских прог на Delphi.

Ketmar (2006-08-17 12:31:00) [34]
> [9] barakuda © (17.08.06 12:26)
оскорблять не надо, да? пропало всё желание отвечать.

barakuda (2006-08-17 12:26:00) [35]
Slym ты наверное больной на голову, или у тебя передоз ВИАГРЫ

barakuda (2006-08-17 12:24:00) [36]
Может и инди как то скрытую копию можно организовать, а туда весь список адресов, ведь The bat может за несколько секунд, разослать 100-150 писем,

но это глобально не решает моей проблемы, ведь рассылка именная, в каждое письмо, нужно засунуть поле «контактное лицо»

Slym (2006-08-17 12:20:00) [37]
Бей спамера!
barakuda © (17.08.06 11:51)Я щас тебе пиписку удлиннять буду, и пихать в тебя виагру с валеумом, а еще прочитаю тебе полезную лекцию про бух учет и укрывательство от налогов

barakuda (2006-08-17 12:20:00) [38]
И каждый клиент получит нашу секретную клиентскую базу, уже в электронном виде

Ketmar (2006-08-17 12:20:00) [39]
> [4] umbra © (17.08.06 12:15)
а, ну да. забыл про такую фичу совсем. но, кстати, не все серверы нормально это проглотят. есть сервера со "спам-защитой".

ещё минус: все получатели получат адреса других получателей. это не есть хорошо иногда.

umbra (2006-08-17 12:15:00) [40]
IdMessage1.Recipients. EMailAddresses

множественное число не наводит ни на какие мысли? Передаете строку из адресов, разделенных запятой и все.

Страницы: < 1 2 3 >

Наверх

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