Захват сеанса после входа в систему - PullRequest
0 голосов
/ 12 апреля 2020

Я пытаюсь извлечь данные из Европейского хранилища данных. После входа в систему необходимо заполнить еще одну форму. Когда я отправляю эту форму, она возвращает пустой список. Кажется, это проблема захвата html_session после входа в систему. Я вижу поля ввода формы, но она не возвращает желаемый результат после отправки.

library(rvest)
url<-"https://edwin.eurodw.eu/edweb"
page<-html_session(url)
form <- html_form(read_html(url))[[1]]
filled_form <- set_values(form,
                          UserName = "xxxx",
                          Password = "xxxx")

filled_form$url <- ""
session <- submit_form(page, filled_form)

link <- "https://edwin.eurodw.eu/edweb/Home/AdvancedSearch"
page2 <- html_session(link)
form2 <- session %>% jump_to(link) %>% html_form()
filled_form2 <- set_values(form2[[1]],
                          PostedAssetClassList.ItemIDs = "CMR",
                          PostedCountryOfSecuritizedAssetList = "Germany")
filled_form2$url <- link
session2 <- submit_form(page2, filled_form2, submit = "ButtonAction")
httr::content(session2$response)
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...