Я использую R версии 3.3.2. Я пытаюсь удалить некоторые данные с этого веб-сайта: http://www.dziv.hr/en/e-services/on-line-database-search/patents/
Я использую Rselenium, и мой код выглядит так:
webElem <- remDr$findElements("css", "iframe")
remDr$switchToFrame(webElem[[1]])
webel <- remDr$findElement(using = "xpath", "//input[@id = 'TB1']")$sendKeysToElement(list(as.character("*"), key = "enter"))
Sys.sleep(2)
windows_handles <- remDr$getWindowHandles()
Sys.sleep(1)
remDr$switchToWindow(windows_handles[[1]][[2]])
Как видите, после третьей строки появляются новые окна, и я переключаюсь на это новое окно. В этом новом окне я хотел бы щелкнуть вторую страницу внизу страницы, затем 3 и так далее. Я пробовал несколько решений, например:
remDr$findElement(using = "xpath", "//a[contains(text(),'2')]")$clickElement()
remDr$findElement(using = "xpath", "//a[@style = 'color:#333333;']")$clickElement()
remDr$findElement(using = "xpath", "/html/body/form/div[3]/div[1]/div/table/tbody/tr[27]/td/table/tbody/tr/td[2]/a[@href]")$clickElement()
Ни одно из этих решений не работает. Я думаю, это из-за javascript в href? Как я могу выполнить этот javascript и продолжить на второй странице? Я знаю функцию executeScript()
, но не знаю, как ее использовать.
remDr$executeScript("__doPostBack('GVRezultati','Page$2');")
и т.д... - person jdharrison   schedule 23.12.2016