自动下载 .iqy 文件并从中读取数据答案

【问题标题】：automating downloading a .iqy file and reading the data from it自动下载 .iqy 文件并从中读取数据
【发布时间】：2017-06-15 08:30:38
【问题描述】：

我有一个链接，我需要下载“.iqy”文件中的数据，我需要阅读该链接以进行进一步清理。

我可以通过使用

在文件中输入存在的链接（在第 3 行）手动完成

con <- file("ABC1.iqy", "r", blocking = FALSE) readLines(con=con,n=-1L,ok=TRUE, warn=FALSE,encoding='unknown').

输出：

[1] "WEB"
[2] "1"
[3] "https:abc.../excel/execution/EPnx?view=vrs" [4] ""
[5] ""
[6] "Selection=AllTables"
[7] "Formatting=None"
[8] "PreFormattedTextToColumns=True"
[9] "ConsecutiveDelimitersAsOne=True"
[10] "SingleBlockTextImport=False"
[11] "DisableDateRecognition=False"
[12] "DisableRedirections=False"
[13] ""

我需要自动执行此操作，而不是手动执行。我可以使用 r 中的任何选项吗？

【问题讨论】：

@Moddy_Mudskipper：是的.. :) 我做对了。您的代码也可以工作，但是它将所有内容都放在一个列中，例如等等。
column1 column2 column3

标签： r excel-web-query

【解决方案1】：

只需使用download.file :)

con <- file("ABC1.iqy", "r", blocking = FALSE)
dest_path <- "ABC.file"
download.file(readLines(con=con,n=-1L,ok=TRUE, warn=FALSE,encoding='unknown')[3],destfile= dest_path)

如果您无法读取获得的文件，请尝试：

download.file(readLines(con=con,n=-1L,ok=TRUE, warn=FALSE,encoding='unknown')[3],destfile= dest_path, mode = "wb")

【讨论】：

con <- file("ABC1.iqy", "r", blocking = FALSE) 显示错误“文件中的错误（“ABC1.iqy”，“r”，阻塞 = FALSE）：无法打开连接“