RDCOMClientとOutlookを使用して複数の添付ファイルを電子メールで送信

Question

完了したらMicrosoft Outlookを使用して電子メールを自動的に送信するRスクリプトがあります。私は "RDCOMClient"パッケージを使用しています。メールに複数の添付ファイルを追加したいのですが。ここで

は、私が使用しようとしているコードです：

library(RDCOMClient) 

OutApp <- COMCreate("Outlook.Application") 

outMail = OutApp$CreateItem(0) 

outMail[["To"]] = paste("recipient@account.com","another@gmail.com", sep=";", collapse=NULL) 
outMail[["subject"]] = "some subject" 
outMail[["body"]] = "some body" 
outMail[["attachments"]]$Add("C:/Path/To/The/Attachment/File.ext") 

outMail$Send() 

「へ」のオプションが、私のような添付ファイルは、それはそれので、添付ファイルを破ったものです99％確信しているため、私はペーストを使用してみましたただ1つで動作します。複数の受信者を追加するのにも最適です。誰もがこのパッケージで複数の添付ファイルを追加する方法を知っていますか？

Answer 1

私はこの問題を解決する方法を知っていると思います。

まず、for機能を実行する前に、あなたのファイルが保存されている場所に作業ディレクトリを設定する必要があります。コード。

setwd("path") 
     for(j in 1:length(dir())){ 
      outMail[["Attachments"]]$Add(paste(path,dir()[j],sep="/")) 
     } 

申し訳ありませんが、私は十分に明確でない場合は、まずStackOverFlowで回答します。あなたはそれを得ることを望む！添付ファイルのオブジェクトの上

outMail[["attachments"]]$Add("C:/Path/To/The/Attachment/File.ext") 
outMail[["attachments"]]$Add("C:/Path/To/The/Attachment/File2.ext") 

それともmap（ループ）：

Answer 2

ちょうど別の添付ファイルの行を追加します

attachments <- c("C:/Path/To/The/Attachment/File.ext", 
       "C:/Path/To/The/Attachment/File2.ext") 

purrr::map(attachments, ~ outMail[["attachments"]]$Add(.))