RSelenium: не удается отправить ввод в текстовое поле - PullRequest
0 голосов
/ 12 февраля 2020

Этот скрипт полностью работает отдельно от ввода текста в поля долготы и широты, которые по некоторым причинам не реагируют. Не могли бы вы помочь выяснить, как это исправить?

library(RSelenium)
library(tidyverse)

driver <- rsDriver(browser = c("chrome"), chromever = "78.0.3904.105")
remote_driver <- driver[["client"]]
remote_driver$open()

remote_driver$navigate("https://climateknowledgeportal.worldbank.org/download-data#download-data-projections-tab")

type_element <- remote_driver$findElement(using = 'id', value = 'futureType')
variable <- remote_driver$findElement(using = 'id', value = 'variablesFutu')
longitude <- remote_driver$findElement(using = 'class', value = 'longitude')
latitude <- remote_driver$findElement(using = 'id', value = 'latitude')
time_period <- remote_driver$findElement(using = 'id', value = 'futuTimeSeries')
statistic <- remote_driver$findElement(using = 'id', value = 'statistic')
scenario <- remote_driver$findElement(using = 'id', value = 'scenario')

type_element$sendKeysToElement(list("CMIP5"))
variable$sendKeysToElement(list("cdd65"))
time_period$sendKeysToElement(list("2040-2059"))
statistic$sendKeysToElement(list("manom"))
scenario$sendKeysToElement(list("rcp45"))

latitude$sendKeysToElement(list("30")) # does not work
longitude$sendKeysToElement(list("30")) # does not work 

button_element <- remote_driver$findElement(using = 'id', value = "downloadProjectionsBtn")
button_element$clickElement()

1 Ответ

1 голос
/ 12 февраля 2020

Не эксперт по RSelenium, но я вижу, вы определяете широту как

latitude <- remote_driver$findElement(using = 'id', value = 'latitude')

, когда идентификатор на самом деле latitudeProj

Все ваши поля являются списками, кроме широты и долготы, но вы, кажется, отправляете ключи этим двум как элемент списка? Если вы попытаетесь: latitude$sendKeysToElement("abc") примет ли это?

...