Проблема с кодировкой сообщения на email

@foxy_fellow · Регистрация: 04.11.2009

Студворк — интернет-сервис помощи студентам

Всем привет!
Мой скрипт для отправки сообщения выглядит так:
'---------------------------
set mm = Server.CreateObject("Persits.MailSender")
mm.Host = "mail.eltel.net"
mm.From = "webmaster@domen"
mm.FromName = from
mm.AddAddress mRecordSet("email")
mm.AddCustomHeader "Content-Type: text/plain; charset=windows-1251"
mm.AddCustomHeader "Content-Transfer-Encoding: 8bit"
file_address="send_files" & file_name
mm.AddAttachment Server.Mappath(file_address)
mm.Subject = mRecordSet("subject")
mm.IsHTML = true

context=replace(mRecordSet("public_context"),vbCrlf,"
")

Body = "<HTML><HEAD>"
Body = Body & "<meta http-equiv=""Content-Type"" content=""text/html; charset=windows-1251" "
Body = Body & "</HEAD><BODY>"
Body = Body & context
Body = Body & "</BODY></HTML>"
mm.Body = Body
mm.Send
'---------------------------
Проблема в том, что вместо русских букв в полученном сообщении стоят "?".
Кто может, поделитесь пожалуйста своим опытом.
Никак не могу победить эту проблему!

@bazile · 18.04.2012, 16:00

Попробуй взять срипт отправки почты из темы http://relib.com/forums/thread880437.aspx

@foxy_fellow · 18.04.2012, 17:32 **[ТС]**

Сообщение от bazile

Попробуй взять срипт отправки почты из темы http://relib.com/forums/thread880437.aspx

Все отлично.
1-Только не работает почему-то .HtmlBody
2-Можно ли прикрепить файл?
Благодарю за ответ.

@bazile · 18.04.2012, 18:19

Сообщение от foxy_fellow

1-Только не работает почему-то .HtmlBody

У меня никогда с ним проблем не было. Ты ничего к примеру не добавлял?

Сообщение от foxy_fellow

2-Можно ли прикрепить файл?

Можно. Внутри блока With iMsg пишем
.AddAttachment("c:myfilesfile.doc")

@foxy_fellow · 18.04.2012, 18:24 **[ТС]**

[quote="bazile"]

Сообщение от foxy_fellow

1-Только не работает почему-то .HtmlBody

У меня никогда с ним проблем не было. Ты ничего к примеру не добавлял?

С прикрепленным файлом все ОК.
Остается HTML.
Не, ничего не добавлялА )))

@bazile · 18.04.2012, 19:15

А присваиваешь оба свойства .TextBody и .HtmlBody или только одно? Вроденадо только одно из них использовать.

@foxy_fellow · 19.04.2012, 10:02 **[ТС]**

Сообщение от bazile

А присваиваешь оба свойства .TextBody и .HtmlBody или только одно? Вроденадо только одно из них использовать.

По очереди, конечно
Вначале .TextBody -здесь все проходит
Потом .HtmlBody - а здесь облом

@bazile · 19.04.2012, 10:47

Странно. Покажи свой код.

@foxy_fellow 0 / 0 / 0 Регистрация: 04.11.2009 Сообщений: 9
		1
	Проблема с кодировкой сообщения на email 18.04.2012, 14:55. Показов 1391. Ответов 7 Метки нет (Все метки) Всем привет! Мой скрипт для отправки сообщения выглядит так: '--------------------------- set mm = Server.CreateObject("Persits.MailSender") mm.Host = "mail.eltel.net" mm.From = "webmaster@domen" mm.FromName = from mm.AddAddress mRecordSet("email") mm.AddCustomHeader "Content-Type: text/plain; charset=windows-1251" mm.AddCustomHeader "Content-Transfer-Encoding: 8bit" file_address="send_files" & file_name mm.AddAttachment Server.Mappath(file_address) mm.Subject = mRecordSet("subject") mm.IsHTML = true context=replace(mRecordSet("public_context"),vbCrlf," ") Body = "<HTML><HEAD>" Body = Body & "<meta http-equiv=""Content-Type"" content=""text/html; charset=windows-1251" " Body = Body & "</HEAD><BODY>" Body = Body & context Body = Body & "</BODY></HTML>" mm.Body = Body mm.Send '--------------------------- Проблема в том, что вместо русских букв в полученном сообщении стоят "?". Кто может, поделитесь пожалуйста своим опытом. Никак не могу победить эту проблему! 0

@bazile 85 / 61 / 69 Регистрация: 15.03.2007 Сообщений: 6,907
	18.04.2012, 16:00	2
	Попробуй взять срипт отправки почты из темы http://relib.com/forums/thread880437.aspx 0

@foxy_fellow 0 / 0 / 0 Регистрация: 04.11.2009 Сообщений: 9
	18.04.2012, 17:32 [ТС]	3
	Сообщение от bazile Попробуй взять срипт отправки почты из темы http://relib.com/forums/thread880437.aspx Все отлично. 1-Только не работает почему-то .HtmlBody 2-Можно ли прикрепить файл? Благодарю за ответ. 0

@bazile 85 / 61 / 69 Регистрация: 15.03.2007 Сообщений: 6,907
	18.04.2012, 18:19	4
	Сообщение от foxy_fellow 1-Только не работает почему-то .HtmlBody У меня никогда с ним проблем не было. Ты ничего к примеру не добавлял? Сообщение от foxy_fellow 2-Можно ли прикрепить файл? Можно. Внутри блока With iMsg пишем .AddAttachment("c:myfilesfile.doc") 0

@foxy_fellow 0 / 0 / 0 Регистрация: 04.11.2009 Сообщений: 9
	18.04.2012, 18:24 [ТС]	5
	[quote="bazile"] Сообщение от foxy_fellow 1-Только не работает почему-то .HtmlBody У меня никогда с ним проблем не было. Ты ничего к примеру не добавлял? С прикрепленным файлом все ОК. Остается HTML. Не, ничего не добавлялА ))) 0

@bazile 85 / 61 / 69 Регистрация: 15.03.2007 Сообщений: 6,907
	18.04.2012, 19:15	6
	А присваиваешь оба свойства .TextBody и .HtmlBody или только одно? Вроденадо только одно из них использовать. 0

@foxy_fellow 0 / 0 / 0 Регистрация: 04.11.2009 Сообщений: 9
	19.04.2012, 10:02 [ТС]	7
	Сообщение от bazile А присваиваешь оба свойства .TextBody и .HtmlBody или только одно? Вроденадо только одно из них использовать. По очереди, конечно Вначале .TextBody -здесь все проходит Потом .HtmlBody - а здесь облом 0

@bazile 85 / 61 / 69 Регистрация: 15.03.2007 Сообщений: 6,907
	19.04.2012, 10:47	8
	Странно. Покажи свой код. 0

Опции темы