Блог

Главная - Вопросы по программированию - RDCOMClient Outlook Добавляет напоминание в R

RDCOMClient Outlook Добавляет напоминание в R

#r #outlook

Вопрос:

Я использую эту функцию в R для отправки электронных писем, однако я хотел бы добавить также «Добавить напоминание» в электронные письма, чтобы позже напомнить получателям действий. Возможно ли это?

Спасибо

 library(RDCOMClient)
mail_fun <- function(email, name, number) {
  Outlook <- COMCreate("Outlook.Application")
  Email = Outlook$CreateItem(0)
  # Email parameters
  #Email[["sentonbehalfofname"]] = ""
  Email[["to"]] = email
  Email[["cc"]] = ""
  Email[["bcc"]] = ""
  Email[["importance"]] = "2"
  Email[["readreceiptrequested"]] = FALSE
  Email[["originatordeliveryreportrequested"]] = FALSE
  Email[["subject"]] = paste0("Confirm your Telia SIM card delivery with the phone number: ", number)
  Email[["Body"]] = paste0("Dear ", name,",", "n", "n", "I would like to ask you for a confirmation that a new Telia SIM card with the phone number: ", number, " was delivered to you.", 
                           " Your confirmation is very important for a successful porting from H3Gi to Telia. The porting is planned for September 14th 2021.", "n",
                           "In case you have not received the SIM card yet, please let us know your delivery address and we will send you a new SIM card.",
                           "n", "n", "Thank you for your cooperation.", "n", "n", "Best regards,", "n", "Jaroslav Kotrba")
  # Email send
  Email$Send()
}

# Send
mapply(mail_fun, DK$email, DK$name, DK$number)

введите описание изображения здесь

Ответ №1:

Вас интересует настройка свойства MailItem.FlagRequest, которое возвращает или задает строку, указывающую на запрошенное действие для почтового элемента. По умолчанию почтовый элемент не помечен никаким флагом, и значением по умолчанию для этого свойства является пустая строка.

 Email[["flagrequest"]] = "Reply"

Комментарии:

1. Спасибо, это действительно круто, возможно, вы также знаете, как установить напоминание, например, через 4 часа?

2. Видеть Как отправлять электронные письма Outlook с прикрепленным флагом и напоминанием в VBA

3. Я пытаюсь сделать что-то вроде этого: FlagDueBy = DateAdd(«d», 2, Дата) в R, но это не работает, появляется ошибка. Вы знаете, как установить его в R. Это было бы действительно полезно, я попробовал отправить по электронной почте[[«flagdueby»]] = as.Date(Sys.Date()) 1

4. Это еще один вопрос, я бы предложил опубликовать его в отдельной теме.

Метки: