Форум: "Сети";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Внизпочему отсылаеться приатаченный файл Найти похожие ветки
← →
Dysan © (2004-03-12 15:25) [0]Использую компонент Indy9
формирую письмо
IdM.Clear;
with idm do begin
Body.Add(MItem.Body_);
From.Text := MItem.From_;
Recipients.EMailAddresses := MItem.To_; { To }
Subject := MItem.Subject_;
CCList.EMailAddresses := MItem.CC_;
BccList.EMailAddresses := MItem.bCC_;
CharSet:=MItem.Charset_;
и отсылаю
SMTP.Send(IdM);
а в аутлук текст приходит как приатаченный! :(
что не правильно?
← →
Dysan © (2004-03-12 15:25) [0]Использую компонент Indy9
формирую письмо
IdM.Clear;
with idm do begin
Body.Add(MItem.Body_);
From.Text := MItem.From_;
Recipients.EMailAddresses := MItem.To_; { To }
Subject := MItem.Subject_;
CCList.EMailAddresses := MItem.CC_;
BccList.EMailAddresses := MItem.bCC_;
CharSet:=MItem.Charset_;
и отсылаю
SMTP.Send(IdM);
а в аутлук текст приходит как приатаченный! :(
что не правильно?
← →
ssk (2004-03-12 15:28) [1]Я делал так:
uses IdMessage, IdSMTP;
var
LSMTP: TIdSMTP;
LMsg: TIdMessage;
s:string;
begin
LSMTP := TIdSMTP.Create(nil);
LMsg := TIdMessage.Create(LSMTP);
with LMsg do
begin
Subject := "тема";
Recipients.EMailAddresses := "_получатель(адрес)_";
From.Text := "_от_кого_(адрес)";
Body.Text := "текст письма";
end;
with LSMTP do
begin
AuthenticationType:=atNone;
Host := "smtp-сервер";
Connect;
Send(LMsg);
Disconnect;
ShowMessage("письмо отправлено");
end;
FreeAndNil(LMsg);
FreeAndNil(LSMTP);
end;
← →
ssk (2004-03-12 15:28) [1]Я делал так:
uses IdMessage, IdSMTP;
var
LSMTP: TIdSMTP;
LMsg: TIdMessage;
s:string;
begin
LSMTP := TIdSMTP.Create(nil);
LMsg := TIdMessage.Create(LSMTP);
with LMsg do
begin
Subject := "тема";
Recipients.EMailAddresses := "_получатель(адрес)_";
From.Text := "_от_кого_(адрес)";
Body.Text := "текст письма";
end;
with LSMTP do
begin
AuthenticationType:=atNone;
Host := "smtp-сервер";
Connect;
Send(LMsg);
Disconnect;
ShowMessage("письмо отправлено");
end;
FreeAndNil(LMsg);
FreeAndNil(LSMTP);
end;
← →
Dysan © (2004-03-12 16:03) [2]а как charset указать???
если сделать это так
LMsg.CharSet:=
то не прокатывает
← →
Dysan © (2004-03-12 16:03) [2]а как charset указать???
если сделать это так
LMsg.CharSet:=
то не прокатывает
← →
Dysan © (2004-03-12 16:40) [3]что то я совсем ничего не понимаю
в 8 версии indy вот эта строка
ExtraHeaders.Text:="MIME-Version: 1.0";
добавляла то что ее просят в хеадер
сейчас же почему то в текст письма!!
Как тогда добавить в пимсьмо что это MIME-Version: 1.0 ?????
← →
Dysan © (2004-03-12 16:40) [3]что то я совсем ничего не понимаю
в 8 версии indy вот эта строка
ExtraHeaders.Text:="MIME-Version: 1.0";
добавляла то что ее просят в хеадер
сейчас же почему то в текст письма!!
Как тогда добавить в пимсьмо что это MIME-Version: 1.0 ?????
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.037 c