获得此错误"第一个参数不是一个开放的RODBC频道"

Question

我已通过ODBC将R连接到SQL.我已完成获取数据库,也将其升序排序并分配给"Resolution1"但现在当我尝试保存时,出现错误:

第一个参数不是一个开放的RODBC频道

我的代码如下所示:

library(RODBC)
channel<-odbcConnect("RSD")
sqlt<-sqlFetch(channel, "Resolution")
view(sqlt)
Resolution1<-(sqlQuery(channel, "select * from Resolution order by WLCODE,YEAR_OBS ASC"))
View(Resolution1)
sqlSave(Resolution1)

Answer 1

我经常遇到同样的问题（使用 ODBC）。

我创建了这个函数

connexion_bdd_txt <- paste0('driver={ODBC Driver 11 for SQL Server};bla bla;')
react <- reactiveValues(connexion_bdd = NULL)

shinyServer(function(input, output,session) { 

  connexion_courante  <- function () {

      tryCatch(
      {
          odbcGetInfo(react$connexion_bdd)
      },
        error=function(e) {    
          print("connection lost, reconnection (E)")
          react$connexion_bdd<-odbcDriverConnect(connexion_bdd_txt )
        },
        warning=function(w) {  print("connection lost (W)")
        }
      )

      return(react$connexion_bdd)

  }
  ...
  Resolution1<-(sqlQuery(connexion_courante(), "select * from Resolution order by WLCODE,YEAR_OBS ASC"))

但我还没有找到如何防止断开连接。