Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2014.05.25;
Скачать: CL | DM;

Вниз

Кодировка письма   Найти похожие ветки 

 
Санек   (2013-08-06 11:20) [0]

Привет, мастера!!!
Отправляю письмо
вот код
IdSMTP1.Host:= "smtp.mail.ru" ;
IdSMTP1.AuthenticationType:= atLogin;
IdSMTP1.Username:= "email@mail.ru";
IdSMTP1.Password:= "pass";

Msg.Subject:= "Greeting";
Msg.Recipients.EMailAddresses:= "email@mail.ru";
Msg.From.Address:= "email@mail.ru";
Msg.Body.Text:= "" ;
Msg.From.Name:= "Имя русскими буквами";
Msg.CharSet:="Windows-1251";
TIdAttachment.Create(Msg.MessageParts, "имя файла с русскими буквами");
IdSMTP1.connect;
IdSMTP1.Send(Msg);
IdSMTP1.Disconnect;


Пробывал UTF-8 и koi и все равно приходят абра-кадабра.
Подскажите как исправить это.


 
stas ©   (2013-08-06 14:42) [1]

Как пробовали?


 
санек   (2013-08-06 14:45) [2]

Пробывал Msg.CharSet:="UTF-8";
С текстом все норм у меня получиловь а вот с именем файла не получается


 
stas ©   (2013-08-06 14:46) [3]

Msg.CharSet:="UTF-8";
IdSMTP1.Send(Utf8Encode(Msg));
А так ?


 
stas ©   (2013-08-06 14:47) [4]

А имя файла...


 
санек   (2013-08-06 14:53) [5]


> IdSMTP1.Send(Utf8Encode(Msg));

а так вообще не компелируется

ругается на типы данных


 
stas ©   (2013-08-06 14:59) [6]

туда строку передавать надо  

utf8encode(Msg.Body.Text)
TIdAttachment.Create(Msg.MessageParts,utf8encode("имя файла с русскими буквами"));


 
DVM ©   (2013-08-06 15:59) [7]

http://delphimaster.net/view/6-1375188734/


 
DVM ©   (2013-08-06 16:00) [8]


> TIdAttachment.Create(Msg.MessageParts,utf8encode("имя файла
> с русскими буквами"));

По-моему, так не надо делать. TIdAttachment.Create() принимает в конструкторе string, а не UTF8String и это его задача вообще говоря закодировать в заголовке MIME название файла в соответствии с выбранной для заголовков кодировкой.



Страницы: 1 вся ветка

Текущий архив: 2014.05.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.005 c
2-1375709817
Рашид
2013-08-05 17:36
2014.05.25
SQL - Вопрос


2-1375335686
Den
2013-08-01 09:41
2014.05.25
enumchildwindows вопрос по последнему параметру


3-1298273047
Александр Т
2011-02-21 10:24
2014.05.25
Сгруппировать объединение...


15-1385065805
Юрий
2013-11-22 00:30
2014.05.25
С днем рождения ! 22 ноября 2013 пятница


2-1375709808
savek
2013-08-05 17:36
2014.05.25
[Warning] BaseUnit.pas(558): W1000 Symbol Resume is deprecated