使用RODBC从数据库取数时R崩溃的原因及解决方法

Windows 10 + R 4.3.1（RGui/R.EXE） #

使用RODBC连接SQL Server数据库，代码如下：

library(RODBC)

connstr = sprintf('driver={ODBC Driver 17 for SQL Server};server=%s;database=%s;uid=%s;pwd=%s',
    /* 自定义参数 */)
    
dbhandle <- odbcDriverConnect(connstr)

查询单列（如runID）能正常返回结果：

tbl1 <- sqlQuery(dbhandle, sprintf('select runID from myTable WHERE runID = 34'))

但同时查询两列数据时，RGui直接崩溃无提示，命令行R.EXE也直接退出。

Ubuntu 20.04 + R 3.6.3 #

同样用RODBC连接数据库后，查询fit列出现段错误：

> tbl2 <- sqlQuery(dbhandle, sprintf('select fit from myTable WHERE runID = 34'))

报错信息：

*** caught segfault ***
address 0x560b5bbef000, cause 'memory not mapped'

Traceback:
 1: odbcFetchRows(channel, max = max, buffsize = buffsize, nullstring = nullstring,     believeNRows = believeNRows)
 2: sqlGetResults(channel, errors = errors, ...)
 3: sqlQuery(dbhandle, sprintf("select fit from myTable WHERE runID = 34"))

这类崩溃/段错误通常和以下因素相关：

• ODBC驱动与R版本兼容性：RODBC包版本较老，对新版本R（如4.3.1）或跨系统的ODBC驱动适配存在问题；Windows下ODBC Driver 17与R 4.3.1的内存交互可能存在冲突，Ubuntu下R 3.6.3与对应ODBC驱动的类型转换逻辑有bug。
• 数据类型不兼容：fit列或多列组合中包含RODBC无法正确解析的特殊数据类型（如大型二进制对象、自定义SQL类型、高精度数值），读取时触发内存访问错误。
• RODBC包本身缺陷：旧版RODBC在处理多列或特定数据类型时，内存管理存在漏洞，导致程序崩溃。

1. 替换为更现代的ODBC包 #

放弃RODBC，改用odbc包（基于DBI接口的现代实现），兼容性和稳定性更优：

# 安装包
install.packages("odbc")
library(DBI)
library(odbc)

# 建立连接
conn <- dbConnect(odbc(),
                  Driver = "ODBC Driver 17 for SQL Server",
                  Server = "你的服务器地址",
                  Database = "你的数据库名",
                  UID = "用户名",
                  PWD = "密码")

# 执行查询
# 单列查询
tbl1 <- dbGetQuery(conn, "select runID from myTable WHERE runID = 34")
# 多列查询
tbl_multi <- dbGetQuery(conn, "select runID, fit from myTable WHERE runID = 34")

# 关闭连接
dbDisconnect(conn)

2. 排查并处理数据类型问题 #

如果必须使用RODBC：

• 检查fit列的数据类型，尝试用SQL转换函数将其转为RODBC支持的类型，例如：

  select CAST(fit AS VARCHAR(MAX)) as fit_converted from myTable WHERE runID = 34
  

• 逐步添加列进行查询，定位触发崩溃的具体列，针对性处理。

3. 调整驱动或R版本 #

• Windows：尝试降级R版本到4.0.x系列，或升级ODBC驱动到最新版（如ODBC Driver 18 for SQL Server），测试兼容性。
• Ubuntu：升级R版本到4.x系列，或更换为对应版本的ODBC驱动，确保驱动与R、系统版本匹配。

4. 调整RODBC查询参数 #

在sqlQuery中添加believeNRows = FALSE参数，避免RODBC预分配内存时出错：

tbl2 <- sqlQuery(dbhandle, sprintf('select fit from myTable WHERE runID = 34'), believeNRows = FALSE)

内容的提问来源于stack exchange，提问作者MikeB