# NOT RUN {
# }
# NOT RUN {
# configure IMAP
library(mRpostman)
imapconf <- configure_imap(url="imaps://your.imap.server.com",
username="your_username",
password=rstudioapi::askForPassword()
)
# fetching
results <- imapconf %>%
select_mailbox(mbox = "INBOX") %>%
search_sent_since(date_char = "26-Aug-2008") %$% #exposition pipe - two argg
fetch_msg_metadata(imapconf, msg_id = msg_id, by = "UID",
metadata = c("INTERNALDATE", "UID", "ENVELOPE", "FLAGS",
"RFC822.SIZE", "BODYSTRUCTURE"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab