Текущий архив: 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