# NOT RUN {
# }
# NOT RUN {
# configure IMAP
library(mRpostman)
imapconf <- configure_imap(url="imaps://your.imap.server.com",
username="your_username",
password=rstudioapi::askForPassword()
)
# extracting attachments
imapconf %>%
select_mailbox(mbox = "TAM") %>%
search_before(date_char = "10-may-2012", by = "UID") %$% #exposition pipe - two argg
fetch_full_msgs(imapconf = imapconf, msg_id = msg_id) %>%
get_attachments()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab