如何使用RDCOMCLIENT在文件夹之间移动电子邮件

我想使用RDCOMCLIENT，通过R自动将电子邮件从一个文件夹（FolderA）移动到另一个文件夹（FolderB）

我编写了一个简单的for循环，如下所示：

OutApp <- COMCreate("Outlook.Application")
outlookNameSpace <-  OutApp$GetNameSpace("MAPI")

folderName <-  "FolderA"
destFolder<-"FolderB"


Inbox <- outlookNameSpace$GetDefaultFolder(6) 
FolderA <-  Inbox$folders(folderName) 
FolderB<-Inbox$folders(destFolder)

emails <- FolderA$Items 

i<-1

while(as.numeric(FolderA$Items()$Count())!=0) {
  emails(i)$Move(FolderB)
  i<-i+1

}

---

我的代码哪里出了问题？

我尝试过使用您的代码，似乎只要指定的名称“FolderA”不存在，就会发生此错误。我想从收件箱移动到其他文件夹，但意识到收件箱无法识别。 将“收件箱”更改为其他子文件夹实际上可以使代码正常工作

No support for InterfaceSupportsErrorInfo
Error: Exception occurred.
checkErrorInfo -2147352567