seleniumPipes (version 0.3.7)

findElements: Search for multiple elements on the page

Description

findElements Search for multiple elements on the page, starting from the document root. The located elements will be returned as a list of objects of class wElement.

Usage

findElements(remDr, using = c("xpath", "css selector", "id", "name", "tag name", "class name", "link text", "partial link text"), value, ...)

Arguments

remDr

An object of class "rDriver". A remote driver object see remoteDr.

using

Locator scheme to use to search the element, available schemes: "class name", "css selector", "id", "name", "link text", "partial link text", "tag name", "xpath" . Defaults to 'xpath'. Partial string matching is accepted.

value

The search target. See examples.

...

Additonal function arguments - Currently passes the retry argument.

Value

invisible(lapply(res$value, wbElement, remDr = remDr)): A list of objects of class "wElement" is invisibly returned. A webElement object see wbElement. This allows for chaining from this function to other functions that take such an object as an argument. See examples for further details.

Details

Details of possible locator schemes

See Also

Other elementRetrieval functions: findElementFromElement, findElementsFromElement, findElement, getActiveElement

Examples

## Not run: 
#   remDr <- remoteDr()
#   remDr %>% go("http://www.google.com/ncr")
# 
#   # find the search form query box and search for "R project"
#   webElem <- remDr %>% findElement("name", "q") %>%
#     elementSendKeys("R project", key = "enter")
#   # click the first link hopefully should be www.r-project.org
#   remDr %>% findElement("css", "h3.r a") %>% elementClick
# 
#   # get the navigation div
#   navElem <- remDr %>% findElement("css", "div[role='navigation']")
# 
#   # find all the links in this div
#   navLinks <- navElem %>% findElementsFromElement("css", "a")
# 
#   # check the links
#   nLinks <- sapply(navLinks, function(x) x %>% getElementText)
# 
#   # compare with all links
#   allLinks <- remDr %>% findElements("css", "a")
#   aLinks <- sapply(allLinks, function(x) x %>% getElementText)
# 
#   # show the effect of searching for elements from element
#   aLinks %in% nLinks
# 
#   remDr %>% deleteSession
# ## End(Not run)