Mat*_*agh 5 sql-server odbc r dplyr dbplyr
假设您将表存储在 SQL 服务器数据库中,并且您想要执行多表操作,即连接来自同一数据库的多个表。
以下代码可以交互并从 SQL 服务器接收数据:
library(dplyr)
library(odbc)
con <- dbConnect(odbc::odbc(),
.connection_string = "Driver={SQL Server};Server=.;Database=My_DB;")
Table1 <- tbl(con, "Table1")
Table1 # View glimpse of Table1
Table2 <- tbl(con, "Table2")
Table2 # View glimpse of Table2
Table3 <- tbl(con, "Table3")
Run Code Online (Sandbox Code Playgroud)
但是,使用相同的连接检索到的一些结果,最终会出现以下错误:
错误:[Microsoft][ODBC SQL Server 驱动程序]连接正忙于另一个 hstmt 的结果
我目前的谷歌搜索技能让我得到了后端不支持多个活动结果集 (MARS) 的答案 - 我猜超过 2 个活动结果集是最大值?(后端是 DBI 和 odbc)
所以,我的问题是:如果我想从 SQL DB 的多个表中收集数据,最佳实践是什么?
为每个表打开一个连接?
主动关闭连接并为下一个表再次打开它?
后端是否支持将MARS解析为连接字符串?
为了建立可以保存多个结果集的连接,我很幸运地使用了以下连接代码:
con <- DBI::dbConnect(odbc::odbc(),
Driver = "SQL Server Native Client 11.0",
Server = "my_host",
UID = rstudioapi::askForPassword("Database UID"),
PWD = rstudioapi::askForPassword("Database PWD"),
Port = 1433,
MultipleActiveResultSets = "True",
Database = my_db)
Run Code Online (Sandbox Code Playgroud)
最重要的是,我发现新的pool-package 可以完成这项工作:
pool <- dbPool(odbc::odbc(),
Driver = "SQL Server Native Client 11.0",
Server = "my_host",
UID = rstudioapi::askForPassword("Database UID"),
PWD = rstudioapi::askForPassword("Database PWD"),
Port = 1433,
MultipleActiveResultSets = "True",
Database = my_db)
Run Code Online (Sandbox Code Playgroud)
它比 DBI 连接更快、更稳定,但是,一个小缺点是数据库不会在连接选项卡中弹出以方便参考。
对于这两种方法,请记住在完成后关闭连接/池。对于 DBI 方法,其:
dbDisconnect(con)
Run Code Online (Sandbox Code Playgroud)
而池方法通过调用关闭:
poolClose(pool)
Run Code Online (Sandbox Code Playgroud)