次のコード例は、パラメータをバインドしてパラメータ化されたステートメントを作成する方法を示します。

シングルユース ステートメント

RODBCext のsqlExecute 関数は、クエリパラメータを値にバインドするための追加のデータフレームを受け入れます。

sqlExecute(
    cnx,
    query = "SELECT ItemCode, LotNumber FROM Items WHERE LotNumber = ?",
    data = data.frame("12345")
)

results <- sqlGetResults(cnx, max = 1000)
while (is.data.frame(results)) {
    for (row in 1:nrow(results)) {
        cat(paste("ItemCode = ", results[row,]$ItemCode, "\n"))
        cat(paste("LotNumber = ", results[row,]$LotNumber, "\n"))
    }
    results <- sqlGetResults(cnx, max = 1000)
}