从下拉菜单中选择时出现 RSelenium 问题

RSelenium issue when selecting from dropdown menu

我查看并尝试了在其他关于使用 RSelenium 的下拉菜单的问题中找到的所有可能的替代方法。但是由于某种原因,他们中的 none 解决了这个问题。

我正在尝试在此 page 上填写一个表格,其中包含 2 个下拉菜单和 2 个日期 select 或者 + 按下按钮。我无法通过“Empresa”的第一个下拉菜单

我已经设法 select 了合适的元素,但是点击时没有任何反应。此外,无法在 Selenium 单击中复制手动单击的行为。

希望有人有我可以应用的见解。

library(tidyverse)
library(RSelenium)

link <- "https://www.smv.gob.pe/Frm_EVCP?data=5A959494701B26421F184C081CACF55BFA328E8EBC"
driver <- rsDriver(browser="firefox", port=4545L)
remote_driver <- driver[["client"]]
# remote_driver$open()
remote_driver$navigate(link)

Credicorp_SAF <- remote_driver$findElement(using = "xpath",value = '/html/body/form/div[3]/div[2]/div/div[2]/div[2]/div[2]/div[2]/div[2]/select/option[contains(text(), "CREDICORP CAPITAL")]')
Credicorp_SAF$clickElement() #Nothing happens in the open browser
Credicorp_SAF$getElementText() #Verifying it's the correct one

页面使用jQuery。您可以从 javascript 触发:

$('[name="ctl00$MainContent$cboDenominacionSocial"]').val("124863")
$('[name="ctl00$MainContent$cboDenominacionSocial"]').trigger('change')

我不确定如何在 RSelenium 中执行它,显然是这样的:

remDr$executeScript(script, args = list("dummy"))