RSQlite参数化查询

Question

我想在不使用paste（）的情况下将值插入查询中：

symbol<-'ES'
prices <- dbGetQuery(con,"SELECT * from fut_prices WHERE symbol LIKE '%:x%'", 
x=symbol)

以上是从fut_prices表返回所有列名但没有行。我做错了什么？

Answer 1

试试这个：

library(RSQLite)

con <- dbConnect(SQLite(), ":memory:")

DF <- data.frame(symbol = c("X", "ES"), price = 1:2, stringsAsFactors = FALSE)
dbWriteTable(con, "DF", DF)

s <- "SELECT * from DF where symbol LIKE '%' || :x || '%'"
symbol <- "ES"
bind.data <- data.frame(x = symbol, stringsAsFactors = FALSE)
dbGetPreparedQuery(con, s, bind.data = bind.data)

，并提供：

  symbol price
1     ES     2