Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.78/9: Рейтинг темы: голосов - 9, средняя оценка - 4.78
zlodey4ik
0 / 0 / 1
Регистрация: 06.03.2013
Сообщений: 139
1

Кодировка текста при отправке email.

21.04.2013, 00:18. Просмотров 1850. Ответов 1
Метки нет (Все метки)

Всем привет
Отправляю емаил
Код
idsmtp1.Host:= 'smtp.yandex.ru';    //почтовый сервер
idsmtp1.Port:=587;    //порт
idsmtp1.Username:= '****@yandex.ru';   //имя пользователя
idsmtp1.Password:= 'i*****7';     //пароль
IdMessage1.From.text:='****@yandex.ru';   //поле от
IdMessage1.Recipients.EMailAddresses:='***@yandex.ru';    //кому отправить
IdMessage1.Body.Text:=memo1.Text+'///////'+LabeledEdit1.Text;    //Текст нашего сообещния
IdMessage1.Subject:=ComBoBox1.Text;    //Тема нашего сообщения
idsmtp1.connect();     // Соедение с сервером
idsmtp1.Send(idmessage1);    // отправка сообщения
idsmtp1.Disconnect;
Сообщение приходит в виде ??????
Как поправить?Я пробывал объявлять переменую, присваивать в неё текст из мемо, потом AnsiToUTF8(mes) но не помогло
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.04.2013, 00:18
Ответы с готовыми решениями:

Кодировка при отправке письма
Добрый день, подскажите как исправить корявую кодировку. Отправляю письмо с помощью компонента...

Кодировка при сохранении текста из memo в буфер обмена
Приветствую ! Необходимо сделать, чтобы по нажатию кнопки, текст из memo сохранялся в буфер обмена....

Отправка текста на eMAIL
Всем привет помогите написать код для отправки сообщения на определенный mail. Т.е. чтобы с...

Кодировка при отправке письма
Добрый день, подскажите как исправить корявую кодировку. Отправляю письмо с помощью компонента...

Слетает кодировка при отправке сообщения в WebBrowser
Здравствуйте. Не так давно решил поглубже изучить Delphi7 и написать "серьезный" для меня проект и...

1
ILNAR_93
Android
243 / 240 / 52
Регистрация: 19.01.2013
Сообщений: 1,896
Записей в блоге: 3
22.04.2013, 12:31 2
Лучший ответ Сообщение было отмечено zlodey4ik как решение

Решение

наверное ты отправляешь кириллицу?
вот так я отправляю:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
procedure TForm3.Button1Click(Sender: TObject);
begin
SysLocale.PriLangID := LANG_RUSSIAN;
  IdMessage1.ContentType := 'text/plain';
  IdMessage1.CharSet := 'Windows-1251';
  IdMessage1.ContentTransferEncoding := '8bit';
 
 SMTP.Host:='webmail.hitv.ru'; // àäðåñ ïî÷òîâîãî ñåðâåðà
 SMTP.Port:=25; // ïîðò ïî êîòîðîìó áóäåò îñóùåñòâëÿòüñÿ ïîäêëþ÷åíèå
 SMTP.Username:='---'; // ëîãèí ïîëüçîâàòåëÿ
 SMTP.Password:='----'; // ïàðîëü ïîëüçîâàòåëÿ
 SMTP.AuthenticationType:=atLogin; // òèï ïîäêëþ÷åíèÿ ê ñåðâåðó – ñ àâòîðèçàöèåé
 with IdMessage1 do
 begin
 Body.Assign(memo1.Lines); // ïåðåäà÷à äàííûõ èç memo â êîìïîíåíò IdMessage, äëÿ ïîñëåäóþùåé îòïðàâêè
 From.Text :=edit1.text; // ìàéë îòïðàâèòåëÿ ïèñüìà
 Recipients.EMailAddresses :='---'; // ìàéë ïîëó÷àòåëÿ ïèñüìà
 Subject :='Тема'; // òåìà ïèñüìà
 
end;
 
SMTP.Connect; // ñîåäèíåíèå ñ ïî÷òîâûì ñåðâåðîì
 try
 //showmessage('Ïðîèçîøëî ïîäêëþ÷åíèå ê ñåðâåðó'); // ñîîáùåíèå î óäà÷íîì ïîäêëþ÷åíèè ê ñåðâåðó
 SMTP.Send(IdMessage1); // îòïðàâêà ïèñüìà íà ñåðâåð
 finally
 SMTP.Disconnect; // ðàçðûâ ñîåäèíåíèÿ
 end; end;
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.04.2013, 12:31

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Неправильная кодировка при выводе текста из файла
Ребят,никак не получается вывести нормальный текст из готового файла,вылазят квадратики и вопросы...

Кодировка при отправке файла на email
И так, не получается сделать Русскую кодировку отправленного файла, получаются крякозябры - (скрин)...

Кракозябры при отправке email через PHP (кодировка)
Здравствуйте уважаемые програмисты. Есть код PHP через который отправляется сообщение с сайта и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.