RSelenium, Chrome, как установить каталог загрузки, ошибка загрузки файла - PullRequest
Новая
       42

RSelenium, Chrome, как установить каталог загрузки, ошибка загрузки файла

0 голосов
/ 19 февраля 2020

Здравствуйте :) Я пытаюсь автоматизировать загрузку электронных таблиц с веб-сайта XYZ. Код работает хорошо, проходит авторизацию без проблем и загружает файл. Но, когда я пытаюсь изменить каталог загрузки, он начинает загружать файл, но мгновенно выдает ошибку загрузки файла в браузере. Я попытался изменить каталог загрузки, добавив: 

eCaps <- list(
  chromeOptions = 
    list(prefs = list("profile.default_content_settings.popups" = 0L,
"download.prompt_for_download" = FALSE,
"directory_upgrade" = TRUE,
"download.default_directory" = "C:/XXX/YYY"
    )
    )
)

и добавив extraCapabilities = eCaps к rsDrive (): 

rD <- rsDriver(browser= "chrome", chromever = "80.0.3987.16", extraCapabilities = eCaps)

Без этих двух изменений код работал хорошо, загрузка в каталог загрузки по умолчанию. Есть ли способ установить его правильно для загрузки в любой другой каталог? Вот полный код: 

library(RSelenium)
eCaps <- list(
  chromeOptions = 
    list(prefs = list("profile.default_content_settings.popups" = 0L,
"download.prompt_for_download" = FALSE,
"directory_upgrade" = TRUE,
"download.default_directory" = "C:/XXX/YYY"
    )
    )
)
rD <- rsDriver(browser= "chrome", chromever = "80.0.3987.16", extraCapabilities = eCaps)
remDr <- rD$client

appURL <- 'https://XYZ'
remDr$navigate(appURL)
remDr$findElement("id", "loginEmail")$sendKeysToElement(list("email"))
remDr$findElement("id", "loginPassword")$sendKeysToElement(list("password", key='enter'))

appURL2 <- "https://XYZ/XYZ"
remDr$navigate(appURL2)
remDr$navigate(appURL2)

remDr$findElement("link text", "XLSX")$sendKeysToElement(list(key='enter'))
...