在 R 中按 ID 搜索 RSelenium
在本文中,我们讨论了如何使用 Rselenium 包来自动化 Web 应用程序。我们还将学习如何使用 RSelenium 通过 id 搜索元素。更具体地说, findElement(using = “id”, value = “id value”)方法用于通过 id 搜索元素。
句法:
object$findElement(using= "id", "value")
例子:
HTML
Rselenium Demo
R
# R program to demonstrate RSelenium to
# search element using the id
# load the required packages
library(Rselenium)
# start the Selenium server
rdriver <- rsDriver(browser = "chrome",
port = 5050L,
chromever = "98.0.4758.102",
)
# creating a client object and opening
# the browser
obj <- rdriver$client
# navigate to the url
obj$navigate("https://www.geeksforgeeks.org/")
# selecting scroll top button using the element id
id_content <- obj$findElements(using = "id","scrollTopBtn")[[1]]
# clicking on the scroll to top button
id_content$clickElement()
# closing the browser
obj$close()
现在,如果我们想通过 id 搜索元素,我们可以在 R 中使用以下代码:
id_content <- robj$findElement(using = “id”, value = “txt1”)
在这里,我们使用robj$findElement()方法通过 id 搜索元素。 robj$findElement()方法有两个参数。第一个参数是 using 参数,第二个参数是 value 参数。 using 参数用于指定要搜索的元素的类型。 value 参数用于指定要搜索的元素的值。
逐步实施
第 1 步:在 Rstudio 中创建一个名为Rselenium.R的新文件。
第 2 步:使用以下代码将 RSelenium 包导入 Rstudio:
# loading the Rselenium package
library(RSelenium)
第 3 步:使用 Chrome 网络驱动程序创建一个新的 Rselenium 服务器。
driver <- rsDriver(browser = "chrome", # chrome browser
port = 4444, # default port
chromever = "latest", # latest version of chrome)
这将创建一个新的 Rselenium 服务器并启动 Chrome 网络驱动程序。
第 4 步:从我们之前创建的 Rselenium 服务器创建一个新的客户端对象。
obj <- rsClient$client
第 5 步:使用以下代码在浏览器中打开 URL。
obj$navigate("http://www.geeksforgeeks.org/")
第 6 步:使用以下代码通过 id 查找元素。我们将使用 id 元素选择 Rselenium 中的按钮scoolTotop 。
# selecting scroll top button using the element id
id_content <- obj$findElements(using = “id”,”scrollTopBtn”)[[1]]
第 7 步:使用以下代码单击按钮。
# clicking on the scroll to top button
id_content$clickElement()
第 8 步:关闭 Rselenium 浏览器和服务器。
# closing the browser
obj$close()
下面是完整的实现:
脚本:
R
# R program to demonstrate RSelenium to
# search element using the id
# load the required packages
library(Rselenium)
# start the Selenium server
rdriver <- rsDriver(browser = "chrome",
port = 5050L,
chromever = "98.0.4758.102",
)
# creating a client object and opening
# the browser
obj <- rdriver$client
# navigate to the url
obj$navigate("https://www.geeksforgeeks.org/")
# selecting scroll top button using the element id
id_content <- obj$findElements(using = "id","scrollTopBtn")[[1]]
# clicking on the scroll to top button
id_content$clickElement()
# closing the browser
obj$close()
输出: