在R中正确转义含双引号与单引号的SQL查询语句问题

我需要通过R代码执行以下SQL查询：

select t."date"
from db.table t
where t."date" > '2016-01-01';

为了正确生成带引号的字符串，我尝试了以下代码：

sqlquery <- dbQuoteString(ANSI()
              , paste0("select t.", '"', "date", '"',"
                from db.table t
                where t.", '"',"date", '"'," > '2016-01-01';")
              )

输出结果为：

<SQL> 'select t."date"
                from db.table t
                where t."date" > ''2016-01-01'';'

之后用DBI::dbGetQuery(con, sqlquery)执行，但日期'2016-01-01'周围的单引号变成了双单引号''，该如何解决？

问题出在你用dbQuoteString处理了整个SQL语句——这个函数的作用是将普通字符串转为数据库可识别的带引号字符串常量，而非用来构建完整SQL语句。以下是两种正确的处理方式：

方法1：使用sqlInterpolate（推荐） #

这个函数可以安全插入参数，同时自动处理标识符和字符串的引号规则：

# 定义SQL模板，用[[标识符]]标记列名，?参数名标记变量位置
sql_template <- "select t.[[date]]
from db.table t
where t.[[date]] > ?date_param;"

# 插值生成合法的SQL语句
sqlquery <- DBI::sqlInterpolate(ANSI(), sql_template, date_param = '2016-01-01')

# 执行查询
data <- DBI::dbGetQuery(con, sqlquery)

这种方式既不会出现引号重复转义的问题，还能有效防范SQL注入。

方法2：分开处理标识符与参数 #

如果需要手动拼接，可分别用对应函数处理列名和参数，再组合成完整SQL：

# 处理列名（标识符）
quoted_date_col <- DBI::dbQuoteIdentifier(ANSI(), "date")

# 处理日期参数（字符串常量）
quoted_date_val <- DBI::dbQuoteString(ANSI(), "2016-01-01")

# 拼接生成SQL
sqlquery <- paste0("select t.", quoted_date_col, "
from db.table t
where t.", quoted_date_col, " > ", quoted_date_val, ";")

# 执行查询
data <- DBI::dbGetQuery(con, sqlquery)

补充说明 #

SQL里的双单引号''是单引号的标准转义写法，但这里你不需要转义日期值——它是查询的参数而非字符串常量的一部分，所以用上述方法就能避免不必要的转义。

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