RSelenium: настройка makeFirefoxProfile для Mac OS X для загрузки файлов без запроса

Как настроить профиль RSelenium Firefox в Mac OS X?

Я попытался воспроизвести этот код (для Windows), но Firefox продолжает показывать всплывающее окно загрузки.

require(RSelenium)

my_firefox_profile <- makeFirefoxProfile(
  list(browser.download.dir = "~/Downloads/tmp",
       browser.download.folderList = "2",
       browser.download.manager.showWhenStarting = "false",
       browser.helperApps.neverAsk.saveToDisk = "text/csv/xls"))

RSelenium::startServer()
remDr <- remoteDriver(extraCapabilities = my_firefox_profile)
remDr$open()
remDr$navigate('http://www.rapidtables.com/web/html/link/html-download-link.htm')


webElem <- remDr$findElement(using = 'xpath', "//*[@id='doc']/p[6]/a")
webElem$clickElement()


remDr$close()
remDr$closeServer()

Также на странице репозитория git для разработчиков RSelenium есть дополнительный способ установить профиль браузера.

extraCapabilities <- list("browser" = "IE",
                          "browser_version" = "7.0",
                          "os" = "Windows",
                          "os_version" = "XP",
                          "browserstack.debug" = "true")
remDr <- remoteDriver$new(remoteServerAddr = ip, port = port
                          , extraCapabilities = extraCapabilities)

который я также пробовал без успеха.


person CptNemo    schedule 12.04.2016    source источник
comment
Ссылка для скачивания, если битая. Каков тип mime файла, который вы хотите загрузить?   -  person Florent B.    schedule 12.04.2016


Ответы (1)


У меня была аналогичная проблема с некоторыми файлами .csv, которые я пытался загрузить. Точно так же у меня была строка browser.helperApps.neverAsk.saveToDisk = "text/csv/xls")) в моем коде. Однако Firefox видел их как двоичные файлы. Проверьте, что он говорит в окне загрузки, если у вас похоже, этот код будет работать:

fprof <- makeFirefoxProfile(list(browser.download.dir = [YOUR DOWNLOAD FOLDER],
                  browser.download.folderList = 2L, 
                  browser.download.manager.showWhenStarting=FALSE,
                  browser.helperApps.neverAsk.saveToDisk = "application/octet-stream"))
remDr <- remoteDriver(extraCapabilities=fprof)
remDr$open()

Надеюсь, это поможет.

person RobertMyles    schedule 25.04.2016