我在这里尝试了代码 Scrolling page in RSelenium 但是,当我向下滚动时,我正在处理的网站将无法加载更多内容。例如
webElem <- remDr$findElement("css", "body")
webElem$sendKeysToElement(list(key = "end"))
webElem$screenshot(display = TRUE)
然后我再次重复这个过程。
webElem$sendKeysToElement(list(key = "end"))
webElem$screenshot(display = TRUE)
结果仍然相同。
答案 0 :(得分:6)
如果您的代码无法向下滚动,请尝试使用executeScript()
,如下所示: -
remDr$executeScript("window.scrollTo(0,document.body.scrollHeight);")