Я хочу отправить электронное письмо с использованием арабского текста в качестве темы.Отправка писем на разных языках с использованием ASP и CDOSYS
Кодовая часть преобразует специальные символы в арабский текст правильно для тела сообщения, но не делает этого для темы сообщения.
Я хотел бы знать, что мне не хватает?
Set objCDOSYS = Server.CreateObject("CDO.Message") Set objCDOConf = CreateObject("CDO.Configuration") Set objCDOFields = objCDOConf.Fields objCDOFields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objCDOFields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1" objCDOFields.Update Set objCDOSYS.Configuration = objCDOConf objCDOSYS.MimeFormatted=True objCDOSYS.BodyPart.Charset = "Windows-1256" objCDOSYS.From = Trim(Request.Form("frmSender")) objCDOSYS.To = Trim(Request.Form("frmRecipient")) objCDOSYS.Subject =Request.Form("frmSubject") objCDOSYS.HTMLBody = Trim(Request.Form("frmMessage")) objCDOSYS.HTMLBodyPart.charset = "Windows-1256" objCDOSYS.Fields.update objCDOSYS.Send Set objCDOFields = Nothing Set objCDOConf = Nothing Set objCDOSYS = Nothing
Спасибо за ответ, я проверил его, но он не работает. Вы можете попробовать это здесь http://www.franchiseforindia.com/EmailUniCode.asp – Sandhurst
@Sandhurst: В конце кода отсутствует «+»? = «', Однако есть большая проблема. Мы не можем просто передать строку темы unicode в функцию Base64Encode, которую сначала нужно преобразовать в UTF-8. – AnthonyWJones
Спасибо Энтони, ты прав. Это должен быть UTF-8. – Jirapong