Загрузка нескольких вложений из почты в outlook с помощью R - PullRequest
Новая
       13

Загрузка нескольких вложений из почты в outlook с помощью R

1 голос
/ 17 апреля 2019

Как загрузить несколько вложений (все являются CSV), используя R из outlook?

Мой код просто читает первое вложение. Я не могу перебрать все вложения, присутствующие в письме.

использовал RDCOMClient в качестве библиотеки 

library(RDCOMClient)

outlook_app <- COMCreate("Outlook.Application")


search <- outlook_app$AdvancedSearch(
  "Inbox",
  "urn:schemas:httpmail:subject = 'test'"
)

Sys.sleep(5)
results <- search$Results()

Sys.sleep(10)

results$Item(1)$ReceivedTime() # Received time of first search result

as.Date("1899-12-30") + floor(results$Item(1)$ReceivedTime()) # Received date

for (i in 1:results$Count()) {
  print(i)
  if (as.Date("1899-12-30") + floor(results$Item(i)$ReceivedTime())  == as.Date("2019-04-03")) {
      email <- results$Item(i)
  }
}

attachment_file <- tempfile()

email$Attachments(1)$SaveAsFile(attachment_file)


data <- read.csv(attachment_file)

Невозможно сохранить вложения, кроме первого.

...