我正在尝试使用R中的javascript下拉菜单来抓取网页。我可以遵循列出的说明here,但是什么也没有发生,也没有显示错误。相反,它给出了一个空列表:
dropdown <- remDr$findElement(using = "id", "s2id_autogen4_search")
remDr$executeScript("arguments[0].setAttribute('class','select2-input select2-focused');", list(dropdown))
> list()
此外,dropdown$clickElement()
也没有任何反应(也没有控制台输出)。
这与this post有点相关,但是我需要先单击以激活下拉菜单。
答案 0 :(得分:0)
万一有人需要,答案是上面有一个面具。我需要找到遮罩,单击该遮罩,然后为下拉菜单本身提供参数:
dropdown <- remDr$findElement(using = "id", "s2id_autogen4_search")
mask <- remDr$findElement(using = "xpath", "//*[@id='select2-drop-mask']")
mask$clickElement()
dropdown$sendKeysToElement(list("l"))