Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2014.05.25;
Скачать: [xml.tar.bz2];

Вниз

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

 
Санек   (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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.001 c
15-1384937184
Дмитрий СС
2013-11-20 12:46
2014.05.25
Просьба помочь с названиями.


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


15-1384939416
Nil
2013-11-20 13:23
2014.05.25
Работа с SQLite


2-1375710622
Света
2013-08-05 17:50
2014.05.25
Ускорение свободного падения


15-1384870709
Dr.Wolf
2013-11-19 18:18
2014.05.25
Поиск стихотворения





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский