Проблема турецкого символа в теле Outlook при отправке электронной почты через RDCOMClient в R - PullRequest
Новая
       79

Проблема турецкого символа в теле Outlook при отправке электронной почты через RDCOMClient в R

0 голосов
/ 30 сентября 2019

Это автоматизированный персонализированный проект по электронной почте.

Я создал образец моего исходного кода: 

install.packages("RDCOMClient", repos="http://www.omegahat.net/R")

library(RDCOMClient)

tableofemployees <- data.frame(email = c("test1@test.com" , "test2@test.com") ,
                               name = c("name1" , "name2") , ID = c("1001" , "1002"))

tableofemployees$email <- as.character(tableofemployees$email)

mailsentfunction <- function(automatedmailsending) {

for(j in 1:dim(tableofemployees)[1]) {

Outlook  <- COMCreate("Outlook.Application")

Email <- Outlook$CreateItem(0)

#Email[["sentonbehalfofname"]] <- "test@test.com"

Email[["To"]] <- tableofemployees$email[j]

Email[["subject"]] <- "Your Table"

Email[["HTMLBody"]] <- paste0("<!DOCTYPE html>" ,
                              "<html>" ,
                              "<head>" ,
                              "Hi " , tableofemployees$name[j] , "<br>" ,
                              " Bu bir R kullanılarak outlook üzerinden mail gönderme denemesidir. Ayrıca ç ğ ş harflerinde sıkıntı yaşanmaktadır." , "<br>" ,
                              tableofemployees$ID[j] , " Your graph:" , "<br>" ,
                              "<img src='/Users/me/Desktop/R/deneme_graph.jpg'>" , "<br>" ,
                              "Test end." ,
                              "</head>" ,
                              "</html>")

Email$Send()
}
}
mailsentfunction()

Это то, что я получаю по электронной почте:

Привет, name1 Bu bir R kullanýlarak outlook üzerinden mail gönderme denemesidir. Ayrýca ç ð þ harflerinde sýkýntý yaþanmaktadýr. 1001 Ваш график:

Завершение теста.

Как я могу решить проблему турецкого символа?

...