Загрузите файл CSV за логином сайта, который имеет перенаправление URL, используя HTTR или rvest - PullRequest
0 голосов
/ 12 марта 2020

Я ищу помощь при загрузке файла .csv на сайт, который требует входа в систему. У меня нет проблем с кодом, который заставляет меня войти в систему. Это работает, потому что я могу очистить HTML на веб-сайте за логином.

Вот код, который я использую для входа в систему:

login_baseballhq <- function(bbhq_id = Sys.getenv("bbhq_id"),
                        bbhq_password = Sys.getenv("bbhq_password")) {


  # Open Session on Base Login Page
  my_session <- rvest::html_session("https://www.baseballhq.com")
  unfilled_forms <- rvest::html_form(my_session)
  login_form <- unfilled_forms[[1]]
  filled_form <- rvest::set_values(login_form, name = bbhq_id, pass = bbhq_password) # fill the form
  login_session <- rvest::submit_form(my_session, filled_form)
  return(login_session)
}

Код, используемый для очистки HTML

 url <- "https://www.baseballhq.com/members/tools/stat_proj?lg=M&p=B&t=P"

  # Get Page Session Function?
  page <- rvest::jump_to(login_session, url)

  page <-
    page %>%
    xml2::read_html()

Как мне go загрузить файл .csv на сайт? URL, по которому я нажимаю, чтобы получить файл: «https://www.baseballhq.com/download_stats.php?file=M_B_P».

Когда я копирую и вставляю ссылку на новую вкладку браузера, я получаю следующее сообщение.

Please login to BaseballHQ.Com before attempting to download a file. 
...