如何在dbGetQuery中正确传递双WHERE子句参数获取数据？

你的问题出在两个核心点：

• 生成SQL占位符时，query1和query2的编号重复（均从$1开始），导致数据库无法正确匹配参数
• 调用dbGetQuery时未将Filter1和Filter2的参数合并为一个完整列表传入

修正步骤： #

1. 调整占位符编号逻辑，让query2的编号从Filter1的长度+1开始，避免编号冲突
2. 调用dbGetQuery时合并两个Filter的参数列表，确保所有占位符都有对应参数

修正后的完整代码： #

Filter1 <- "State" #input$state
Filter2 <- "Luxury" #input$home

# 生成第一个IN子句的占位符，从1开始计数
query1 <- paste0(paste0("$", seq_along(Filter1)), collapse = ", ")
# 生成第二个IN子句的占位符，从Filter1长度+1开始计数
query2 <- paste0(paste0("$", length(Filter1) + seq_along(Filter2)), collapse = ", ")

querys1 <- paste0("SELECT *
               FROM table
               WHERE state IN (",
                 query1,
                 ") AND home IN (", 
                 query2,
                 ")")

# 合并两个Filter的参数列表，传入dbGetQuery
data1 <- dbGetQuery(conn, querys1, c(as.list(Filter1), as.list(Filter2)))

补充说明： #

• 如果Filter1或Filter2是多值向量（比如c("CA", "NY")），上述代码会自动生成对应数量的占位符，完美适配多值IN查询
• 坚持使用参数化查询可有效避免SQL注入风险，这是数据库操作的最佳实践

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