在通过docker使用RSelenium时，无法下载xls文件
我一直在试图从一个特定的网站下载一个Excel文件（.xls）。 我在下面粘贴我的整个R代码（在build立一个docker集装箱后）。
ePrefs = makeFirefoxProfile( list( browser.download.dir = "/home/seluser/Downloads", "browser.download.folderList" = 2L, "browser.download.manager.showWhenStarting" = FALSE, "browser.helperApps.neverAsk.saveToDisk" = "application/vnd.ms-excel, application/xls, application/x-xls, application/vnd-xls, application/vnd.openxmlformats-officedocument.spreadsheetml.sheet" )) remDr = remoteDriver(extraCapabilities = ePrefs, port = 4445) remDr$open() remDr$navigate("https://www.aeaweb.org/joe/listings?") webelem1 = remDr$findElement(using = 'id', "published-date") webelem1$clickElement() webelem2 = remDr$findElement("css", "[value = 'week']") webelem2$clickElement() webelem3 = remDr$findElement("css", "[value = 'Apply Filter']") webelem3$clickElement() Sys.sleep(10) webelem4 = remDr$findElement("css", "[feature = 'download']") webelem4$clickElement() webelem5 = remDr$findElement("xpath", "/html/body/main/div/section/div/div[2]/div[2]/div/ul/li[3]/a") webelem5$clickElement() 一切工作正常，但在最后一步（点击），selenium浏览器仍然打开了通常的对话窗口询问我是否要保存该文件或打开它，即使我已经在代码的eprefs位重写命令。
我已经手动下载了最后一次点击应该直接下载的文件，并validation了内容types是application / vnd.ms-excel。 有什么我做错了吗？ 任何帮助表示赞赏。
服务器返回的MIMEtypes是application/force-download 。 添加到您的列表，并观察主机和容器下载位置映射，以下适用于我：
# initiate docker container mapping download locations # here HOST is linux # docker run -d -p 4445:4444 -p 5901:5900 -v /home/john/test:/home/seluser/Downloads selenium/standalone-firefox-debug:2.53.1 library(RSelenium) ePrefs <- makeFirefoxProfile( list( browser.download.dir = "/home/seluser/Downloads", "browser.download.folderList" = 2L, "browser.download.manager.showWhenStarting" = FALSE, "browser.helperApps.neverAsk.saveToDisk" = "application/vnd.ms-excel, application/xls, application/x-xls, application/vnd-xls, application/vnd.openxmlformats-officedocument.spreadsheetml.sheet, application/force-download" )) remDr <- remoteDriver(extraCapabilities = ePrefs, port = 4445) remDr$open() remDr$navigate("https://www.aeaweb.org/joe/listings?") webelem1 <- remDr$findElement(using = 'id', "published-date") webelem1$clickElement() webelem2 <- remDr$findElement("css", "[value = 'week']") webelem2$clickElement() webelem3 <- remDr$findElement("css", "[value = 'Apply Filter']") webelem3$clickElement() Sys.sleep(10) webelem4 <- remDr$findElement("css", "[feature = 'download']") webelem4$clickElement() webelem5 = remDr$findElement("xpath", "/html/body/main/div/section/div/div[2]/div[2]/div/ul/li[3]/a") webelem5$clickElement() list.files("/home/john/test/") > list.files("/home/john/test/") [1] "joe_resultset.xls"