Отказ от ответственности: Вам может понадобиться (или знать кого-то с) учетная запись MyFedLoan, чтобы протестировать решение. К сожалению, я не могу создать фиктивную учетную запись из-за строгих критериев создания учетной записи.
После входа в систему удаление данных MyFedLoan требует проверки подлинности, которая выглядит как использовать браузер снятия отпечатков пальцев. Несмотря на то, что я написал некоторый код на R для выполнения первоначального входа, я не знаю, как перейти с полученной страницы sesh
к конечной странице учетной записи.
library(rvest)
search <- html_form(read_html("https://myfedloan.org"))[[1]]
query <- set_values(search, username = "username", password = "password")
sesh <- html_session("https://myfedloan.org")
sesh <- submit_form(sesh, query)
sesh
Распечатка se sh показывает скребковые земли на этой странице:
https://accountAccess.myfedloan.org/authentication/entryFingerprinting.html
Я исследовал sesh
, используя sesh %>% read_html() %>% html_text()
, но я не увидеть что-нибудь очевидное в результате html. Я также распечатал sesh
и вижу, что вход выполнен успешно, потому что "Status: 200" .
Вход в систему вручную показывает, что процесс проходит по трем различным ссылкам:
- https://accountaccess.myfedloan.org/authentication/processSignIn.htm
- https://accountaccess.myfedloan.org/authentication/process.shtml
- https://accountaccess.myfedloan.org/authentication/entryFingerprinting.html?invalidFlash=true
до прибытия на страницу окончательного счета:
https://accountaccess.myfedloan.org/accountAccess/index.cfm?event=common.home
Любая помощь приветствуется и будет зачислена в приложение, которое я создаю для оптимизации платежей по студенческим кредитам.