如何使用Rselenium在iframe上向下滚动

问题描述

我正在使用R包Rselenium从使用iframe的网站上抓取数据，但我需要弄清楚如何检查iframe是否已加载，以防止程序由于未加载数据而无法抓取数据。目前，我正在使用下面的代码，由于iframe尚未完全加载，这给我一个错误。谢谢。

library(tidyverse)
library(RSelenium)
library(XML)


rD <- rsDriver(browser = "chrome",verbose = TRUE,port = 4444L #,port = 4567L,chromever = "83.0.4103.39",extraCapabilities = eCaps)

Sys.sleep(3)

remDr <- rD[["client"]]

remDr$navigate("https://myapps.dpss.lacounty.gov/pls/apexprod/f?p=aag")

links <- XML::htmlParse(remDr$getPageSource()[[1]]) %>%
xpathSApply(.,"//a/@href") %>% 
  as.tibble %>% 
  filter(grepl("GEOSRC",value)) %>%
  filter(grepl("ZIPCODE",value)) 

webElem <- remDr$findElement("css","html")
remDr$executeScript( links$value,args = list("fugazi"))

webElems <- remDr$findElements(using = "tag name","iframe")

remDr$switchToFrame(webElems[[3]])

# scrol down on iframe,not main frame

webElem <- remDr$findElement("css","body")
webElem$sendKeysToElement(list(key = "end"))

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）