如何从R直接写入SharePoint,无需先存储到本地磁盘?
针对你的需求——无需映射SharePoint驱动器、不写入本地磁盘,可通过SharePoint REST API结合httr包,直接将内存中的DataFrame以CSV格式上传到SharePoint,且不需要注册应用(利用Windows NTLM认证复用当前用户权限)。
具体实现步骤
加载依赖包
确保安装并加载以下包:install.packages(c("httr", "readr", "DBI", "rJava")) library(httr) library(readr) library(DBI) library(rJava)保留原有数据库连接与取数逻辑
你的原有数据库代码无需改动:## Connect to database classpath_name="A:/ojdbc8.jar" jdbcDriver <- JDBC(driverClass="oracle.jdbc.driver.OracleDriver", classPath=classpath_name) jdbcConnection <- dbConnect(jdbcDriver, "blablablablabla", "blabla", "blabla") ## Download table df <- dbGetQuery(jdbcConnection,"select * from Schema.table")将DataFrame转为内存中的CSV文本
用readr::format_csv直接生成CSV格式的字符串,完全不涉及本地文件:csv_content <- format_csv(df)通过SharePoint REST API上传
替换以下代码中的your_sharepoint_site_url和document_library_path为你的实际信息:# SharePoint站点基础URL site_url <- "https://yourcompany.sharepoint.com/sites/YourTeamSite" # 目标文档库的相对路径(对应原来的General/location) folder_relative_url <- "/sites/YourTeamSite/General/location" # 要保存的文件名 file_name <- "table.csv" # 构造API请求URL api_url <- sprintf( "%s/_api/web/GetFolderByServerRelativeUrl('%s')/Files/add(url='%s', overwrite=true)", site_url, URLencode(folder_relative_url), file_name ) # 发送上传请求(使用NTLM认证,自动复用当前Windows用户权限) response <- POST( url = api_url, authenticate(user = NULL, password = NULL, type = "ntlm"), add_headers( "Accept" = "application/json;odata=verbose", "Content-Type" = "text/csv" ), body = csv_content ) # 检查上传是否成功 if (status_code(response) == 200) { cat("文件上传成功!\n") } else { cat("上传失败,状态码:", status_code(response), "\n") cat("响应信息:", content(response, "text"), "\n") }
关键优势
- 全程无本地文件写入:CSV内容仅在内存中生成和传输
- 无需注册SharePoint应用:依赖企业环境常用的NTLM认证,直接使用当前Windows用户权限
- 无需映射网络驱动器:通过HTTP API直接交互
注意事项
- 确认你的SharePoint站点URL、文档库相对路径准确无误
- 确保当前Windows用户拥有目标文档库的上传/编辑权限
- 若企业环境禁用NTLM认证,可联系IT确认是否支持其他认证方式(如OAuth2,但可能需要应用注册权限)
内容的提问来源于stack exchange,提问作者Joe Crozier
相关产品推荐
相关产品推荐

