RODBC连接失败

Question

我有一个在本地工作的R闪闪的应用程序，但是当我上传它时，我得到了错误：

 first argument is not an open RODBC channel

这是我的代码：

conn<- suppressWarnings( odbcDriverConnect('driver={SQL Server};server=SWDCH;    database=GR;    trusted_connection=yes;uid=RUser , pwd=ruser'))
  data <- sqlQuery(conn,paste("exec Performance  @MetricType = '", MetricType ,"',@Metric = '", Metric ,"',   @Market = '", Market  , "', @StartDate = '", StartDate, "', @EndDate = '", EndDate, "';",sep =""),errors=FALSE)

我认为问题在于conn对象，但知道问题是什么吗？

Answer 1

我有一个相同的问题，现在已经解决了。如果这对你有用的话请告诉我。

问题似乎是“默认”连接，它是通过闪亮引用的。我运行了以下代码，该代码在本地工作，但给出了与您相同的"RODBC连接未打开“错误

不工作在闪亮：

tdConnection2 <- odbcConnect("my_dsn"，eid = "ABC123"，pw =“密码”)

结果<- sqlQuery(“运行此SQL")

我能够通过显式引用tdQuery()函数中引用的哪个通道来修复所有内容，如下所示

确实在闪亮：中工作

tdConnection2 <- odbcConnect("my_dsn"，eid = "ABC123"，pw =“密码”)

结果<- sqlQuery(通道= tdConnection2，query =“运行此SQL")

我通过像print(tdConnection2)这样的操作来诊断这个问题，这表明我已经成功地建立了一个初始连接。我的rPython没有工作，因为R所引用的python的默认版本，所以我想到了默认版本/驱动程序，这些版本/驱动程序可能也是引用的。希望这也能解决你的问题。

Answer 2

在PC中创建sqlserver ODBC连接，ODBC数据源。使用下面的代码片段将数据连接并存储到反应性变量中。

 data <- reactive({
    ch <- odbcConnect(dsn = "DSNName", uid = "username", pwd = "password")
 sqlQuery(ch,paste('select  * from emp ')
  })

DSNName是创建的的名称。