使用 rvest 提交表单时出错(error in enc2utf8(url))
Error when submit form with rvest (Error in enc2utf8(url))
我正在尝试抓取“https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml”中的数据。我正在使用 R 中的 rvest 包提交表单并不断收到此错误:
url <- "https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml"
page_session <- html_session(url)
pgform <- html_form(page_session) %>% .[[1]]
filled_form <- set_values(form = pgform,
searchMarketStatisticsView.market = "HOSE",
strTradingDate = "06/08/2020")
来自控制台的结果:
Submitting with 'NULL'
Error in enc2utf8(url) : argument is not a character vector
当我对“https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/lich-su-gia.shtml 执行相同操作时,这不是错误。
我究竟做错了什么?谢谢大家
我试图找出为什么您的代码不起作用但失败了。这是有效的解决方案:
library(rvest)
url <- "https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml"
page_session <- html_session(url)
page_session <- rvest:::request_POST(page_session,
"https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml",
body = list(model.downloadType = "",
pagingInfo.indexPage = "1", #change to page number
searchMarketStatisticsView.market = "HOSE",
strTradingDate = "03/06/2020"))
我正在尝试抓取“https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml”中的数据。我正在使用 R 中的 rvest 包提交表单并不断收到此错误:
url <- "https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml"
page_session <- html_session(url)
pgform <- html_form(page_session) %>% .[[1]]
filled_form <- set_values(form = pgform,
searchMarketStatisticsView.market = "HOSE",
strTradingDate = "06/08/2020")
来自控制台的结果:
Submitting with 'NULL'
Error in enc2utf8(url) : argument is not a character vector
当我对“https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/lich-su-gia.shtml 执行相同操作时,这不是错误。 我究竟做错了什么?谢谢大家
我试图找出为什么您的代码不起作用但失败了。这是有效的解决方案:
library(rvest)
url <- "https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml"
page_session <- html_session(url)
page_session <- rvest:::request_POST(page_session,
"https://www.vndirect.com.vn/portal/thong-ke-thi-truong-chung-khoan/ket-qua-giao-dich.shtml",
body = list(model.downloadType = "",
pagingInfo.indexPage = "1", #change to page number
searchMarketStatisticsView.market = "HOSE",
strTradingDate = "03/06/2020"))